Variables Worksheets public Objet requis

[pdrean]

Bonjour,

Voila un petit bout de code :
--------------------------------------
Public Nom as Worksheets
--------------------------------------
Public Sub Variables ()
Set Nom = Worksheets("Nom")
msgbox Nom.[G5]
End Sub
--------------------------------------

Ce code m'affiche bien la valeur de la cellule "G5" dans la feuille "Nom" du classeur courant.



Je voulais savoir comment se fait il qu'avec le code suivant il me met une erreur d'exécution 424 : Objet requis
---------------------------------
Public Nom as Worksheets
---------------------------------
Public Sub Variables()
Set Nom= ThisWorkbook.Worksheets("Nom")
End Sub
---------------------------------
Sub test()
Variables
MsgBox Nom.[g5]
End Sub
---------------------------------

 

[Pierrot93]

Re : Variables Worksheets public Objet requis

Bonjour,

modifie comme suit :

Public Nom  As Worksheet
Public Sub Variables()
Set Nom = Worksheets("Nom")
End Sub
Sub test()
Variables
MsgBox Nom.[g5]
End Sub

"As Worksheet" sans "s", c'est l'objet feuille de calcul et nom la collection des feuilles de calcul..

bon après midi
@+

 

[pdrean]

Re : Variables Worksheets public Objet requis

Ok, je te remercie beaucoup !