Bonjour,
Voilà j'ai quelques problèmes avec ma listbox du notamment au nom des pages... puisque le .rowsource ne gère pas les espaces et je voudrais donc modifier la macro avec autre chose (additem par exemple..mais j'ai du mal a faire la traduction).
Voila mon code:
Dim L As Integer
G = Cells(2, 251).Value 'nom de la feuil1 (qui peut avoir des espaces)
F = Cells(3, 251).Value 'nom de la feuil2 (qui peut avoir des espaces)
L = Sheets(F).Range("A65536").End(xlUp).Row
With Me
With .ListBox2
.RowSource = F & "!A2:A" & L
.MatchEntry = fmMatchEntryFirstLetter
End With
End With
Pourtant ce code m'allait bien puisque assez simple.
Mais merci pour votre aide sur ce sujet.
BILLOUU
Voilà j'ai quelques problèmes avec ma listbox du notamment au nom des pages... puisque le .rowsource ne gère pas les espaces et je voudrais donc modifier la macro avec autre chose (additem par exemple..mais j'ai du mal a faire la traduction).
Voila mon code:
Dim L As Integer
G = Cells(2, 251).Value 'nom de la feuil1 (qui peut avoir des espaces)
F = Cells(3, 251).Value 'nom de la feuil2 (qui peut avoir des espaces)
L = Sheets(F).Range("A65536").End(xlUp).Row
With Me
With .ListBox2
.RowSource = F & "!A2:A" & L
.MatchEntry = fmMatchEntryFirstLetter
End With
End With
Pourtant ce code m'allait bien puisque assez simple.
Mais merci pour votre aide sur ce sujet.
BILLOUU