[VBA] Copier 2 colonnes d'un tableau dans une autre feuille

Bonjour à tous,

J'aimerais copier 2 colonnes de mon tableau dans une autre feuille excel et réaliser des traitement dessus,

J'ai utiliser l'enregistreur de macro pour réaliser celle-ci mais lorsque que je relance la macro enregistrée on me renvoie cette erreur :

Voici mon fichier excel :

Merci et bonne journée à tous,

Bonjour,

Ajoute la destination :

    Range("C:D").Select

entre

    Sheets("Feuil1").Select

et

    ActiveSheet.Paste

Bonjour,

Si les traitements à réaliser sur la copie sont de supprimer les lignes où les cellules de la deuxième colonne copiée sont vides, un essai :

Sub CopieSSA3()
'
' CopieSSA3 Macro
'
Dim Derlig As Long
    Derlig = Range("B" & Rows.Count).End(xlUp).Row
    Range("C1:D" & Derlig).Copy Worksheets("Feuil1").Range("A1")
    Worksheets("Feuil1").Range("A1:B" & Derlig).SpecialCells(xlCellTypeBlanks).Delete
    Application.CutCopyMode = False
End Sub

à adapter

A+

AlgoPlus et Oxydum,

Merci à tous les 2 pour vos réponses qui m'ont été très utiles, voici la macro final pour copier 2 colonnes sur une autre feuille et supprimer les lignes contenant une cellule vide :

Sub Ronde1Nuit()
'
' Ronde1Nuit Macro
'

'
    Range("C:D").Select
    Selection.Copy
    Sheets("Ronde1Nuit").Select
    Range("A1").Select
    ActiveSheet.Paste

    Worksheets("Ronde1Nuit").Range("A:B").SpecialCells(xlCellTypeBlanks).EntireRow.Delete

    Sheets("Données brutes").Select
    Application.CutCopyMode = False

End Sub

J'aimerais néanmoins affiner ce traitement et supprimer les lignes dont certaines cellules sont vides (et non pas une seule), par exemple un tableau de 4 colonnes la première étant la date et les 3 autres contenant des valeurs:

si sur une ligne les 3 dernières cellules sont vides supprimer la ligne,

Auriez-vous des pistes pour réaliser ce traitement ?

NB : Voici le fichier mis à jour