תחומים - פורום חרדי מקצועי

@למה-מה-קרה
בכל גליון הטווח שצריך לכתוב הוא שונה בהתאם לטבלאות

@פלורידה אמר באקסל | בחירת טווח עמודות בכל הטבלאות:

צריך לבחור טווח של עמודות 2-5 בכל הטבלאות הקיימות בגליון,

אני צריך את זה לפקודות שיחולו על כל טבלה באשר היא

אני צריך לבחור טווח של עמודות 2-5 בכל הטבלאות הקיימות בגליון, או עדיף בכל הטבלאות הקיימות בכל הגליונות, מה שעשיתי עד עכשיו זה היה ידני, האם ניתן לעשות את זה בהגדרת טווח אחת??

@מוטי-אורן מן הסתם למשתמשי נטפרי קשה ליפול.... (אולי עם הרבה מאמץ...)

@אביי האם יש קשר בין שני ההודעות?

שלום וברכה, לפני כמה ימים קיבלתי הודעת מייל כזו

לחצתי על הקישור כי הוא נראה לי תקין, ואכן הוא הוביל אותי לפורום לתורה.
האם אני צריך לדאוג ממשהו?

@אפרים22 אמר בישיבה חדשה נפתחה... וצריך לבנות מסדי נתונים באקסל & אקסס....:

רציתי להוריד עכשיו, נטפרי חוסמים. אפשר להשיג את זה בתור קובץ?

סתם ליידע, ניתן לפתוח בפניה למערכת הפניות בצירוף נקודה, (על ידי הקלטת תעבורה)

@amik אמר בפיצול טבלה באקסל:

תסדר את הגיליון בצורה שאתה רוצה וננסה לסייע בס"ד.

אשמח אם תיצור אותי קשר במייל / צ'אט מופיע בפרופיל שלי.
מבטיח לא להטריל...

תודה רבה!!!!

@amik אמר בפיצול טבלה באקסל:

ולמספר בעמודה " מס' " לפי הדף (לדף ב.-מס' 2 , לדף ב: מס' 2.5),
למספר שני שורות ולאחר מכן לבחור אותם ולגרור את ידית הגרירה עד סוף הפרק,

אם המטרה כדי ליצור סידרה של ב. ב: ג. ג:, וכן הלאה...
אפשר יותר פשוט ליצור סידרה של ב. ב: ג.

בכך אפשר לחסוך את כמה גליונות.

העלתי את הסקיצה של הקובץ בלי הגליונות, עם הפקודה של דאבל קליק, שמסמן v. ונותן לתא ערך של התאריך שבו סומן. (לצורכי סטטיסטיקות)

1-טבלאות-חזרה.xlsm

• אשמח אם תוכל לערוך את המאקרו, כך שעל מנת ליצור כותרת, יכתבו את הספרה 1 בצד שמאל של הכותרת על מנת לחסוך את הטור של הספרות)

• בצורה שזה עכשיו נהפך לכותרת, אי אפשר לעשות את זה על מסכת יותר גדולה מהטורים שהצבת

תודה רבה!!!

@odeddvir אמר בפיצול טבלה באקסל:

אם אתה מוכן להשקיע זמן, אני יכול לכוון אותך כיצד אני הייתי מבצע את זה באקסל.

אני מוכן להשקיע בעזרת ה', אשמח אם תוכל לכוון אותי. (כבר במשך שבועיים אני מנסה לבנות לי בראש סקיצה מה אני בדיוק עושה וכיצד....)

@odeddvir אני מעדיף שיהיה אפשרות לשלב גם את שמות הפרקים, אם כי אני לא יודע מתי יהיה לי כוח לשבת ולהזין אותם, (אולי אני אבקש את הטבלה המקורית מהמפיץ...)

לגבי המשבצות, אני מתכוון שיהיה אופציה למלא אותם בערך כלשהו.

@odeddvir אמר בפיצול טבלה באקסל:

