Bonjour à tous, ça fait un bail...


J'ai un UserForm nommé Production, dans lequel un frame avec tout plein de textBox et de comboBox...
L'idée est de n'autoriser l'enregistrement des données sur une feuille excel que sous certaines conditions..dont "tout les champs sont pleins.
Pour cela j'ai créé une macro pour vérifier que tous les champs d'un formulaire sont pleins, mais biensûr elle ne marche pas...normalement je déclare mes variables à l'extérieur de ma macro! mais voici l'essentiel:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
Private Sub verif_formulaire()
Dim obj As Control
Dim plein As String
plein = "Oui"
 
'   Vérifier que tous les champs du formulaire soient bien remplis
For Each obj In Production.Controls
    If Production.obj.Visible = True Then
        If TypeName(obj) = "TextBox" Or TypeName(obj) = "ComboBox" Then
            If Production.obj.Value = "" Then
                plein = "Non"
                Exit For
            End If
        End If
    End If
Next
 
End Sub
Sur enregistrer_click j'ai ajouté une ligne call verif_formulaire...
et j'obtiens le bug method or data member not found en me surlignat obj comme mis en evidence sur le code.

Quelqu'un aurait il une idée sur ce qui cloche??