קוד לסריקת מסמך - אקסס

[מלא 0]

יש למישהו?
שיהיה אפשרות לברירת מחדל,
ואם יש גם אפשרות לבחור סורק...

ניסיתי לשאול את הרב גוגל, והוא לא עונה רוצה לענות לי.

פורסם במקור בפורום CODE613 ב25/07/2016 16:09 (+03:00)

[ארכיטקט]

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

פורסם במקור בפורום CODE613 ב25/07/2016 19:33 (+03:00)

[מלא 0]

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

בנושא הזה הוא קצת מקשה עלי, אולי בגלל הבורות שלי בנושא.

הקוד הרצו"ב בקובץ המצורף קופץ לי עם שגיאות,
אולי אי מי יואיל לבדוק לי את זה...

Invoice.accdb

פורסם במקור בפורום CODE613 ב25/07/2016 19:47 (+03:00)

[מלא 0]

ואולי הקובץ הזה מתאים לזה?

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

Test.accdb

פורסם במקור בפורום CODE613 ב25/07/2016 21:19 (+03:00)

[chagold]

הקובץ מצויין למה שרצית.
תודה. זה מאד שימושי בשבילי.

פורסם במקור בפורום CODE613 ב25/07/2016 21:42 (+03:00)

[מלא 0]

איזה קובץ, טסט?
הוא מקפיץ לי שגיאה על המשתנה הזה Dim FSO As New FileSystemObject
ייתכן שזה לא מותאם ל2007?

---

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

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

פורסם במקור בפורום CODE613 ב25/07/2016 23:35 (+03:00)

[יעקב וויס]

חיפשתי סריקה לאקסל ומצאתי את
הוספתי את זה לקובץ אקסס
הסורק לא עובד אצלי אז לא בדקתי אותו לכאורה אמור לעבוד מצוין

סריקה.accdb

פורסם במקור בפורום CODE613 ב25/07/2016 23:38 (+03:00)

[מלא 0]

@בהצלחה

חיפשתי סריקה לאקסל ומצאתי את
הוספתי את זה לקובץ אקסס
הסורק לא עובד אצלי אז לא בדקתי אותו לכאורה אמור לעבוד מצוין

תודה רבה רבה.
עובד מצויין,

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

שוב, תודה רבה

פורסם במקור בפורום CODE613 ב25/07/2016 23:48 (+03:00)

[מלא 0]

הנה תשובה לשאלה האחרונה....

    .Properties("6146").Value = 1 '4 is Black-white,gray is 2, color 1 (Color Intent)

פורסם במקור בפורום CODE613 ב25/07/2016 23:51 (+03:00)

[מלא 0]

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

פורסם במקור בפורום CODE613 ב26/07/2016 16:33 (+03:00)

[מלא 0]

בינתיים קחו את זה...

סריקה.accdb

פורסם במקור בפורום CODE613 ב26/07/2016 18:35 (+03:00)

[chagold]

@מלא

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

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

פורסם במקור בפורום CODE613 ב26/07/2016 23:21 (+03:00)

[מלא 0]

@CHAGOLD

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

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

פורסם במקור בפורום CODE613 ב27/07/2016 12:44 (+03:00)

[מלא 0]

מצאתי את הצג
בקובץ המצורף זה עובד..

סריקה.accdb

פורסם במקור בפורום CODE613 ב27/07/2016 17:49 (+03:00)

[מלא 0]

מה זה השגיאה הזו שהוא מקפיץ לי?
האם זה קשור לביטים של המחשב?

שגיאת סורק.PNG

פורסם במקור בפורום CODE613 ב02/08/2016 14:37 (+03:00)

[יעקב וויס]

נראה לי שצריך לעשות רפרנס כמצו"ב

לכידה.JPG

פורסם במקור בפורום CODE613 ב02/08/2016 15:52 (+03:00)