VBA Copie de colonnes

Bonjour

Je souhaiterais copier les colonnes A, B, D et M, à partir de la ligne 2 de la feuille effectif vers la feuille Taux d'occupation.

J'ai tenté cela mais sans succès :

Sub Taux_d_occupation()

    Range("A2:A70").Select
    Selection.Copy
    Sheets("Taux d'occupation").Select

    Range("A3").Select
    ActiveSheet.Paste
    Range("B2:B70").Select
    Selection.Copy

    Sheets("Taux d'occupation").Select
    Range("B3").Select
    ActiveSheet.Paste

    Range("D2:B70").Select
    Selection.Copy
    Sheets("Taux d'occupation").Select
    Range("C3").Select
    ActiveSheet.Paste

    Range("K2:K70").Select
    Selection.Copy
    Sheets("Taux d'occupation").Select
    Range("D3").Select
    ActiveSheet.Paste

End Sub

Comment faire ?

Salut Theyoshi,

je sors d'en prendre...

https://forum.excel-pratique.com/excel/macro-copie-colle-cases-non-vides-147961#p911601

A+

Merci de ta proposition.
Je n'arrive pas à la modifier pour qu'elle passe par un bouton et qu'elle n'ajoute pas ou ne supprime pas de colonnes sur la feuille de base.