[vba-e] probleme de propriete text

Version imprimable

bonsoir
je fais appel a vous car j'ai un message d'erreur :380 impossible de definir la propriete text.valeur de propriete non valide

ce message intervient sur le code

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
Private Sub Button2_Click()
flag = True
 
    operation = 1
    Dim I As Byte, Ligne_Vide As Double
 
    Flag_Entrée = True
    Button2.Visible = False
    Validation.Visible = True
    SpinButton1.Visible = False
    flag = True
 
 
    Ligne_Vide = Sheets("bd").Range("A65536").End(xlUp).Row + 1
    GRILLE.compteur = Ligne_Vide - 1
    flag = 0
    ' on met a blanc les combobox
'670384396
 
    For I = 1 To 23
         Controls("cbox" & (I)).Text = "" ' ligne a debuguer:aie:  
    Next I
 
    Call autoecCombo2
    ' on valide l'introduction de données
    ' modification du format de la ligne
    DernièreLigne = Sheets("bd").Range("A65536").End(xlUp).Row + 1
    compteur.Caption = " ligne : " & DernièreLigne
    Rows("2:2").Copy
    Range("A" & DernièreLigne).Select
    Selection.PasteSpecial Paste:=xlPasteFormats, operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
    Application.CutCopyMode = False
    flag = True
    CommandButton3.Caption = "Annuler"
    GRILLE.Caption = " Création d'une fiche"
End Sub

voila le Button2 pour creer une ligne a la fin de mon tableau ensuite j'eface toute les données de mon userform pour saisir dans chaque combobox puis en validant toutes mes saisies sont enregistrées

07/05/2007, 20h44
SfJ5Rpw8

qu'elle est la valeur de I à ce moment la ..? le combobox correspondant existe bien ..?
07/05/2007, 21h35
CIBOOX

Citation:

Envoyé par CIBOOX

I=2 et j'ai bien une cbox2 dans mon userform :?
07/05/2007, 23h49
ouskel'n'or

Tu renseignes ton combo comment ? Avec RowSource ?
08/05/2007, 20h05
CIBOOX

bonsoir ouskel
mes combobox ne sont pas rempli en rowsource :bug:
10/05/2007, 05h45
SilkyRoad

bonjour

Citation:

I=2 et j'ai bien une cbox2 dans mon userform

mais est ce qu'il s'agit bien d'un contrôle ComboBox ?

michel
10/05/2007, 20h09
CIBOOX
Citation:

Envoyé par SilkyRoad

bonjour

mais est ce qu'il s'agit bien d'un contrôle ComboBox ?

michel

oui michel je pense que c'est un controle combobox

je viens de changer
Code:

1 2 Controls("cbox" & (I)).Text = "" ' ligne du bug par Controls("cbox" & (I)).value = ""
et ça marche va savoir pourquoi ???

cette discusion est :resolu:
:merci: a tous
11/05/2007, 08h00
Invité

Bonjour

Il me semble que la propriété Text ne fonctionne que quand le contrôle à le focus, alors que Value fonctionne dans tout les cas.

Starec