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
Philippe.R
Bonsoir Christian, Sous réserve que l'utilisateur ne déplace pas la feuille en plus :
Sub nomfeuille() Dim nouVnom As String on error resume next nouVnom = InputBox("Saisissez le nouveau nom svp !", "BAPTEME") Sheets(1).Name = nouVnom End Sub
-- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 "Christian Raoux" a écrit dans le message de news:
Salut
Je voudrai pouvoir renommer par macro une feuille du classeur sans conaitre le nom car le nom a pu être modifié par l'utilisateur
merci d'avance
christian
Bonsoir Christian,
Sous réserve que l'utilisateur ne déplace pas la feuille en plus :
Sub nomfeuille()
Dim nouVnom As String
on error resume next
nouVnom = InputBox("Saisissez le nouveau nom svp !", "BAPTEME")
Sheets(1).Name = nouVnom
End Sub
--
Amicales Salutations
A_S_rauphil@wanadoo.fr
Retirer A_S_ pour répondre.
XL97 / XL2002
"Christian Raoux" <christian.raoux@free.fr> a écrit dans le message de
news:XnF93C4BE22A7FE2christianraoux@213.228.0.75...
Salut
Je voudrai pouvoir renommer par macro une feuille du classeur
sans conaitre le nom car le nom a pu être modifié par l'utilisateur
Bonsoir Christian, Sous réserve que l'utilisateur ne déplace pas la feuille en plus :
Sub nomfeuille() Dim nouVnom As String on error resume next nouVnom = InputBox("Saisissez le nouveau nom svp !", "BAPTEME") Sheets(1).Name = nouVnom End Sub
-- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 "Christian Raoux" a écrit dans le message de news:
Salut
Je voudrai pouvoir renommer par macro une feuille du classeur sans conaitre le nom car le nom a pu être modifié par l'utilisateur
Bonsoir Christian, Sous réserve que l'utilisateur ne déplace pas la feuille en plus :
Sub nomfeuille() Dim nouVnom As String on error resume next nouVnom = InputBox("Saisissez le nouveau nom svp !", "BAPTEME") Sheets(1).Name = nouVnom End Sub
Bonsoir Christian,
Sous réserve que l'utilisateur ne déplace pas la feuille en plus :
Sub nomfeuille()
Dim nouVnom As String
on error resume next
nouVnom = InputBox("Saisissez le nouveau nom svp !", "BAPTEME")
Sheets(1).Name = nouVnom
End Sub
Bonsoir Christian, Sous réserve que l'utilisateur ne déplace pas la feuille en plus :
Sub nomfeuille() Dim nouVnom As String on error resume next nouVnom = InputBox("Saisissez le nouveau nom svp !", "BAPTEME") Sheets(1).Name = nouVnom End Sub
Philippe.R
C'était avec plaisir Christian, Méfie toi quand même de tes utilisateurs farceurs ;o)) -- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 "Christian Raoux" a écrit dans le message de news:
Bonsoir Christian, Sous réserve que l'utilisateur ne déplace pas la feuille en plus :
Sub nomfeuille() Dim nouVnom As String on error resume next nouVnom = InputBox("Saisissez le nouveau nom svp !", "BAPTEME") Sheets(1).Name = nouVnom End Sub
C'était avec plaisir Christian,
Méfie toi quand même de tes utilisateurs farceurs ;o))
--
Amicales Salutations
A_S_rauphil@wanadoo.fr
Retirer A_S_ pour répondre.
XL97 / XL2002
"Christian Raoux" <christian.raoux@free.fr> a écrit dans le message de
news:XnF93C4D68425DEFchristianraoux@213.228.0.75...
Bonsoir Christian,
Sous réserve que l'utilisateur ne déplace pas la feuille en plus :
Sub nomfeuille()
Dim nouVnom As String
on error resume next
nouVnom = InputBox("Saisissez le nouveau nom svp !", "BAPTEME")
Sheets(1).Name = nouVnom
End Sub
Bonsoir Christian, Sous réserve que l'utilisateur ne déplace pas la feuille en plus :
Sub nomfeuille() Dim nouVnom As String on error resume next nouVnom = InputBox("Saisissez le nouveau nom svp !", "BAPTEME") Sheets(1).Name = nouVnom End Sub
Robert Dezan
Bonjour Christian, Pour les macro, le meilleur moyen pour s'affranchir des noms de feuilles modifiées aléatoirement par des utilisateurs, est de donner un nom interne en VBA à chaque feuille. Méthode sous VBA : - Sélectionner la feuille sous Microsoft Excel Objects - Dans la propriété Name entrer le nom voulu par exemple "Sht_zaza" Pour l'utilisation dans le code : Sélection ==> Sht_zaza.select Nom de la feuille ==> Sht_zaza.name Cordialement Robert Dezan
"Christian Raoux" a écrit dans le message de news:
Salut
Je voudrai pouvoir renommer par macro une feuille du classeur sans conaitre le nom car le nom a pu être modifié par l'utilisateur
merci d'avance
christian
Bonjour Christian,
Pour les macro, le meilleur moyen pour s'affranchir des noms de feuilles
modifiées aléatoirement par des utilisateurs, est de donner un nom interne en
VBA à chaque feuille.
Méthode sous VBA :
- Sélectionner la feuille sous Microsoft Excel Objects
- Dans la propriété Name entrer le nom voulu par exemple "Sht_zaza"
Pour l'utilisation dans le code :
Sélection ==> Sht_zaza.select
Nom de la feuille ==> Sht_zaza.name
Cordialement
Robert Dezan
"Christian Raoux" <christian.raoux@free.fr> a écrit dans le message de
news:XnF93C4BE22A7FE2christianraoux@213.228.0.75...
Salut
Je voudrai pouvoir renommer par macro une feuille du classeur
sans conaitre le nom car le nom a pu être modifié par l'utilisateur
Bonjour Christian, Pour les macro, le meilleur moyen pour s'affranchir des noms de feuilles modifiées aléatoirement par des utilisateurs, est de donner un nom interne en VBA à chaque feuille. Méthode sous VBA : - Sélectionner la feuille sous Microsoft Excel Objects - Dans la propriété Name entrer le nom voulu par exemple "Sht_zaza" Pour l'utilisation dans le code : Sélection ==> Sht_zaza.select Nom de la feuille ==> Sht_zaza.name Cordialement Robert Dezan
"Christian Raoux" a écrit dans le message de news:
Salut
Je voudrai pouvoir renommer par macro une feuille du classeur sans conaitre le nom car le nom a pu être modifié par l'utilisateur
