Sujet Précédent Sujet Suivant

Excel - VBA - TempfileName

Fermé
Misterbean1 Messages postés 53 Date d'inscription vendredi 13 mai 2011 Statut Membre Dernière intervention 22 août 2017 - 5 janv. 2015 à 14:35
eriiic Messages postés 24572 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 22 mai 2024 - 5 janv. 2015 à 16:59
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 24572 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 22 mai 2024 7 217
5 janv. 2015 à 16:59
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