Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Enregistrer sous

Enregistrer sous

2 réponses
Avatar
Sunburn
Bonjour,
je souhaite enregistrer mon fichier par macro, en utilisant la valeur d'une
cellule (cette cellule G5 est une formule = concatener(H1;" ";H6))
j'ai cette macro, mais comment spécifier l'onglet sur lequel il va trouver
cette cellule G5 ?
merci.
---
Sub rec()
Dim NOM As String
lechemin = ActiveWorkbook.Path & "\"
NOM = Range("G5")
ThisWorkbook.SaveAs lechemin & NOM & ".xls"
End Sub
---
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
Daniel.C
NOM = [Feuil1!G5]
Daniel

Bonjour,
je souhaite enregistrer mon fichier par macro, en utilisant la valeur d'une
cellule (cette cellule G5 est une formule = concatener(H1;" ";H6))
j'ai cette macro, mais comment spécifier l'onglet sur lequel il va trouver
cette cellule G5 ?
merci.
---
Sub rec()
Dim NOM As String
lechemin = ActiveWorkbook.Path & ""
NOM = Range("G5")
ThisWorkbook.SaveAs lechemin & NOM & ".xls"
End Sub
---


Avatar
Sunburn
Merci Daniel, c'est impec.
Yann

"Daniel.C" a écrit :

NOM = [Feuil1!G5]
Daniel

> Bonjour,
> je souhaite enregistrer mon fichier par macro, en utilisant la valeur d'une
> cellule (cette cellule G5 est une formule = concatener(H1;" ";H6))
> j'ai cette macro, mais comment spécifier l'onglet sur lequel il va trouver
> cette cellule G5 ?
> merci.
> ---
> Sub rec()
> Dim NOM As String
> lechemin = ActiveWorkbook.Path & ""
> NOM = Range("G5")
> ThisWorkbook.SaveAs lechemin & NOM & ".xls"
> End Sub
> ---