Question bête .... ou pas ?

[tora]

Bonjour

Dim MyRange as range

msgbox MyRange.Address

=> msgbox produit une erreur car <<Myrange is not set>>

comment vérifier si MyRange contient bel et bien un objet range
avant l'appel de la message box ?
1/ sachant que la ligne Dim MyRange ... ne doit pas être modifiée
2/ sachant que je ne souhaite pas user le gestionnaire d'erreur pour
dépister la chose ( On Error ... )

merci

 

[MJ13]

Re : Question bête .... ou pas ?

Re

PS : j'avais pas tout lu ...

Tora: Oui il faut tout lire.

Pour joindre un fichier, c'est très simple, lorsque tu réponds à un post, en dessous du texte tu as Gérer les piéces jointes. Il suffit de suivre ce lien.

 

[tora]

Re : Question bête .... ou pas ?

Re


Je ne sais pas, je suis parti déjeuner pour le moment.

Bon appétit.

bon app !!!🙂

 

[tora]

Re : Question bête .... ou pas ?

Re



Tora: Oui il faut tout lire.

Pour joindre un fichier, c'est très simple, lorsque tu réponds à un post, en dessous du texte tu as Gérer les piéces jointes. Il suffit de suivre ce lien.

mea culpa mea culpa mea culpa mea culpa mea culpa mea culpa ...

Sorry Sorry ...

 

[JNP]

Re : Question bête .... ou pas ?

Bonjour le forum 🙂,
Ayant été convié à vous rejoindre, je me suis penché sur la fameuse Q2. J'hésite à donner ma solution car j'ai peur de me faire des ennemis 😀...

Sub test()
Dim Plage As Range
Set Plage = Range("A1")
MsgBox (TypeName(Plage))
Set Plage = Nothing
MsgBox (TypeName(Plage))
End Sub

Enfin, ce que j'en disais... 😱
Bonne journée 😎

 

[tora]

Re : Question bête .... ou pas ?

Génial Q1 résolu & Q2 aussi !!!

Bravo Merci à VBACrumble & JNP et Sorry mea culpa a MJ13

Bonne journée !

 

[vbacrumble]

Re : Question bête .... ou pas ?

Re


tora: faudrait savoir ce que tu dis 🙄

3/ INTERDIT d'utilier : Set MyRange = Range("****")

 

[JNP]

Re : Question bête .... ou pas ?

Re 🙂,
Bien vu l'aveugle... 😀
Mais c'était 3/ INTERDIT d'utiliser : Set MyRange = Range("****")
Et je n'ai pas mis de Range ...😀
A + 😎