מעבר לתוכן


מיכאל (מיקי) אבידן - MVP

הצטרף: 26/11/2013
לא מחובר נראה לאחרונה: 01/12/2013 - 16:59
-----

הודעות שכתבתי

בשרשור: שאלה באקסל למתקדמים ותותחים

26/11/2013 - 21:43

שלום לכולם,

מסתבר שהאתר לא מיודד [בלשון המעטה] עם הדפדפן החדש IE11.

אני מציג, להלן, פקודה אחת בודדת המבצעת את אשר ביקש השואל [נבדקה ופועלת היטב החל מגרסת 'אקסל '2003 ואילך].

אני מניח ומקווה שלמרות שחלפו 3.5 שנים מהצגת השאלה - הפיתרון, שלהלן, יעזור לאחרים.

מדובר במקרו אירוע ה"מוצת" רק כשמוקלד משהו ו/או מבוצע שינוי בערכו של תא B1 בגיליון האמור.
 
 

(Private Sub Worksheet_Change(ByVal Target As Range
    If Target = [B1] Then MkDir CreateObject("Wscript.Shell").SpecialFolders("Desktop") & "\" & [B1]  
End Sub