Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel création nouveau dossier tous les débuts de mois

création nouveau dossier tous les débuts de mois

2 réponses
Avatar
sice42
Bonjour cette macro ci dessous me permet de cr=E9er un nouveau dossier ,
seulement je voudrais qu'elle reprenne la valeur exacte de MoisJour et
YearJour, pour ne pas avoir =E0 changer manuellement cette partie du
code tous les d=E9buts de mois. Est ce possible ? Elle reprend
textuellement le mot MoisJour&YearJour au lieu de prendre par ex:
1006.
Sub dossier()
DateJour =3D Range("Jour")
MoisJour =3D Right(Left(DateJour, 5), 2)
YearJour =3D Right(DateJour, 2)
MkDir "C:\Mesdocuments\Toto\Position\MoisJour&YearJour"


Merci d'avance
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
JLuc
avait soumis l'idée :
MkDir "C:MesdocumentsTotoPositionMoisJour&YearJour"


MkDir "C:MesdocumentsTotoPosition" & MoisJour & YearJour

--
JLuc

Avatar
Youky
Sub dossier()
MkDir "C:MesdocumentsTotoPosition" _
& Month(Now) & Right(Year(Now), 2)

Youky

a écrit dans le message de news:

Bonjour cette macro ci dessous me permet de créer un nouveau dossier ,
seulement je voudrais qu'elle reprenne la valeur exacte de MoisJour et
YearJour, pour ne pas avoir à changer manuellement cette partie du
code tous les débuts de mois. Est ce possible ? Elle reprend
textuellement le mot MoisJour&YearJour au lieu de prendre par ex:
1006.
Sub dossier()
DateJour = Range("Jour")
MoisJour = Right(Left(DateJour, 5), 2)
YearJour = Right(DateJour, 2)
MkDir "C:MesdocumentsTotoPositionMoisJour&YearJour"


Merci d'avance