Cel verwijzing in Macro

[Tetaphidoep]

Hallo allemaal,

Ik heb een macro die automatisch een map aanmaakt:

If Len(Dir("D:\Voorraadadministratie" & Range("O18"), vbDirectory)) = 0 Then
MkDir "D:\Voorraadadministratie" & Range("O18")

- De inhoud van de cel waar naar verwezen wordt is variabel
- de cel ("O18") bevat de volgende formule:
=TEKST.SAMENVOEGEN(O18;" ";F14;" ";O17) , (kan ook met O18&F14&O17)

Nu gaat het fout bij het maken van een nieuw bestand, hij kan dan het pad net vinden.
Als je naar een niet samengestelde cel verwijsd dan gaat het wel goed, maar is de definiëring van het nieuwe bestand niet goed.

Wie weet er een oplossing

Alvast bedankt, met groet Wim

 

[edmoor]

In een formule in O18 kan je nooit naar O18 verwijzen.
Dat is een kruisverwijzing.

 

[SjonR]

Dus geen formule

 

[Tetaphidoep]

Foutje in de omschrijving, moet zijn:

If Len(Dir("D:\Voorraadadministratie" & Range("W18"), vbDirectory)) = 0 Then
MkDir "D:\Voorraadadministratie" & Range("W18")

 

[edmoor]

Moet er niet een \ achter D:\Voorraadadministratie staan?
Bestaat die map al wel?
Wat staat er precies in W18 als het fout gaat?

 

[VenA]

En we mogen gokken wat er in W18 komt te staan? Waarschijnlijk mis je een \.

 

[Tetaphidoep]

De \ moe er wel bij maar veroorzaakt niet de fout

De map Voorraadadministratie bestaat inderdaad al.

In de cel W18 staat de verwijzing naar drie andere cellen:

=TEKST.SAMENVOEGEN(O18;" ";F14;" ";O17) , (kan ook met O18&F14&O17)

Dit is nodig om het nieuwe bestand de juiste naam te geven.

 

[edmoor]

Dat snappen we uiteraard wel.
Maar hoe ziet die naam eruit als het fout gaat?
Letterlijk dus, oftewel, het resultaat van die formule.

 

[VenA]

En wat staat er dan in de cellen O18, F14 en O17? Heb je rekening gehouden met bepaalde tekens die niet in een bestandsnaam mogen?

 

[Tetaphidoep]

In de cellen O18, F14 en O17 staan waarde uit andere tabbladen of een som van een optelling, niets vreemds zou ik zeggen

 

[edmoor]

Dat is nog steeds geen antwoord op de vraag.
Ik vraag me af wat er zo moeilijk aan is.