משפחה של תוכנת גליונות אלקטרוניים של Microsoft עם כלים לניתוח, יצירת תרשימים והעברת נתונים.
היי
השמות של הקבצים שאני רוצה להעתיק נמצאים בתיקייה אחת ובלי תת תיקיות
אם כך, העתק והדבק את המקרו שלהלן לתוך מודול והרץ אותו.
*** המקרו יציג, בעמודה "A", את כל הקבצים השמוירם בתיקייה TEMP שבכונן C.* בפקודה DIRECTORY תוכל להשנות את הנתיב, שבתוך הגרשיים, לנתיב הדרוש לך.**Sub File_List()
Columns(1).ClearContents
RW = 1
**Directory = "C:\TEMP"**FName = Dir(Directory & "", vbHidden + vbSystem + vbReadOnly + vbDirectory)
Do While FName <> ""
Cells(RW, 1) = FName
RW = RW + 1
FName = Dir
Loop
End Sub
אם תגובתי פתרה את בעיתך - לחץ/י נא בצד שמאל, למטה, על הכיתוב הלחיץ: סמן כתשובה **** מיכאל (מיקי) אבידן ****מנחה דיון בפורומי TechNet ו-Answers של 'מיקרוסופט' ומנהל פורום 'אופיס' ב'תפוז'.
2009-2013 (Microsoft® Most Valuable Professional(MVP