Opgelost Opdracht "Dir" werkt niet

[DutchOirs]

Goedemiddag,
Ben bezig een excel 2003 file om te zetten naar excel 2019.
Kom toch wel veranderingen tegen waar ik even niet uit kom.
BV. de opdracht Dir.
Deze werkt perfect onder 2003, maar onder 2019 geeft ie niets weer??
Heb even een test file gemaakt. Onder wb. Control staat de testknop.
Wat doe ik fout?

Iemand een idee?

Thanks already

Dutch

 

[edmoor]

Werkt hier prima.
Krijg je een foutmelding?

 

[DutchOirs]

Krijg geen foutmelding, maar

krijg als 1e WrdBestand = met Path en Naam en Extensie = dus goed
als 2e Dir(WrdBestand = NIETS = klopt niet
als 3e "#11 Dit Basis Updating File bestaat niet! Overnieuw" = klopt niet
en dit klopt niet want het file staat er wel

2e zou dus het path met naam en extensie moeten weergeven

 

[edmoor]

Wat ik al zei, de Dir opdracht werkt hier zonder enig probleem.

 

[AHulpje]

edmoor heeft gelijk, maar zoek de verschillen (doc versus docm?):

"Update #" & ActiveWorkbook.Worksheets("Control").Range("C12") - 1 & ".doc"

"Update #" & .Range("C12") - 1 & ".docm"

 

[DutchOirs]

Opgelost.
zat hem dus in het Path. ergens iets fout,
geeft nu de naam met extensie

top, bedankt voor het meedeneken./

Dutch