| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
help on creating five folders
Private Sub Folders_Click()
MkDir "C:\\Globe Photo Engraving\Jobs\" & Range("C3").Value MkDir "C:\\Globe Photo Engraving\Jobs\" & Range("C3").Value \ ART MkDir "C:\\Globe Photo Engraving\Jobs\" & Range("C3").Value \ GCODE MkDir "C:\\Globe Photo Engraving\Jobs\" & Range("C3").Value \ LG1 MkDir "C:\\Globe Photo Engraving\Jobs\" & Range("C3").Value \ LG3 MkDir "C:\\Globe Photo Engraving\Jobs\" & Range("C3").Value \ LR2 End Sub C:\Globe Photo Engraving\Jobs\("C3")\ART G-CODE LG1 LG3 LR2 |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
help on creating five folders
Drop one of the backslashes after the drive letter and put the last subfolder
name in double quotes: MkDir "C:\Globe Photo Engraving\Jobs\" & Range("C3").Value & "\ART" David Shoemaker wrote: Private Sub Folders_Click() MkDir "C:\\Globe Photo Engraving\Jobs\" & Range("C3").Value MkDir "C:\\Globe Photo Engraving\Jobs\" & Range("C3").Value \ ART MkDir "C:\\Globe Photo Engraving\Jobs\" & Range("C3").Value \ GCODE MkDir "C:\\Globe Photo Engraving\Jobs\" & Range("C3").Value \ LG1 MkDir "C:\\Globe Photo Engraving\Jobs\" & Range("C3").Value \ LG3 MkDir "C:\\Globe Photo Engraving\Jobs\" & Range("C3").Value \ LR2 End Sub C:\Globe Photo Engraving\Jobs\("C3")\ART G-CODE LG1 LG3 LR2 -- Dave Peterson |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Creating folders | Excel Programming | |||
| Creating List From Folders | Excel Programming | |||
| Help with Creating folders on Save | Excel Discussion (Misc queries) | |||
| Creating folders using VBA | Excel Programming | |||
| Creating folders with VB | Excel Programming | |||
Hybrid Mode
