Hello everyone!
Im trying to really develop some skills in VB so I may have some follow up questions as to how a bit of code works.
Right now I'm working on a project to open all workbooks in a folder (the folder will change on a daily basis and the amount of workbooks in each folder will vary too). Eventually I'll have it make certain changes in each workbook.
But for right now I have
Sub combine()
Dim directory As String
Dim foldername As String
Dim fldrobj As FileSystemObject
Dim fileobj As FileSystemObject
foldername = Format(DateTime.Now, "yyyymmdd")
directory = "C:\combiner\"
Set fldrobj = FileSystemObject.GetFolder(directory & foldername)
For Each fileobj In fldrobj.Files
Application.Workbooks.Open (fileobj)
Next
End Sub
One issue I have is that the ".Files" method in the For each Loop is not available. I see other similar Subs out there that utilize this method but for some reason I dont have it. Is there some other type of fileobject that will allow me to run this for each loop?
I also have the microsoft striplet library imported
Bookmarks