Discussion :

[Kaley]

Bonjour,

Je début en vba et je souhaite savoir s'il est possible(et comment?) faire l'action suivante:

Déjà mis en place=> En fonction des paramètres "a" et "b" dans le "formulaire1", affichage dans des contrôles(via requetes) dans un autre "formulaire2".

A faire=> Donc sur un clic bouton sur le formulaire1,
Si le les contrôles du formulaire2 n'affichent rien => MsgBox "Rien".

Voici mon code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Private Sub Search_Click()
 
Dim toto as form_formulaire2
Set toto = new form_formulaire2
 
If IsNull(toto.lstbox.value) then
     MsgBox "Rien."
End If
 
End Sub

Je ne sais pas si mes déclaration/instanciation sont bonnes.
Peut être ma condition aussi.

Avec ce code j'ai l'erreur suivante: "Erreur d'exécution '2447': Utilisation non valide du point(.), du point d'exclamation (!) ou de parenthèses.

Merci de vos lumières,

[marsouin_89]

Bonjour,

Si j'ai bien compris ton second formulaire est déjà ouvert.
Donc, essaies plutôt :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
If IsNull(Form_formulaire2.lstbox.value) Then
   MsgBox "Liste vide"
End If

Cordialement

Christophe

[helas]

Bonjour

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
If IsNull(toto!lstbox.value) then