J
jpdestetienne!
Guest
Bonjour le forum,
Je vous écris car je débute en VBA, et m'éttant aidé d'un tutoriel de @+Thierry ( benit-soit-il! ) , j'ai du mal à comprendre ce que signifie ce code.
Quelqu'un, peut-il m'aider?
Merçi d'avance.
Cordialement, JP
Private Sub ListBox1_Click()
Initialise
Dim NBLigne As Integer
Public ColLet As String
Dim PlageFiltre As String
NBLigne = Sheets(2).Range(ColLet & "65536").End(xlUp).Row
PlageFiltre = Sheets(2).Range(ColLet & "2:" & ColLet & NBLigne).Address
ListBox2.RowSource = "DATABASE!" & PlageFiltre
End Sub
Je vous écris car je débute en VBA, et m'éttant aidé d'un tutoriel de @+Thierry ( benit-soit-il! ) , j'ai du mal à comprendre ce que signifie ce code.
Quelqu'un, peut-il m'aider?
Merçi d'avance.
Cordialement, JP
Private Sub ListBox1_Click()
Initialise
Dim NBLigne As Integer
Public ColLet As String
Dim PlageFiltre As String
NBLigne = Sheets(2).Range(ColLet & "65536").End(xlUp).Row
PlageFiltre = Sheets(2).Range(ColLet & "2:" & ColLet & NBLigne).Address
ListBox2.RowSource = "DATABASE!" & PlageFiltre
End Sub