Coller sur cellule active

[Rick@]

Bonjour,

L'amateur que je suis n'arrive pas à créer une macro me permettant de coller (valeur seulement) le contenu préalablement copié sur une cellule quelconque sélectionnée (activecell)...

Voici mon essaie:

ActiveCell Range
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("B2").Select
End Sub

Merci à l'avance pour votre aide!

 

[tototiti2008]

Re : Coller sur cellule active

Bonjour Rick,

ActiveCell Range

Ne signifie pas grand chose, qu'est-ce tu voudrais que ça fasse

Pour coller, il faut copier avant, as-tu une ligne qui copie les données (avec "Copy" dedans) ?

 

[Rick@]

Re : Coller sur cellule active

En fait je copie déjà une sélection de cellules (4) avec une macro sur une feuille et sur sur autre feuille je dois coller cette sélection mais sur des cellules différente à chaque fois ...

 

[Rick@]

Re : Coller sur cellule active

Voici un fichier démo ce sera peut-être plus clair...

 

[tototiti2008]

Re : Coller sur cellule active

Re,

peut-être

Sub Coller()
ActiveCell.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
End Sub

 

[Rick@]

Re : Coller sur cellule active

Dans le mille!!! Merci à toi tototiti2008 et au plaisir!