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

@dovid @OdedDvir הרבה תודה על העזרה פשוט נפתרה הבעיה ב"ה (את האמת גם אני לא יודע למה אבל משום מה הכל הסתדר)....

@odeddvir צודק לא שמתי לב...

@אוריי [image: 1622815837310-35749ee5-67bd-4057-8ca5-c36b80faa033-image.png] תשנה את ה self contained ל platform dependent וזה יעבוד

מצאתי את הבעיה היא הייתה בשורה הזו (שורה 7) DisplayText = DisplayText & Result(i) & vbNewLine החלפתי את vbNewLine ל Chr(10) וזה עובד מעולה התוצאה הסופית היא Dim TextStrng As String Dim Result() As String Dim DisplayText As String TextStrng = Range("a1").Value Result = Split(TextStrng, ";", 1000) For i = LBound(Result()) To UBound(Result()) DisplayText = DisplayText & Result(i) & Chr(10) Next i MsgBox DisplayText Range("b1").Value = DisplayText

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

@אוריי אתה צריך פסיק מפריד בין שורה 5 ל6 אני מתחבר למה ש @dovid כתב לך למעלה @dovid אמר בעזרה | כתיבת נתונים בקובץ CSV ע"י #C: כלומר אם מדובר בהוספה של נתון אחד + תאריך שעה, שקול לכתוב פשוט יותר ככה: File.AppendAllText(@"Privimail\log.csv", DateTime.Now + "," + Seconds + "\n"); (אולי לא צריך פסיק אחרי התאריך).

@aharon-0 תותח עובד מעולה

@אוריי דוגמא שמצאתי באינטרנט(אני מסמארטפון וקשה להקליד): Process scriptProc = new Process(); scriptProc.StartInfo.FileName = @"cscript"; scriptProc.StartInfo.WorkingDirectory = @"c:\scripts"; //<---very important scriptProc.StartInfo.Arguments ="//B //Nologo vbscript.vbs"; scriptProc.StartInfo.WindowStyle = ProcessWindowStyle.Hidden; //prevent console window from popping up scriptProc.Start(); scriptProc.WaitForExit(); // <-- Optional if you want program running until your script exit scriptProc.Close עדיין חסר בדיקת ExitCode שאתה יכול להחזיר מ VBS שאומר אם ההרצה נכשלה או הצליחה. ואפשר להוסיף קריאה של הדפסות ל console שתוכל לטפל באירועים.

@shraga עדיין לא עובד...

@dovid לא פספסתי את המילים האלו. ולזה התכוונתי.

@zvinissim נקודה אחרי Me ייתן לך גם את שמות הפקדים - ובדיוק על זה דבריו של @OdedDvir

@odeddvir אמר בעזרה באקסס | שגיאה 13 אי התאמת נתונים: שאלת תם, תמהני, מה התועלת שאתה משיג ב: Like ' * ' אם להסיר רווחים - תשתמש בפונקציה Trim() א. תודה רבה זה פתר את השגיאה ב. באמת זה לא עזר לי תכלס טעיתי קצת בקוד אבל ב"ה הסתדר.. הייתי צריך לכתוב Is Not Null במקום Like ' * ' @OdedDvir הרבה תודה

@אוריי בעיצוב דוח > הגדרת עמוד > עמודות > תבחר שתי עמודות. שים לב שהאחריות עליך לעצב את הדוח ברוחב ובגובה המתאים כך שיכנס לך 4 בדף. דוגמא: [image: 1609363174871-e4916f1d-99c2-468c-a79c-65f8628d5b01-%D7%AA%D7%9E%D7%95%D7%A0%D7%94.png]

@www אגב, המונח שאנו עוסקים בו נקרא Short-circuit evaluation. לצערי הוא לא קיים בשפת VBA. תמיד שני הצדדים יחושבו, דהיינו גם אם a = 1 עדיין תבוצע ההשוואה האם b=1 למרות שהתנאי הוא or והתוצאה היא ודאי אמת.

@אוריי הוא בסך הכל כותב לך שחלק מסוים של ההתקנה דורש הפעלה מחדש (בטח איזה פריימוורק) ואז תמשיך את ההקתנה שוב. עברית? לא חושב

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

אפשרי עם EVERYTHING לוחצים על התיקיה לחצן ימיני>search everything או שמעתיקים את הנתב לשורת החיפוש אך יש להוסיף " לפני ואחרי בחלון למטה של EVERYTHING הוא יציג רק את הקבצים שבתיקיה ללחוץ קובץ>ייצוא>אישור

@yair-na שים לב! באחד התמונות מופיע מס' טלפון שלך. אם אתה לא מוצא תוכל לכתוב לי במייל WWW.netfree@gmail.com

@אוריי אמר באובייקט popup בלי להציג כפתור אישור: ואני יוכל להריץ קוד תוך כדי שאובייקט פתוח? אם הטופס לא מוגדר כמודאלי - הקוד שכתוב לאחר פתיחת הטופס ירוץ ממילא. אם הטופס מוגדר כמודאלי - תוכל להריץ את הקוד המדובר מתוך הטופס, או כאפשרות מתקדמת יותר - על ידי שימוש בארועים (Events) וכך לא תצטרך לשים שום קוד בטופס עצמו, אלא תבצע קריאה לארוע לפני פתיחת הטופס.