Excel - VBA - TempfileName

Misterbean1 Messages postés 53 Date d'inscription   Statut Membre Dernière intervention   -  
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,
J'ai une macro qui permet à l'utilisateur de créer un fichier xlsx temporaire dont le nom est automatiquement défini en fonction du contenu de cellules (voir partie de code ci-dessous).
J'aimerais qu'il y a ai deux noms automatiquement utilisés, et ce, en fonction du contenu d'une cellule.
Càd si cellule B7=INFO1, le nom du fichier temporaire commencera par "Document1_" suivi du reste du code (voir ligne TempFileName) ci-dessous. Si la cellule B7=INFO2, le nom du fichier temporaire commencera par "Document2_" suivi du reste de code (Voir ligne TempFileName) ci-dessous.

Qq pourrait-il e dire comment adapter mon code (suis novice en VBA)
D'avance merci !!



TempFilePath = Environ$("temp") & "\"
TempFileName = "Document1_" & ActiveSheet.Range("B4") & "__" & ActiveSheet.Range("B7") & "__" & Format(Now, "dd-mmm-yy")
FileExtStr = ".xlsx": FileFormatNum = 51
A voir également:

1 réponse

Réponse 1 / 1
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 
Bonjour, 

TempFileName = "Document" & Right([B7], 1) & "_" & ActiveSheet.Range("B4") & "__" & ActiveSheet.Range("B7") & "__" & Format(Now, "dd-mmm-yy")

eric

PS: pense à utiliser la mise en forme du code avec l'icone <>
0