VBA : Mettre le nom d'une feuille dans une variable réutilisable partout

NicolasC91

XLDnaute Nouveau
Bonjour,

J'aimerai mettre dans une variable le nom d'une feuille (ActiveSheet par exemple) et pouvoir après réutiliser cette variable dans d'autres modules

J'ai tenter cela :
Mais je ne sais comment réutiliser la variable après...
Merci de vos réponses :)

-----------------------------------------------------------------------

Sub SheetImportName_Sub()

Dim SheetImportName As String

SheetImportName = ActiveSheet.Name

End Sub

------------------------------------------------------------------------
 

Efgé

XLDnaute Barbatruc
Re : VBA : Mettre le nom d'une feuille dans une variable réutilisable partout

Bonjour NicolasC91,
Peut être en déclarant ta variable en public avant ton code :
Code:
Public SheetImportName As String
Sub SheetImportName_Sub()
SheetImportName = ActiveSheet.Name
End Sub
Cordialement
 

NicolasC91

XLDnaute Nouveau
Re : VBA : Mettre le nom d'une feuille dans une variable réutilisable partout

J'ai essayé cela :
Mais SheetTest me renvoie la valeur "vide"...
Je ne sais pas pourquoi :/

-----------------------------------------------------------------------

Public SheetImportName As String
Sub SheetImportName_Sub()

Dim SheetImportName As String

SheetImportName = ActiveSheet.Name

End Sub

-----------------------------------------------------------------------

Sub Test()

Dim SheetTest As String

SheetTest = SheetImportName

End Sub


-----------------------------------------------------------------------
 

Efgé

XLDnaute Barbatruc
Re : VBA : Mettre le nom d'une feuille dans une variable réutilisable partout

Re
Si tu déclare une variable en "Public" il ne faut pas la redéfinir par la suite.
Supprime la ligne en rouge:

Public SheetImportName As String
_________________________________________________
Sub SheetImportName_Sub()

Dim SheetImportName As String

SheetImportName = ActiveSheet.Name

End Sub

-----------------------------------------------------------------------

Sub Test()

Dim SheetTest As String

SheetTest = SheetImportName

End Sub

Cordialement
 

NicolasC91

XLDnaute Nouveau
Re : VBA : Mettre le nom d'une feuille dans une variable réutilisable partout

Merci de tes réponses, mais ça ne marche toujours pas :/
J'aimerai que ma variable SheetTest (dans le second sub) me renvoie le nom de la feuille récupéré dans le premier sub.
Je bloque complétement :/

----------------------------------------------------------------------

Public SheetImportName As String
Sub SheetImportName_Sub()

SheetImportName = ActiveSheet.Name

End Sub
----------------------------------------------------------------------
Sub Test()

SheetTest = SheetImportName

End Sub

----------------------------------------------------------------------
 

Discussions similaires

Statistiques des forums

Discussions
312 939
Messages
2 093 788
Membres
105 836
dernier inscrit
Frederic14