Aide pour macro (déplacer une cellule)

stefou

XLDnaute Nouveau
Bonjour, je voudrais crée une macro destinée à copié une cellule sélectionnée dans une autre cellule.
Mon idée était d'enregistrer une macro avec,
copier "la cellule active"
déplacé avec "Tabulation ou flèche à droite" de deux cases
coller
le problème est qu'il place toujours le copier dans la même cellule (celle que la macro à enregistré).
Dans le code on vois bien que "Tab" ou "flèche droit" est pas renseigné il donne la cellule finale.
Sub Macro3()
'
' Macro3 Macro
' Macro enregistrée le 28/05/2010 par stephan
'
' Touche de raccourci du clavier: Ctrl+w
'
Selection.Copy
Range("D8").Select <--- LE PROBLèME EST ICI
ActiveSheet.Paste
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub

Merci de m'aporté votre aide
 

pierrejean

XLDnaute Barbatruc
Re : Aide pour macro (déplacer une cellule)

bonjour stephane

Teste

Code:
Sub deplace
 Selection.Offset(0,2)=Selection.value
End sub
 

stefou

XLDnaute Nouveau
Re : Aide pour macro (déplacer une cellule)

Merci ca fonctionne
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas