Visual basic erreur de Range
Résolu
taly91
Messages postés
7
Date d'inscription
Statut
Membre
Dernière intervention
-
taly91 Messages postés 7 Date d'inscription Statut Membre Dernière intervention -
taly91 Messages postés 7 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'ai l'erreur d'éxecution '1004' :
La méthode 'Range' de l'objet '_Global' a échoué
et voilà ce que j'ai fait
If Option_oui.Value = True Then
If OptionButton10.Value = True Then
Range("AZ") = "oui"ElseIf OptionButton11.Value = True Then
Range("AZ") = "non"
Else
temp = MsgBox("VOTRE ROUE DE SECOURS EST-ELLE EN ETAT? - Impossible d'enregistrer sans cette information" _
, vbExclamation, "Elément manquant")
ActiveSheet.Rows(2).Delete
ComboBox21.SetFocus
Exit Sub
End If
End If
quelle est mon erreur je ne comprend pas?
merci
J'ai l'erreur d'éxecution '1004' :
La méthode 'Range' de l'objet '_Global' a échoué
et voilà ce que j'ai fait
If Option_oui.Value = True Then
If OptionButton10.Value = True Then
Range("AZ") = "oui"ElseIf OptionButton11.Value = True Then
Range("AZ") = "non"
Else
temp = MsgBox("VOTRE ROUE DE SECOURS EST-ELLE EN ETAT? - Impossible d'enregistrer sans cette information" _
, vbExclamation, "Elément manquant")
ActiveSheet.Rows(2).Delete
ComboBox21.SetFocus
Exit Sub
End If
End If
quelle est mon erreur je ne comprend pas?
merci
A voir également:
- Visual basic erreur de Range
- Visual basic - Télécharger - Langages
- Microsoft 365 basic - Accueil - Microsoft Office
- Visual c++ 2019 - Guide
- Visual paradigm - Télécharger - Gestion de données
- Iptv erreur de lecture - Forum TV & Vidéo
1 réponse
SAlut,
Il manque quelque chose ici : Range("AZ"). Que veux tu faire? Mettre "oui" en Az1? AZ2? AZ première cellule vide?
Pour AZ1 : Range("AZ1")
Pour AZ2 : Range("AZ2")
Pour la première cellule vide dans la colonne AZ :
A toi de jouer maintenant...
Il manque quelque chose ici : Range("AZ"). Que veux tu faire? Mettre "oui" en Az1? AZ2? AZ première cellule vide?
Pour AZ1 : Range("AZ1")
Pour AZ2 : Range("AZ2")
Pour la première cellule vide dans la colonne AZ :
Dim lig as Integer
lig = Range("AZ65536").End(xlUp).Offset(1, 0).Row
Range("AZ" & lig)
A toi de jouer maintenant...
merci bcp
bonne soirée!