I have code
' Copy additional files for Email
Dim EDir2 As String
EDir2 = Sheet7.Range("av2").Value
On Error Resume Next
'fso.CopyFile EDir2 & "\*_Surveys.xls", TempDir
'fso.CopyFile EDir2 & "\*_1inMD.pdf", TempDir
'fso.CopyFile EDir2 & "\*_1inTVD.pdf", TempDir
fso.CopyFile EDir2 & "\*_5inMD.pdf", TempDir
fso.CopyFile EDir2 & "\*_5inTVD.pdf", TempDir
fso.CopyFile EDir2 & "\*_LAS Export.las", TempDir
'fso.CopyFile EDir2 & "\*_SVY_LAS.las", TempDir
you can see I have some commented out and some not.
What I would like to know is can you run a macro that would ask questions about each 6 lines and depending on your answer it would either comment it out or leave it un commented.
I alter this file manually every time but wondering if I could have a setup macro that would allow other users to do the same without looking at the code itself
Bookmarks