Doublons Do...While Transform For...Next

[xvella]

Bonjour Forum,

Dans le fichier joint j'ai dédoublonner une collone avec Do...Loop.

Peut-on Dédoublonné avec For...Next qui reste plus stable sous VBA Excel.

Merci d'avance pour vos réponse.

A+

 

[Guest]

Re : Doublons Do...While Transform For...Next

Bonjour,

Sans do while, sans for next sans les pieds sans les mains:

Sub ValeurUnique()
'
    Dim MaPlage As Range
        '
    With Worksheets("PartieA")
       Set MaPlage = .Range("B3:B" & .Cells(.Rows.Count, 2).End(xlUp).Row)
        MaPlage.AdvancedFilter xlFilterCopy, , .Range("G3"), True
    End With
End Sub

A+

 

[xvella]

Re : Doublons Do...While Transform For...Next

Bonjour Hasco,

Merci, rien à dire +simple +court.

Encore merci.

A+