tri dans userform

[ch93]

Bonjour le forum,

Comment afficher dans l'userform les cellules pleines du champ C avec le chiffre du champ B.
Merci de votre aide. [file name=Test_20051015143204.zip size=10294]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Test_20051015143204.zip[/file]

 

[_Thierry]

Bonjour Vev, le Forum

Voici ton code d'initialisation du UserForm (à placer dans le Private Module de celui-ci.

Option Explicit


Private Sub UserForm_Initialize()
Dim Plage As Range, Cell As Range
Dim X As Long

With Me.ListBox1
    .ColumnCount = 2
    .ColumnWidths = '50;90'
End With

With ThisWorkbook.Worksheets('Feuil1')
    Set Plage = .Range(.Range('C2'), .Range('C65536').End(xlUp))
End With


    For Each Cell In Plage
        If Not Cell = Empty Then
            With Me.ListBox1
                .AddItem Cell.Offset(0, -1)
                .Column(1, X) = Cell
                X = X + 1
            End With
        End If
    Next Cell
End Sub

Bon Week End
[ol]@+Thierry[/ol]

 

[ch93]

Merci Thierry et bon week end a toi

 

[ch93]

Salut le Forum.

Comment Afficher la ligne selectionnée de la Listbox dans le Textbox afin de pouvoir modifier le contenu de la cellule.

Je debute en VBA et la je cale merci de votre Aide....

 

[ch93]

J'ai oublié de joindre mon fichier !!!!
Merci d'avance... [file name=modif_ViaUF.zip size=11450]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/modif_ViaUF.zip[/file]