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

Boucle sur textbox

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 !

GGPS58

XLDnaute Occasionnel
Bonjour
J'ai une série de textbox de 70 à 85
J'ai fait des controles de ce type pour chaque textbox

If TextBox70.Value <> "" Then
If Not IsNumeric(TextBox70.Value) Then
MsgBox "Les champs Remise requièrent des valeurs numériques uniquement", vbInformation, "VERIFIEZ"
Exit Sub
End If
End If

Je souhaiterais faire une boucle qui me permette d'optimiser mon code
Mais je n'y arrive pas
J'ai tenté avec
For G = 70 to 85
If ("TextBox" & G).Value <> "" Then
If Not IsNumeric(("TextBox" & G).Value ) Then

MsgBox "Les champs Remise requièrent des valeurs numériques uniquement", vbInformation, "VERIFIEZ"
Exit Sub
End If
End If

Ca plante sur les lignes en rouge
Pour info j'ai d'autres textbox qui ne requièrent pas des valeurs numériques
D'avance merci de votre aide
 
Re : Boucle sur textbox

bonjourGGPS
c'était quasiment bon


For G = 70 To 85
If Controls("TextBox" & G).Value <> "" Then
If Not IsNumeric(Controls("TextBox" & G).Value) Then
MsgBox "Les champs Remise requièrent des valeurs numériques uniquement", _
vbInformation, "VERIFIEZ"
Exit Sub
End If
End If


à bientôt
 
- 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
4
Affichages
733
Réponses
5
Affichages
573
Réponses
9
Affichages
385
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…