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

    הפעלת קוד vba באקסל דרך אקסס

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

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

      ניתן לפנות אלי גם ב al0548446188@gmail.com
      ותמיד... אבל תמיד תוכלו לשאול אותי ב :) כאן שאלות באקסל

      תגובה 1 תגובה אחרונה תגובה ציטוט 0
      • Y
        yits נערך לאחרונה על ידי yits

        יש לי קובץ אקסס שאני מפעיל דרכו קובץ אקסל וזה עובד טוב.

        אתה צריך לדעת מה מספר השגיאה וככה לטפל בשגיאות,
        לדוגמא אם האקסל פתוח וצריך רק להשתמש בתהליך קיים או שהאקסל סגור וצריך לפתוח תהליך כזה
        זה שני צורות של כתיבת קוד
        יש את הקוד הזה
        Set xl = CreateObject("Excel.Application")
        ויש עוד קוד
        Set xl = GetObject("Excel.Application")

        לקניה והנחות ב KSP כנסו מכאן.
        למוצרים עם הנחה מכאן.

        אוריי תגובה 1 תגובה אחרונה תגובה ציטוט 0
        • אוריי
          אוריי @yits נערך לאחרונה על ידי

          @yits
          אז אני אסביר
          יש לי קובץ אקסל שבו יש לי קוד vba להדפסה שלו.
          ואני רוצה דרך האקסס להדפיס ואפי' מבחינתי לא לפתוח את האקסל בכלל (אם אפשרי)

          ניתן לפנות אלי גם ב al0548446188@gmail.com
          ותמיד... אבל תמיד תוכלו לשאול אותי ב :) כאן שאלות באקסל

          OdedDvir תגובה 1 תגובה אחרונה תגובה ציטוט 0
          • OdedDvir
            OdedDvir @אוריי נערך לאחרונה על ידי

            @אוריי אמר בהפעלת קוד vba באקסל דרך אקסס:

            יש לי קובץ אקסל שבו יש לי קוד vba להדפסה שלו.
            ואני רוצה דרך האקסס להדפיס ואפי' מבחינתי לא לפתוח את האקסל בכלל (אם אפשרי)

            תפרט יותר את הקוד שבאקסל, מה עשית לקוד שמצאת, ומה השגיאה

            אוריי תגובה 1 תגובה אחרונה תגובה ציטוט 1
            • אוריי
              אוריי @OdedDvir נערך לאחרונה על ידי

              @OdedDvir
              עשיתי את הקוד הזה

              Private Sub פקודה0_Click()
                  
                      Dim xl As Excel.Application
                  
                      Set xl = CreateObject("Excel.Application")
                 
                      xl.Visible = True
                
                      xl.Workbooks.Open "H:\לא להיכנס\מפת הספריות אקסל.xlsm", True, False
                  
                      xl.Run "ThisWorkbook.PrintLibrary1"
                 
                      Set xl = Nothing
                  
                  End Sub
              

              שיניתי את ההפניה לקובץ בשורה 9 ואת השם של הקוד שבשורה 11
              ומחזיר לי שגיאה כזו

              a7ba8028-80fc-4c16-9829-c8317a8b38c4-image.png
              שניראת אפי' לא קשורה להפניות אלא לשגיאה אחרת בקוד

              ניתן לפנות אלי גם ב al0548446188@gmail.com
              ותמיד... אבל תמיד תוכלו לשאול אותי ב :) כאן שאלות באקסל

              OdedDvir תגובה 1 תגובה אחרונה תגובה ציטוט 0
              • OdedDvir
                OdedDvir @אוריי נערך לאחרונה על ידי

                @אוריי תשנה את שורה 3 ל:

                Dim xl As Object
                
                אוריי תגובה 1 תגובה אחרונה תגובה ציטוט 1
                • אוריי
                  אוריי @OdedDvir נערך לאחרונה על ידי

                  @OdedDvir אמר בהפעלת קוד vba באקסל דרך אקסס:

                  Dim xl As Object

                  תודה
                  הוא עובר את זה אבל נתקע במאקרו עם שגיאה כזו
                  9893865a-ebc9-4234-be73-e8ee847dc996-image.png

                  ניתן לפנות אלי גם ב al0548446188@gmail.com
                  ותמיד... אבל תמיד תוכלו לשאול אותי ב :) כאן שאלות באקסל

                  OdedDvir תגובה 1 תגובה אחרונה תגובה ציטוט 0
                  • OdedDvir
                    OdedDvir @אוריי נערך לאחרונה על ידי

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

                    אוריי תגובה 1 תגובה אחרונה תגובה ציטוט 1
                    • אוריי
                      אוריי @OdedDvir נערך לאחרונה על ידי

                      @OdedDvir
                      תודה
                      עכשיו עובד
                      אבל זו לא הייתה הבעיה לי היתה שגיאת הקלדה בשם הקוד והוא לא מצא את את מה להריץ

                      עוד שני שאלות בנידון הזה

                      1. האם ישנה אפשרות להריץ את הקוד בלי לפתוח את האקסל (או לכל הפחות שלא יראו אותו).
                      2. לגבי ההפניה של הקוד לעבר מיקום הקובץ יש לי בעיה קטנה כי לפעמים אני מעביר את הקובץ ממחשב למחשב ואני רוצה שהוא יעבוד רק מה שקורה הוא שאני צריך לשנות בתוך הקוד את ההפניה כעת יש לי קובץ של דטא שבו יש לי טבלאות מקושרות כעת אני רוצה לדעת האם במקום הקוד של ההפניה אני כותב לו שיחפש בתוך התקיה ששם הדטא נמצאת את קובץ אקסל בשם XXXXX כך בכל פעם שאני יעתיק את הקובץ למחשב אחר ברגע שאני יעדכן את מיקום הדטא יתעדכן גם מיקום הקובץ?
                        מקווה שהובנתי היטב..

                      ניתן לפנות אלי גם ב al0548446188@gmail.com
                      ותמיד... אבל תמיד תוכלו לשאול אותי ב :) כאן שאלות באקסל

                      OdedDvir תגובה 1 תגובה אחרונה תגובה ציטוט 0
                      • OdedDvir
                        OdedDvir @אוריי נערך לאחרונה על ידי OdedDvir

                        @אוריי אמר בהפעלת קוד vba באקסל דרך אקסס:

                        האם ישנה אפשרות להריץ את הקוד בלי לפתוח את האקסל (או לכל הפחות שלא יראו אותו).

                        כן, תשנה את שורה 7 ל:

                        xl.Visible = False
                        

                        או שפשוט תמחק אותה, כמדומני שברירת המחדל היא לא להציג את הקובץ

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

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

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

                        Dim xlFilePath As String
                        xlFilePath = CurrentProject.Path & "\" & "שם הקובץ שלך.xlsm"
                        xl.Workbooks.Open xlFilePath, True, False
                        אוריי 3 תגובות תגובה אחרונה תגובה ציטוט 1
                        • אוריי
                          אוריי @OdedDvir נערך לאחרונה על ידי

                          @OdedDvir
                          תודה עובד מעולה 👍 👍 👍

                          ניתן לפנות אלי גם ב al0548446188@gmail.com
                          ותמיד... אבל תמיד תוכלו לשאול אותי ב :) כאן שאלות באקסל

                          תגובה 1 תגובה אחרונה תגובה ציטוט 0
                          • אוריי
                            אוריי @OdedDvir נערך לאחרונה על ידי

                            @OdedDvir אמר בהפעלת קוד vba באקסל דרך אקסס:

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

                            לזה בדיוק התכוונתי
                            אבל צריך לשים לב שבאקסל מותאם לvba הסיומת היא .xlsm ולא .xlsx כך שבמצב כזה הוא לא יקרא אותו
                            מוזר מאד שבהתחלה זה עבד לי גם כאשר הסיומת הייתה .xlsx אבל כאשר השתמשתי עם הקוד הזה הוא דורש דווקא סיומת של .xlsm

                            ניתן לפנות אלי גם ב al0548446188@gmail.com
                            ותמיד... אבל תמיד תוכלו לשאול אותי ב :) כאן שאלות באקסל

                            OdedDvir תגובה 1 תגובה אחרונה תגובה ציטוט 0
                            • OdedDvir
                              OdedDvir @אוריי נערך לאחרונה על ידי

                              @אוריי אמר בהפעלת קוד vba באקסל דרך אקסס:

                              אבל צריך לשים לב שבאקסל מותאם לvba הסיומת היא .xlsm ולא .xlsx כך שבמצב כזה הוא לא יקרא אותו

                              נכון, אני אערוך את המקור למעלה

                              מוזר מאד שבהתחלה זה עבד לי גם כאשר הסיומת הייתה .xlsx אבל כאשר השתמשתי עם הקוד הזה הוא דורש דווקא סיומת של .xlsm

                              גם אצלך (בצילום מסך למעלה) כתוב .xlsm

                              אוריי תגובה 1 תגובה אחרונה תגובה ציטוט 1
                              • אוריי
                                אוריי @OdedDvir נערך לאחרונה על ידי אוריי

                                @OdedDvir אמר בהפעלת קוד vba באקסל דרך אקסס:

                                גם אצלך (בצילום מסך למעלה) כתוב .xlsm

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

                                ניתן לפנות אלי גם ב al0548446188@gmail.com
                                ותמיד... אבל תמיד תוכלו לשאול אותי ב :) כאן שאלות באקסל

                                תגובה 1 תגובה אחרונה תגובה ציטוט 0
                                • אוריי
                                  אוריי @OdedDvir נערך לאחרונה על ידי

                                  @OdedDvir
                                  ראוי לציין שאופציה הזו היא מאד שימושית כאשר אני בונה תוכנה באקסס ויש לי מלא קבצים נלווים אני שם אותם בתוך תיקיה היכן שהקובץ דטא מוסיף לקוד הזה את ההפניה היחסית מהדטא וכך כל פעם שמעדכנים את התוכנה הכל מתעדכן
                                  👍 👍 👍

                                  ניתן לפנות אלי גם ב al0548446188@gmail.com
                                  ותמיד... אבל תמיד תוכלו לשאול אותי ב :) כאן שאלות באקסל

                                  תגובה 1 תגובה אחרונה תגובה ציטוט 1
                                  • 1 / 1
                                  • פוסט ראשון
                                    פוסט אחרון
                                  בא תתחבר לדף היומי!