אם זה דפי ש"ס אני חושב שהכי פשוט זה לבחור בכל פעם 35 שורות, ולגזור ולהדביק. אתה תסיים תוך 3 דקות

וזה לא יהיה מוגדר כטבלה....

החלום שלי שזה ייראה בערך ככה...

אני יכול להתייאש??

יש לי טבלה שהיא ארוכה לי, ולא כל כך נוחה לשימוש שוטף לצרכים שלי.
האם אפשר לעשות אותה שתמשיך בטור מקביל.

דוגמא:

שיהיה ככה:

@odeddvir אמר בתוכנה לסימון חזרות:

@פלורידה תשתמש ב CountIF:

=COUNTIF(E1:E10,ChrW(&H2713))

אצלי זה לא עוזר, כי במקום ChrW(&H2713) שמתי Date מה שגורר שבתאים מוגדר 11/11/2020 כך שאני כן זקוק להגיע לפונקצייה של ספירה

אולי יותר פשוט לסכם על ידי ספירה??

אשמח אם מישהו יודע מהי הפונקציה של ספירה באקסל??

@odeddvir אמר בתוכנה לסימון חזרות:

לא. אבל אפשר לסכם לפי תנאי, אם התא ריק אז להוסיף 0, ואם יש בו ערך כלשהוא (או ליתר דיוק את התו הנ"ל) להוסיף 1.

זה ממש רעיון מבריק. איך עושים את זה?

כלומר: איך מסכמים לפי תנאי? או לחילופין מה שם הנוסחה??.

---

---

למתעניינים צירפתי את הפיתרון שאני בחרתי לצורך המסמך שאני עורך

הכנסתי את הקוד הזה:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("B1:B10")) Is Nothing Then
Application.EnableEvents = False
If ActiveCell.Value = Date Then
ActiveCell.ClearContents
Else
ActiveCell.Value = Date
End If
Cancel = True
End If
Application.EnableEvents = True
End Sub

המשמעות שלו, שלחיצה תתן את התאריך
[אני כבר יעלים אותו על ידי התאמת אישית לסוג " ";" ";" " ככה:

ובכך אני מרויח שניתן לחקור את התאריך שבו ניתן הסימון.
כמובן שהבעיה שלי שהערך של התא באופן אוטומטי כערך התאריך, מה שאני צריך לעשות הוא סיכום שכל ערך שנמצא בתא באופן אוטומטי נחשב ל 1

@פלורידה אמר בתוכנה לסימון חזרות:

מה שאני עדיין לא מבין, איך עושים שעל ידי לחיצה כפולה הוא נותן לתא ערך = 1 (וכשאלה נגזרת, האם אפשר לעשות שייוצר על ידי לחיצה בודדת)

מצאתי כאן את הקוד הזה

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    On Error Resume Next
    If Not Intersect(Target, Range("A1")) Is Nothing Then
      Range("A1").Value = Range("A1").Value + 1
      Cancel = True
    End If
End Sub

בכל פעם שאלחץ על תא a1 הוא יקבל תוספת של 1 אם נניח הערך שקיים בו הוא 173, על ידי לחיצה הוא יהיה 174.

מה שאני רוצה לעשות שכאשר אני לוחץ פעם שנייה הוא יהיה 0, כלומר פעם אחת הוא יהיה 0 פעם שניה 1 וכן הלאה.

---

כמו כן מצאתי את הקוד הזה, שאמנם עושה v בלחיצה כפולה, ומסיר אותו בפעם השניה, אך לא נותן ערך לתא.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, Range("B1:B10")) Is Nothing Then
        Application.EnableEvents = False
        If ActiveCell.Value = ChrW(&H2713) Then
            ActiveCell.ClearContents
        Else
            ActiveCell.Value = ChrW(&H2713)
        End If
        Cancel = True
    End If
    Application.EnableEvents = True
End Sub

אולי ניתן ליצור נוסחה v=1????

@odeddvir כן, וליתר דיוק כזה