Copier/Coller dans cellule vide et sans "formule"

phlaurent55

Nous a quittés en 2020

Repose en paix

• 23 Juillet 2015

• #2

Re : Copier/Coller dans cellule vide et sans "formule"

Bonjour Big Jules,

avec ce code:

Code:

Sheets("Feuil1").Cells(13, 3).Copy
Sheets("Feuil1").Range("K" & Range("K65525").End(xlUp).Row + 1).Select
Selection.PasteSpecial Paste:=xlPasteValues

à+
Philippe

 

Vote positif 0 Vote négatif

phlaurent55

Nous a quittés en 2020

Repose en paix

• 23 Juillet 2015

• #3

Re : Copier/Coller dans cellule vide et sans "formule"

Re,

ou plus simplement:

Code:

Sub Test()
Sheets("Feuil1").Range("K" & Range("K65525").End(xlUp).Row + 1) = Sheets("Feuil1").Cells(13, 3)
End Sub

à+
Philippe

 

Vote positif 0 Vote négatif

JBARBE

XLDnaute Barbatruc

• 23 Juillet 2015

• #4

Re : Copier/Coller dans cellule vide et sans "formule"

Bonsoir à tous,

Un essai :

With Sheets("Feuil1")

.Range("C13").Copy .Range ("K65536"). End(XlUp).offset(1,0)

end With

Bonne soirée

 

Vote positif 0 Vote négatif

B

BigJules

XLDnaute Nouveau

• 23 Juillet 2015

• #5

Re : Copier/Coller dans cellule vide et sans "formule"

Re bonsoir,

Merci Philippe ta solution marche parfaitement Sais-tu comment faire pour que la cellule C13 ne reste pas sélectionnée une fois la macro exécutée ?

Merci également à Jbarbe mais cette macro ne fonctionne pas (la formule se copie dans la premiere cellule vide )

Merci et bonne soirée

BigJules

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 23 Juillet 2015

• #6

Re : Copier/Coller dans cellule vide et sans "formule"

Bonsoir à tous,

Je suppose que par

Sais-tu comment faire pour que la cellule C13 ne reste pas sélectionnée une fois la macro exécutée ?

Cliquez pour agrandir...

tu veux dire faire disparaître les pointillés qui entourent C13 ?

si oui, ajoute avant End Sub

Code:

Application.cutcopymode=false

 

Vote positif 0 Vote négatif

B

BigJules

XLDnaute Nouveau

• 30 Juillet 2015

• #7

Re : Copier/Coller dans cellule vide et sans "formule"

Merci Tototiti ca marche parfaitement

A bientôt

 

Vote positif 0 Vote négatif