B
BZeyger
I have a macro that gathers information from the second row of other excel
sheets and puts that information all into one file. It inserts that
information into columns A,B, and C of a new excell sheet.
For example:
Folder: C:/test contains numerious excel files that hold infromation in the
first two columns.
When I run the macro, A new sheet is created with the infromation from the
columns populated into the first 3 columns. I would like it populted into
columns D,E, and F.
A B C
1 File1 2007 $1234
2 File2 2007 $5246
3 File3 2007 $2456
4 File4 2007 $299
The Macro Code:
Sub RDB_Merge_Data()
Get_File_Names _
MyPath:="C:\test", _
Subfolders:=False, _
ExtStr:="*.xl*"
If fnum = 0 Then Exit Sub
Get_Data _
FileNameInA:=True, _
PasteAsValues:=True, _
SourceShName:="", _
SourceShIndex:=1, _
SourceRng:="A2:b1", _
StartCell:=""
End Sub
sheets and puts that information all into one file. It inserts that
information into columns A,B, and C of a new excell sheet.
For example:
Folder: C:/test contains numerious excel files that hold infromation in the
first two columns.
When I run the macro, A new sheet is created with the infromation from the
columns populated into the first 3 columns. I would like it populted into
columns D,E, and F.
A B C
1 File1 2007 $1234
2 File2 2007 $5246
3 File3 2007 $2456
4 File4 2007 $299
The Macro Code:
Sub RDB_Merge_Data()
Get_File_Names _
MyPath:="C:\test", _
Subfolders:=False, _
ExtStr:="*.xl*"
If fnum = 0 Then Exit Sub
Get_Data _
FileNameInA:=True, _
PasteAsValues:=True, _
SourceShName:="", _
SourceShIndex:=1, _
SourceRng:="A2:b1", _
StartCell:=""
End Sub