macro om data uit andere excelbestanden samen te voegen

[Kristinho1978]

Ah ik heb 'm alweer denk ik

.Sheets(1).Columns("A:BW").EntireColumn.Hidden = False

werkt

 

[snb]

mijn voorkeur:

sheets(1).columns.hidden=false

 

[Kristinho1978]

ah ja, thanks, dat is inderdaad wel beter misschien

 

[Kristinho1978]

Nog iets kleins, hoop ik

Kan ik via de macro, naast de naam van het bestand en de naam van de map, ook de datum + tijd ophalen waarop het bestand is opgeslagen?
Hoe zou ik dat moeten doen?

 

[Kristinho1978]

kolom BZ moet iets vergelijkbaars zijn met kolom BX lijkt me...

Kolom BX geeft de file aan:
.Cells(rw, 76).Resize(.Cells(Rows.Count, 1).End(xlUp).Offset(1).Row - rw) = Split(fl, "\")(UBound(Split(fl, "\")))

Dus als ik in kolom BZ de datum van de file wil zien, dan moet het iets worden van...
.Cells(rw, 78).Resize(.Cells(Rows.Count, 1).End(xlUp).Offset(1).Row - rw) = FileDateTime(Path,"\",...)
Ik kan niet gewoon Split(fl, "\")(UBound(Split(fl, "\")) op de puntjes zetten volgens mij, wel?

 

[snb]

dit lijkt me voldoende

.Cells(rw, 78)= FileDateTime(fl)

 

[Kristinho1978]

uitstekend, thanks