Discussion :

[magnum812]

Bonjour à tous

Dans un userform j'ai un Combobox qui liste des données dans une Feuille Bd.
En sélectionnant une donnée dans la liste je voudrais pouvoir récupérer dans une variable le N° de ligne correspondant à cette donnée...

En fait cet Userform sert à modifer des données dans la Bd et j'aimerais qu'en confirmant les changements, les nouvelles données soient bien enregistrées au même endroit, sur la bonne ligne. Exemple:

Code :

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

1
2
3
4
5
Private Sub BoutonSelect_Click()
With Userform1
Var1 = 
End With
End Sub

Merci pour votre aide
Cordialement
Magnum812

[pijaku]

Bonjour,
Avec la méthode find peut être...

Code :

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

1
2
3
4
5
6
7
Private Sub BoutonSelect_Click()
Dim Lign As Long 'Lign est un nom de variable mieux adapté que Var1
With Sheets("bd") 'A adapter : le nom de ta feuille "bd"
    Lign = .Columns(1).Cells.Find(ComboBox1).Row 'A adapter : le numéro de la colonne et le nom de la combobox
    MsgBox Lign
End With
End Sub

Tu peux également ajouter certains paramètres pour préciser ta recherche :
Lookin :=XlValues (rechercher dans les valeurs)
Lookat := XlWhole ou XlPart (recherche la valeur exacte ou une valeur "approchante")
Tu dis

[magnum812]

Bonjour,
Avec la méthode find peut être...

J'ai essayé avec Find, ça me donne uniquement la dernière ligne vide de ma Bd...
Il doit y avoir autre chose.

Merci pour vos réponses

Cordialement

[pijaku]

Et pourtant le code que je t'ai donné ci dessus fonctionne bien...
Un fichier exemple

[magnum812]

Ok ça marche, j'avais fait une erreur dans mon code .... Mille excuses!!

Un grand merci à toi pour m'avoir accordé un peu de ton temps
Bonne journée...

Cordialement
Magnum812