Syntax for looping through all xl files in a folder

[ShaneDevenshire]

Hi Folks,

On the PC if you want to increment through all the Excel files in a folder
you would use something like:

myFile = Dir("C:\Data\*.xls")
Do Until myFile = ""
...
myFile = Dir
Loop

What is the equivalent code on the Mac?

TIA,
Shane Devenshire

 

[JE McGimpsey]

Hi Folks,

On the PC if you want to increment through all the Excel files in a folder
you would use something like:

myFile = Dir("C:\Data\*.xls")
Do Until myFile = ""
...
myFile = Dir
Loop

What is the equivalent code on the Mac?

MacXL/VBA Help has a pretty good description of Dir() and the
differences between Mac and WinXL.

Essentially, you change

myFile = Dir("C:\Data\*.xls")

To

myFile = Dir(<path>, MacID("XLS8"))

Make sure the <path> ends with the path separator ).

 

[ShaneDevenshire]

Hi JE,

It was the ":" at the end of the path that caused it to fail.