La maccro en question permet via un userform de parcourir les dossier et sélectionner un fichier puis d'y appliquer des modifications. Le chemin complet du fichier sélectionné s'inscrit dans Textbox1
J'aimerais qu'une fois toutes les modifications effectuées, le fichier ouvert soit enregistré sous le même dossier que le fichier d'origine et avec le même nom + un numéro de version à la fin.
Nom du fichier avant modifications:
D:Documents and SettingsBureauDossier1Fichier de test.xls
Nom de la copie de fichier après modifications:
D:Documents and SettingsBureauDossier1Fichier de test_v2.0.xls
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
thainz
Le mardi 04 Août 2015 à 09:59 par ThainZ :
Bonjour,
La maccro en question permet via un userform de parcourir les dossier et sélectionner un fichier puis d'y appliquer des modifications. Le chemin complet du fichier sélectionné s'inscrit dans Textbox1
J'aimerais qu'une fois toutes les modifications effectuées, le fichier ouvert soit enregistré sous le même dossier que le fichier d'origine et avec le même nom + un numéro de version à la fin.
Nom du fichier avant modifications: D:Documents and SettingsBureauDossier1Fichier de test.xls
Nom de la copie de fichier après modifications: D:Documents and SettingsBureauDossier1Fichier de test_v2.0.xls
ça enregistre un fichier sans format avec le nom: "Fichier de test.xls_v2
Le mardi 04 Août 2015 à 09:59 par ThainZ :
Bonjour,
La maccro en question permet via un userform de parcourir les dossier et
sélectionner un fichier puis d'y appliquer des modifications. Le chemin
complet du fichier sélectionné s'inscrit dans Textbox1
J'aimerais qu'une fois toutes les modifications effectuées, le fichier
ouvert soit enregistré sous le même dossier que le fichier
d'origine et avec le même nom + un numéro de version à la
fin.
Nom du fichier avant modifications:
D:Documents and SettingsBureauDossier1Fichier de test.xls
Nom de la copie de fichier après modifications:
D:Documents and SettingsBureauDossier1Fichier de test_v2.0.xls
La maccro en question permet via un userform de parcourir les dossier et sélectionner un fichier puis d'y appliquer des modifications. Le chemin complet du fichier sélectionné s'inscrit dans Textbox1
J'aimerais qu'une fois toutes les modifications effectuées, le fichier ouvert soit enregistré sous le même dossier que le fichier d'origine et avec le même nom + un numéro de version à la fin.
Nom du fichier avant modifications: D:Documents and SettingsBureauDossier1Fichier de test.xls
Nom de la copie de fichier après modifications: D:Documents and SettingsBureauDossier1Fichier de test_v2.0.xls
ça enregistre un fichier sans format avec le nom: "Fichier de test.xls_v2
Bonjour, Est-ce que ton classeur a été enregistré au moins une fois avant le SaveAs ? Est-ce que tu veux bien dire que le classeur a été enregistré sans extension ? Quelle est ta version d'Excel ? Essaie d'ajouter un paramètre "fileformat" : ActiveWorkbook.SaveAs ActiveWorkbook.Name & "_V2", xlOpenXMLWorkbook Cordialement. Daniel
ça enregistre un fichier sans format avec le nom: "Fichier de test.xls_v2
Bonjour,
Est-ce que ton classeur a été enregistré au moins une fois avant le
SaveAs ? Est-ce que tu veux bien dire que le classeur a été enregistré
sans extension ? Quelle est ta version d'Excel ? Essaie d'ajouter un
paramètre "fileformat" :
ActiveWorkbook.SaveAs ActiveWorkbook.Name & "_V2", xlOpenXMLWorkbook
Cordialement.
Daniel
ça enregistre un fichier sans format avec le nom: "Fichier de test.xls_v2
Bonjour, Est-ce que ton classeur a été enregistré au moins une fois avant le SaveAs ? Est-ce que tu veux bien dire que le classeur a été enregistré sans extension ? Quelle est ta version d'Excel ? Essaie d'ajouter un paramètre "fileformat" : ActiveWorkbook.SaveAs ActiveWorkbook.Name & "_V2", xlOpenXMLWorkbook Cordialement. Daniel
thainz
Le mardi 04 Août 2015 à 09:59 par ThainZ :
Bonjour,
La maccro en question permet via un userform de parcourir les dossier et sélectionner un fichier puis d'y appliquer des modifications. Le chemin complet du fichier sélectionné s'inscrit dans Textbox1
J'aimerais qu'une fois toutes les modifications effectuées, le fichier ouvert soit enregistré sous le même dossier que le fichier d'origine et avec le même nom + un numéro de version à la fin.
Nom du fichier avant modifications: D:Documents and SettingsBureauDossier1Fichier de test.xls
Nom de la copie de fichier après modifications: D:Documents and SettingsBureauDossier1Fichier de test_v2.0.xls
Merci pour votre aide
Bonjour Daniel,
Apparement ma réponse n'es pas apparue sur le forum :(.
J'ai réussi en faisant:
Dim File_name2 As String File_name2 = Left(ActiveWorkbook.FullName, InStrRev(ActiveWorkbook.FullName, ".") - 1) & "_v2.xls" ActiveWorkbook.SaveAs (File_name2)
Le mardi 04 Août 2015 à 09:59 par ThainZ :
Bonjour,
La maccro en question permet via un userform de parcourir les dossier et
sélectionner un fichier puis d'y appliquer des modifications. Le chemin
complet du fichier sélectionné s'inscrit dans Textbox1
J'aimerais qu'une fois toutes les modifications effectuées, le fichier
ouvert soit enregistré sous le même dossier que le fichier
d'origine et avec le même nom + un numéro de version à la
fin.
Nom du fichier avant modifications:
D:Documents and SettingsBureauDossier1Fichier de test.xls
Nom de la copie de fichier après modifications:
D:Documents and SettingsBureauDossier1Fichier de test_v2.0.xls
Merci pour votre aide
Bonjour Daniel,
Apparement ma réponse n'es pas apparue sur le forum :(.
J'ai réussi en faisant:
Dim File_name2 As String
File_name2 = Left(ActiveWorkbook.FullName, InStrRev(ActiveWorkbook.FullName, ".") - 1) & "_v2.xls"
ActiveWorkbook.SaveAs (File_name2)
La maccro en question permet via un userform de parcourir les dossier et sélectionner un fichier puis d'y appliquer des modifications. Le chemin complet du fichier sélectionné s'inscrit dans Textbox1
J'aimerais qu'une fois toutes les modifications effectuées, le fichier ouvert soit enregistré sous le même dossier que le fichier d'origine et avec le même nom + un numéro de version à la fin.
Nom du fichier avant modifications: D:Documents and SettingsBureauDossier1Fichier de test.xls
Nom de la copie de fichier après modifications: D:Documents and SettingsBureauDossier1Fichier de test_v2.0.xls
Merci pour votre aide
Bonjour Daniel,
Apparement ma réponse n'es pas apparue sur le forum :(.
J'ai réussi en faisant:
Dim File_name2 As String File_name2 = Left(ActiveWorkbook.FullName, InStrRev(ActiveWorkbook.FullName, ".") - 1) & "_v2.xls" ActiveWorkbook.SaveAs (File_name2)