Bonjour le forum,
un petit conseil sur la modification d'un de mes codes :
le code avant :
le code après :
dans le code suivant j'ai du mal à adapter la meme chose soit integrer Chem au lieu de "D:\devis\", sans faire d'erreur :
Merci à tous,
géraldine
un petit conseil sur la modification d'un de mes codes :
le code avant :
Code:
Direction = Dir("d:\DEVIS\*.xls")
le code après :
Code:
Chem = Sheets("Accueil").Range("A19") ' est égal à d:\devis\
Direction = Dir(Chem & "*.xls")
dans le code suivant j'ai du mal à adapter la meme chose soit integrer Chem au lieu de "D:\devis\", sans faire d'erreur :
Code:
.Formula = "='D:\DEVIS\[" & tableau(x) & "]ADMIN" & "'!" & "B6"
Merci à tous,
géraldine