Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Récupérer une variable

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Magic_Doctor

XLDnaute Barbatruc
Supporter XLD
Bonjour à tous,

Comment faire pour récupérer une variable, ou comment doit-on la déclarer ?
Je m'explique :
J'ai un USF
Je déclare une variable "vol%" pour un ComboBox :

--------------------------------------------------------------------------
Private Sub ComboBox1_Change()

Dim vol%, Cel As Range

Set Cel = [ListeDilutions].Cells(ComboBox1.ListIndex + 1, 1)

vol% = Right(Cel.Value, Len(Cel.Value) - InStr(1, Cel.Value, "/", 0))

etc......................................

End Sub
--------------------------------------------------------------------------

Seulement, pour un CommandButton, j'ai besoin de la même variable avec la même valeur.
Bien sûr, je peux à nouveau répéter dans la procédure du CommandButton ce que j'avais déjà écrit auparavant. Mais peut-on éviter cette lourde redondance ?

Pour toute réponse, un grand merci !
 
Re : Récupérer une variable

Bonjour

Il suffit de déclarer ta variable en Public
Places la en dehors d'une procédure (En haut de ta page de code)
et il faut supprimer sa déclaration dans la procédure

Code:
Option Explicit

Public Vol%

Private Sub ComboBox1_Change()
Dim [COLOR="Red"]vol%,[/COLOR] Cel As Range

Set Cel =[ListeDilutions].Cells(ComboBox1.ListIndex + 1, 1)
vol% = Right(Cel.Value, Len(Cel.Value) - InStr(1, Cel.Value, "/", 0))
etc......................................
End Sub
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
922
M
Réponses
3
Affichages
2 K
MONADESIGN82
M
  • Question Question
Microsoft 365 Protect/Unprotect
Réponses
18
Affichages
3 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…