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

אני אמנם עדיין בחיתולים (יחסית) בכל הקשור לתכנות ואני כאן רק כדי להתאבק בעפר רגליכם, ואני כעת רשום לפורום ה"אקסקלוסיבי" רק בגלל שחשבתי שאמצא כאן מידע וחומר שיקדם אותי וחשבתי כבר לעזוב למרות שיש כאן קצת חומר אבל תסכימו איתי שהוא דל ולא מספק, עד שבשבוע שעבר (כמדומני) התחיל כאן כבוד מורנו הרב @dovid עם המדריך המעניין על פיתוח אפליקציה בווב ולכן בסוף נשארתי ועתה עיני כלות מתי יבוא המדריך הבא בענין הזה!
אני אמנם לא לומד דרך האתר אלא לבד אבל זה מאוד מוסיף ידע לקרוא על עוד נושאים שקשורים למידע רחב יותר (אני כעת באמת מתרכז בלימוד של ווב בעיקר, JS),
אי לכך, מכאן תצא הקריאה לרבינו ה @nigun להעלות את המדריך ויתן בעז"ה תועלת לכל אנ"ש וכן שימשיך@dovid להדריך בענין הנ"ל, לתועלת כל המעוניינים!
חזקו ואמצו! תחזקנה ידכם.

@yair-na
כאן הביאו קישור להורדה, על אחריותך האישית, גם כאן בפורום הביאו משהו בעבר, תוכל לחפש.

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

@UA תסתכל את

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

@חייםיודלביץ סתם כי מעניין אותי לראות את זה, יש לך אותו בגרסת 64 סיביות?

@nam סליחה רק עכשיו ראיתי שהדגשת שכבר שמרת רק שלא שמרת שוב את השינויים, אני יודע שבדרך כלל יש לווינדוס שמירה זמנית לשחזור גרסאות שלא נשמרו אני לא זוכר באיזה תיקיה המחשב שומר את זה אבל אולי מישהו אחר כאן ידע, אני לא יודע ג"כ אם זה חל גם על כאלו קבצים (הרי גם קובץ טקסט המחשב לא שומר עדכונים זמניים)
המקום ינחם אתכם,

אתה משתמש מתחיל? כי לא נשמע לי שלא שמרת והרצת וכו'?! יותר נשמע שאתה רק לא יודע לנתב לפרויקט ההוא וכנראה שבטעות פתחת פרויקט חדש, תפתח את חלון ה- Welcome שם תחת הכותרת Recent אמורים להופיע הפרויקטים האחרונים שלך, (אם תזכר בשם התיקיה תוכל ללחוץ Open Folder בסטרט)

תודה! מצאתי את זה ויש להם גם גרסה בחינם לתועלת הציבור המעוניין: תוכנת 'הגבאי'

סליחה על הבקשה שלא קשורה לפוסט (זה קשור לנושא והיה נראה לי לא קשור להעלות על זה נושא חדש)
אפרופו ביהכנ"ס באם יש למישהו מערכת בנויה לניהול ביהכנ"ס (עדיף אקסל או אקסס), אם יוכל להעלות פה אשמח מאוד,
תודה מראש!

@אדרת אחרי שאני מנסה אלף אפשרויות להבין איפה הבעיה אני קולט שאתה שינית מ"גלין1" ל"גליון1", אבל מה לעשות שהמחשב כמה שהוא יהיה חכם הוא עדיין רק מחשב! וכשקוראים לגיליון שלך "גיליון1" הוא בחיים לא יבין כשתקרא לו "גליון1"!! בקיצור: חסרה האות י' (אגב גם כך כותבים בעברית)
רק תשנה את זה ויעבוד לך פרפקט! (ניסיתי כבר)
בהצלחה!

סליחה, הטעות וודאי בשם הגליון תראה כאן: (זה מהתמונה שלך)

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

@אדרת מהסתכלות מינימילית בקוד שלך זה נראה שאולי טעית בהפניה לשם גיליון, כתבת "גלין 1" יותר נשמע כמו טעות! לא? תבדוק שוב, הקוד בכללי נראה מצוין כנראה שהטעות בשמות (תשווה את השם של הפיבוט תראה את זה בסרגל הכלים 'כלי פיבוט>ניתוח /שם:', את השם של המסנן נראה שכתבת מצוין)
אם עדיין יש בעיה תכתוב ואסתכל על הקוד בצורה יותר מדוקדקת, (אגב, לא עדיף לך להביא את הקוד נורמלי בלי צילום? או שתגדיל את השטח של הקוד, קשה לקרוא כך)
כמו"כ אם ציפית שהוא יסנן את שתי הטבלאות על פי התא המצוין אין סיבה שהוא יעשה את זה אם לא כתבת לו...!
בהצלחה

@חנון-המרבה אמר:

כאן ישנו מדריך....

אני באמת משתמש בזה תמיד, ( @zvinissim ממליץ לך מאוד, זה הכי פשוט ונוח רק צריך לשים לב לענין הטווחים שם שאכן תסומן כל השורה וכנ"ל)

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

למה להסתבך? אתה יכול להפעיל את החיפוש ואז לסנן לפי צבע!! אחרת מה הענין?! (אם תתעקש על מאקרו, פה אתה וודאי תסתדר להקליט מאקרו שסה"כ ממיין לפי הצבע!)

@אדרת חזק ביותר! אביא את הקוד כאן:

Private Sub Worksheet_Change(ByVal Target As Range)

    Dim xPTable As PivotTable
    Dim xPFile As PivotField
    Dim xStr As String
    
    On Error Resume Next
    'כאן מציינים שהתוכן שמענין אותנו נמצא בתא מסוים אך כמובן שאפשר ורצוי להחליף את כתובת התא כרצונכם'
    If Intersect(Target, Range("H1")) Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    ' נסיון זהו שם גיליון העבודה שלי תצטרכו לשנות לשם הגיליון שלכם'
    Set xPTable = Worksheets("נסיון").PivotTables("pivottable2")
    'לקוח זהו התא של הקריטוריון (תוכלו לזהות לפי מה שהגדרתם כמסנן)'
    Set xPFile = xPTable.PivotFields("לקוח")
    xStr = Target.Text
    xPFile.ClearAllFilters
    xPFile.CurrentPage = xStr
    Application.ScreenUpdating = True
    
End Sub

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

@אדרת

היי תודה הסתדרתי עם זה

מעולה, אבל עד שכתבתי לא שמתי לב להודעה

פשוט לשים את כל העמודות למעט המסנן בתיבת השורות
ולסדר את הפריסה כטבלה

למה?

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

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

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

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

@אדרת אמר

כי Pivot Table מסכמת את הטבלה,
ומה שאני רוצה לסנן שורות מתוך טבלה

אתה יכול להשתגע בנוסחאות והתניות (תוכל לשחק בפונקציה VLOOKUP וכדו') תוכל גם לעשות סינון מתקדם כנ"ל ולהפעיל מאקרו בפתיחת קובץ שעושה את הסינון, אבל מנסיוני האפשרות הכי פשוטה והכי קלה היא בטבלת פיבוט כנ"ל, ובנוגע לעצם השאלה שלך: תוכל לשים את 'שם לקוח' במסננים ואח"כ לשחק עם שאר הנתונים ולפרוס אותם באופן הרצוי מבללי לוותר על אף נתון, ואז לא רק שתרוויח מהצד סינון כמו שביקשת אלא גם תקבל דו"ח יפה ומסודר של כל הנתונים, אם יתן ה' זמן בידי אעלה לכאן תיכף הסבר בענין הזה,

@אדרת למה שלא תשתמש בPivot Table ?