boubouloulou
XLDnaute Nouveau
Bonjour,
Bon, j'ai résolu mes problèmes cependant, j'ai plusieurs questions:
Peut ton à l'aide d'une formule retranscrire une colonne en supprimant tous les doublons?
N'ayant pas trouvé, j'ai réalisé une macro associé à un bouton: Call blondie! ... euh non Call SuppressionDoublon.
Sub SuppressionDoublon()
'
' SuppressionDoublon Macro
' Permet de copier les systèmes de ventilation de la colonne "ventilateurs" dans la feuille "Bouches" et d'en supprimer les doublons
'
'
Sheets("Bouches").Range("F4:F200").AdvancedFilter Action:=xlFilterCopy, _
CopyToRange:=Range("B10:B200"), Unique:=True
ActiveWindow.SmallScroll Down:=-9
End Sub
Cependant la colonne peut bouger, F4:F200, là je voudrais la colonne E4:F200.
Comment pourrais je faire?
Merci par avance!
Bon, j'ai résolu mes problèmes cependant, j'ai plusieurs questions:
Peut ton à l'aide d'une formule retranscrire une colonne en supprimant tous les doublons?
N'ayant pas trouvé, j'ai réalisé une macro associé à un bouton: Call blondie! ... euh non Call SuppressionDoublon.
Sub SuppressionDoublon()
'
' SuppressionDoublon Macro
' Permet de copier les systèmes de ventilation de la colonne "ventilateurs" dans la feuille "Bouches" et d'en supprimer les doublons
'
'
Sheets("Bouches").Range("F4:F200").AdvancedFilter Action:=xlFilterCopy, _
CopyToRange:=Range("B10:B200"), Unique:=True
ActiveWindow.SmallScroll Down:=-9
End Sub
Cependant la colonne peut bouger, F4:F200, là je voudrais la colonne E4:F200.
Comment pourrais je faire?
Merci par avance!
Pièces jointes
Dernière édition: