Erreur chemin (path)

Bonjour,

Le code ci-dessous me donne l'erreur suivante : "Path not found"

MkDir (ActiveWorkbook.Path & "\" & Sheets("Main").Range("g4").Value)

Une idée?

La cellule G4 de la feuille "Main" est la copie de la cellule G3 (date de demain) formattée en AAMMJJ (pour diverses raisons)

Merci de votre attention

Jeepee

bonjour,

remplace .value par .text pour garder le format de ta cellule G4.

merci de ton aide, mais malheureusement, je reçois l'erreur suivante :

Run-time error '438':

Object doesn't support this property or method

Jeepee

bonjour,

peux-tu mettre ton code?

Voici

Sub Military_activities()

MkDir (ActiveWorkbook.Path & "\" & Range("g4").txt)

Worksheets("Mil Act").Activate

End Sub

bonjour,

.text et non .txt !

oups, pas frapper, pas frapper !!

mais oui, bien vu, et mille merci!!

Je progresse, enfin, tu me fais progresser

Jeepee