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

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

💡 רוצה לזכור קריאת שמע בזמן? לחץ כאן!
  1. דף הבית
  2. תוכנה
  3. סינון שורות באקסל

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

מתוזמן נעוץ נעול הועבר תוכנה
22 פוסטים 4 כותבים 1.1k צפיות
  • מהישן לחדש
  • מהחדש לישן
  • הכי הרבה הצבעות
התחברו כדי לפרסם תגובה
נושא זה נמחק. רק משתמשים עם הרשאות מתאימות יוכלו לצפות בו.
  • The shadowT מנותק
    The shadowT מנותק
    The shadow
    כתב ב נערך לאחרונה על ידי
    #11

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

    למה?

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

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

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

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

    תגובה 1 תגובה אחרונה
    1
    • The shadowT מנותק
      The shadowT מנותק
      The shadow
      השיב לnach ב נערך לאחרונה על ידי
      #12

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

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

      פה יש פתרון בVBA

      תגובה 1 תגובה אחרונה
      1
      • nachN מנותק
        nachN מנותק
        nach
        כתב ב נערך לאחרונה על ידי nach
        #13

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

        
        
        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
        
        

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

        The shadowT תגובה 1 תגובה אחרונה
        2
        • The shadowT מנותק
          The shadowT מנותק
          The shadow
          השיב לnach ב נערך לאחרונה על ידי
          #14

          @nach

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

          nachN תגובה 1 תגובה אחרונה
          0
          • nachN מנותק
            nachN מנותק
            nach
            השיב לThe shadow ב נערך לאחרונה על ידי nach
            #15

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

            תגובה 1 תגובה אחרונה
            3
            • nachN מנותק
              nachN מנותק
              nach
              כתב ב נערך לאחרונה על ידי
              #16

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

              תגובה 1 תגובה אחרונה
              1
              • nachN מנותק
                nachN מנותק
                nach
                כתב ב נערך לאחרונה על ידי nach
                #17

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

                The shadowT תגובה 1 תגובה אחרונה
                2
                • The shadowT מנותק
                  The shadowT מנותק
                  The shadow
                  השיב לnach ב נערך לאחרונה על ידי
                  #18

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

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

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

                  תגובה 1 תגובה אחרונה
                  0
                  • The shadowT מנותק
                    The shadowT מנותק
                    The shadow
                    כתב ב נערך לאחרונה על ידי
                    #19

                    מצרץ את הקובץ

                    עזרה בPivot Table.xlsm

                    תגובה 1 תגובה אחרונה
                    0
                    • nachN מנותק
                      nachN מנותק
                      nach
                      כתב ב נערך לאחרונה על ידי nach
                      #20

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

                      The shadowT תגובה 1 תגובה אחרונה
                      2
                      • The shadowT מנותק
                        The shadowT מנותק
                        The shadow
                        השיב לnach ב נערך לאחרונה על ידי
                        #21

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

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

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

                        yossizY תגובה 1 תגובה אחרונה
                        1
                        • yossizY מנותק
                          yossizY מנותק
                          yossiz
                          השיב לThe shadow ב נערך לאחרונה על ידי
                          #22

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

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

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

                          📧 יוסי@מייל.קום | 🌎 בלוג | ☕ קפה

                          תגובה 1 תגובה אחרונה
                          4

                          • 1
                          • 2
                          בא תתחבר לדף היומי!
                          • התחברות

                          • אין לך חשבון עדיין? הרשמה

                          • התחברו או הירשמו כדי לחפש.
                          • פוסט ראשון
                            פוסט אחרון
                          0
                          • דף הבית
                          • קטגוריות
                          • פוסטים אחרונים
                          • משתמשים
                          • חיפוש
                          • חוקי הפורום