Bonsoir je cherche à obtenir le nom de la feuille active dans une macro
VBA et je ne me rappelle plus comment faire un truc du genre
activeworksheet?
Merci de me dépanner
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
Dav
Bonsoir Blorg
voici
Sub NomFeuille() MsgBox ActiveSheet.Name End Sub
Bonne nuit Dav
"blorg" a écrit dans le message de groupe de discussion : 47f7f934$0$6183$
Bonsoir je cherche à obtenir le nom de la feuille active dans une macro VBA et je ne me rappelle plus comment faire un truc du genre activeworksheet? Merci de me dépanner
Bonsoir Blorg
voici
Sub NomFeuille()
MsgBox ActiveSheet.Name
End Sub
Bonne nuit
Dav
"blorg" <vball1@free.fr> a écrit dans le message de groupe de discussion :
47f7f934$0$6183$426a74cc@news.free.fr...
Bonsoir je cherche à obtenir le nom de la feuille active dans une macro
VBA et je ne me rappelle plus comment faire un truc du genre
activeworksheet?
Merci de me dépanner
"blorg" a écrit dans le message de groupe de discussion : 47f7f934$0$6183$
Bonsoir je cherche à obtenir le nom de la feuille active dans une macro VBA et je ne me rappelle plus comment faire un truc du genre activeworksheet? Merci de me dépanner
Francis
Bonjour Blorg,
Tu peux aussi récupérer le nom de toutes les feuilles:
Sub NomFeuille() Dim Lst() As String Dim I As Integer ReDim Lst(Sheets.Count - 1) For I = 0 To Sheets.Count - 1 Lst(I) = Sheets(I + 1).Name MsgBox Lst(I) Next I End Sub
Bonne journée.
"Dav" a écrit dans le message de news:
Bonsoir Blorg
voici
Sub NomFeuille() MsgBox ActiveSheet.Name End Sub
Bonne nuit Dav
"blorg" a écrit dans le message de groupe de discussion : 47f7f934$0$6183$
Bonsoir je cherche à obtenir le nom de la feuille active dans une macro VBA et je ne me rappelle plus comment faire un truc du genre activeworksheet? Merci de me dépanner
Bonjour Blorg,
Tu peux aussi récupérer le nom de toutes les feuilles:
Sub NomFeuille()
Dim Lst() As String
Dim I As Integer
ReDim Lst(Sheets.Count - 1)
For I = 0 To Sheets.Count - 1
Lst(I) = Sheets(I + 1).Name
MsgBox Lst(I)
Next I
End Sub
Bonne journée.
"Dav" <gerard@yahoo.fr> a écrit dans le message de news:
uAOKTw2lIHA.536@TK2MSFTNGP06.phx.gbl...
Bonsoir Blorg
voici
Sub NomFeuille()
MsgBox ActiveSheet.Name
End Sub
Bonne nuit
Dav
"blorg" <vball1@free.fr> a écrit dans le message de groupe de discussion :
47f7f934$0$6183$426a74cc@news.free.fr...
Bonsoir je cherche à obtenir le nom de la feuille active dans une macro
VBA et je ne me rappelle plus comment faire un truc du genre
activeworksheet?
Merci de me dépanner
Tu peux aussi récupérer le nom de toutes les feuilles:
Sub NomFeuille() Dim Lst() As String Dim I As Integer ReDim Lst(Sheets.Count - 1) For I = 0 To Sheets.Count - 1 Lst(I) = Sheets(I + 1).Name MsgBox Lst(I) Next I End Sub
Bonne journée.
"Dav" a écrit dans le message de news:
Bonsoir Blorg
voici
Sub NomFeuille() MsgBox ActiveSheet.Name End Sub
Bonne nuit Dav
"blorg" a écrit dans le message de groupe de discussion : 47f7f934$0$6183$
Bonsoir je cherche à obtenir le nom de la feuille active dans une macro VBA et je ne me rappelle plus comment faire un truc du genre activeworksheet? Merci de me dépanner
Dav
Bonsoir
Allez, un petit coup pour le fun... :) une autre méthode
Sub NomFeuilles() Dim Feuille As Worksheet For Each Feuille In ActiveWorkbook.Worksheets MsgBox Feuille.Name Next End Sub
Bonne soirée Dav
"Francis" a écrit dans le message de groupe de discussion : eQrFuz$
Bonjour Blorg,
Tu peux aussi récupérer le nom de toutes les feuilles:
Sub NomFeuille() Dim Lst() As String Dim I As Integer ReDim Lst(Sheets.Count - 1) For I = 0 To Sheets.Count - 1 Lst(I) = Sheets(I + 1).Name MsgBox Lst(I) Next I End Sub
Bonne journée.
"Dav" a écrit dans le message de news:
Bonsoir Blorg
voici
Sub NomFeuille() MsgBox ActiveSheet.Name End Sub
Bonne nuit Dav
"blorg" a écrit dans le message de groupe de discussion : 47f7f934$0$6183$
Bonsoir je cherche à obtenir le nom de la feuille active dans une macro VBA et je ne me rappelle plus comment faire un truc du genre activeworksheet? Merci de me dépanner
Bonsoir
Allez, un petit coup pour le fun... :) une autre méthode
Sub NomFeuilles()
Dim Feuille As Worksheet
For Each Feuille In ActiveWorkbook.Worksheets
MsgBox Feuille.Name
Next
End Sub
Bonne soirée
Dav
"Francis" <francis.mourmaux@prov-liege.be> a écrit dans le message de groupe
de discussion : eQrFuz$lIHA.1184@TK2MSFTNGP04.phx.gbl...
Bonjour Blorg,
Tu peux aussi récupérer le nom de toutes les feuilles:
Sub NomFeuille()
Dim Lst() As String
Dim I As Integer
ReDim Lst(Sheets.Count - 1)
For I = 0 To Sheets.Count - 1
Lst(I) = Sheets(I + 1).Name
MsgBox Lst(I)
Next I
End Sub
Bonne journée.
"Dav" <gerard@yahoo.fr> a écrit dans le message de news:
uAOKTw2lIHA.536@TK2MSFTNGP06.phx.gbl...
Bonsoir Blorg
voici
Sub NomFeuille()
MsgBox ActiveSheet.Name
End Sub
Bonne nuit
Dav
"blorg" <vball1@free.fr> a écrit dans le message de groupe de discussion
: 47f7f934$0$6183$426a74cc@news.free.fr...
Bonsoir je cherche à obtenir le nom de la feuille active dans une macro
VBA et je ne me rappelle plus comment faire un truc du genre
activeworksheet?
Merci de me dépanner
Allez, un petit coup pour le fun... :) une autre méthode
Sub NomFeuilles() Dim Feuille As Worksheet For Each Feuille In ActiveWorkbook.Worksheets MsgBox Feuille.Name Next End Sub
Bonne soirée Dav
"Francis" a écrit dans le message de groupe de discussion : eQrFuz$
Bonjour Blorg,
Tu peux aussi récupérer le nom de toutes les feuilles:
Sub NomFeuille() Dim Lst() As String Dim I As Integer ReDim Lst(Sheets.Count - 1) For I = 0 To Sheets.Count - 1 Lst(I) = Sheets(I + 1).Name MsgBox Lst(I) Next I End Sub
Bonne journée.
"Dav" a écrit dans le message de news:
Bonsoir Blorg
voici
Sub NomFeuille() MsgBox ActiveSheet.Name End Sub
Bonne nuit Dav
"blorg" a écrit dans le message de groupe de discussion : 47f7f934$0$6183$
Bonsoir je cherche à obtenir le nom de la feuille active dans une macro VBA et je ne me rappelle plus comment faire un truc du genre activeworksheet? Merci de me dépanner