חוקי הפורום

סינון שורות באקסל



  • האם אפשר לסנן טבלה באקסל לפי תא מסוים ולהציג את השורות המתאימות בגיליון אחר

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

    תודה





  • זה מצוין, תודה

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



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



  • @nach אמר בסינון שורות באקסל:

    למה שלא תשתמש בPivot Table ?

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



  • @אדרת אמר

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

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



  • @אדרת אמר בסינון שורות באקסל:

    Pivot Table

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

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

    תודה!עזרה בPivot Table.xlsx



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



  • @nach אמר בסינון שורות באקסל:

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

    תודה על התשובה המפורטת!!

    מצרף בתמונה על איפה שהצלחתי

    e6900e9d-0d87-4686-b6c3-bce8ab252447-image.png



  • @אדרת

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

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

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

    למה?

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

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



  • @nach אמר בסינון שורות באקסל:

    למה?

    כדי להגיע לתוצאה שרציתי...

    @nach אמר בסינון שורות באקסל:

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

    תודה על הכיון,
    עזרת לי מאוד!!



  • @nach אמר בסינון שורות באקסל:

    אין אפשרות, אתה יכול לנסות ותקפוץ לך שגיאה

    פה יש פתרון ב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
    
    

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



  • @nach

    יש לך מושג למה זה לא עובד לי?
    31850754-f733-426c-bc46-06feff5a7343-image.png



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



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



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



  • @nach אמר בסינון שורות באקסל:

    הטעות וודאי בשם הגליון תראה כאן

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



  • מצרץ את הקובץ

    עזרה בPivot Table.xlsm



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



  • @nach אמר בסינון שורות באקסל:

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

    תודה לך!
    אני חושב שאני יורד מרעיון להיות אי-פעם מתכנת...



  • @אדרת אמר בסינון שורות באקסל:

    אני חושב שאני יורד מרעיון להיות אי-פעם מתכנת...

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


התחבר כדי לפרסם תגובה
 

אידאל מגזין

מחשבים יד שניה

מחשבי מותג נייחים וניידים, מכל הרמות.

055-6727119