Combobox avec condition

Bonjour a tous.

Voici mon souci :

Je cherche a charger une Combobox avec les éléments de la colonne B seulement si la cellule "G" correspondant a leur ligne est vide (toute les données se trouve en feuil2)

Merci de votre aide !

Bonjour et bienvenue sur le forum

Tu écris :

toute les données se trouve en feuil2

On peut voir ?

A te relire.

Bye !

Bien sur

En pièce jointe la béta de mon fichier

Il a pour but de gérer les envois et retours du matériel en réparation

L'onglet envoie du formulaire fonctionne correctement, ses combobox se remplissent au démarrage de celui-ci via la feuille ressources.

A la validation, une nouvelle ligne et bien ajouté dans la feuille données.

-L'onglet Retour lui, travail avec la feuille Donnees mais je bloque sur deux choses :

-Remplir la combobox avec les NOMs de matériel qui ont la cellule RETOUR vide.

-Remplir les deux textbox qui récupèrent les infos du nom sélectionné dans la combobox.

Merci pour votre aide.

Bonjour

Un essai à tester. Te convient-il ?

Bonjour,

Merci pour votre aide.

Apparemment la Combobox semble avoir chargé les éléments mais le texte ne s'affiche pas

chargevide

A la sélection d'un des éléments de la combobox ce message d'erreur s'affiche ( une erreur 91 "variable objet ou variable de bloc with non définie")

Le problème est présent sur l'exemple que vous avez mis en pièce attaché...

Je vais bidouiller un peu si je trouve le pourquoi du comment

Merci pour votre aide gmb

J'ai trouvé.

Il manquait le "Me." devant Combobox4.AddItem.........

Dim ln As Long

With Feuil2
'prepare la combobox4
For ln = 2 To .Range("B65536").End(xlUp).Row
    If Range("G" & ln) = "" Then
        Me.ComboBox4.AddItem Range("B" & ln)
        End If
    Next ln

End With
End Sub

Merci beaucoup pour votre aide

Rechercher des sujets similaires à "combobox condition"