Macro - copie de cellule

Bonjour, j'aimerais savoir comment faire ceci ...

J'aimerais ajouter un bouton dans excel qui me permettrait en cliquant dessus de couper par exemple toute les cellules de D2:D40 vers la destination C2:C40. Faire un transfer de colonnes en fait.

Merci de votre aide

Bonsoir,

Sub déplace()
    Range("d2:d40").Cut Destination:=Range("c2:c40")
End Sub

ou

Sub déplace2()
    Range("C2:C40").Delete Shift:=xlToLeft
End Sub

si pas çà, fournis un fichier exemple

Claude

Bonjour

Deja un tout grand merci pour votre aide

Cependant j'avoue qu'il me faudrait un petit peu plus de détail ... même créer un bouton, je ne sais plus comment faire

Si cela peut vous aider a me guider, je vous joins une version ....

Explications : Il faudrait que la colonne End soit déplacé vers la colonne start (B) et que la colonne OK (C) = la colonne start (B).

J'aimerais realiser cette automatisation parce que tous les jours le end de la veille devient le start le lendemain...

Merci d'avance

Bonjour,

essai sur une feuille, bouton à copier sur les autres feuilles

Sub Déplace()
    If Range("d8") = "" Then Exit Sub
    Range("b8:b45").Copy Destination:=Range("c8")
    Range("d8:d45").Copy Destination:=Range("b8")
    Range("d8:d45").ClearContents
End Sub

Amicalement

Claude

Un tout tout grand merci Claude!

si tu repasse par là,

n'oublie pas la petite formalité

claude