Sélection dans userform

[dominique35]

Bonsoir à tous!

J'aimerais savoir comment faire car je ne trouve pas, quand je clic sur la ligne sélection dans mon userform, fermer l'userform et arrivée directement sur la ligne sélectionné. je mais le fichier joint plus parlant.

 

[PMO2]

Re : Sélection dans userform

Bonjour,

Ajoutez ce code à votre code

Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim var
Dim i&
var = Sheets("Feuil1").[a1].CurrentRegion
For i& = 2 To UBound(var, 1)
  If CStr(var(i&, 1)) = ListBox1 Then
    Rows(i&).Select
    Exit For
  End If
Next i&
End Sub

Le double clic sur un élément de la ListBox va sélectionner la ligne concernée de la feuille Excel.