G Geraldine XLDnaute Occasionnel 27 Novembre 2007 #1 Bonjour le forum, un petit exemple joint pour être plus clair, Je veux copier une ligne qui comporte dans ces cellules "=feuil!a1", mais je ne veux pas copier la formule mais la valeur trouvée ? Merci, Géraldine Pièces jointes COPIELigne.xls 27.5 KB · Affichages: 54 COPIELigne.xls 27.5 KB · Affichages: 58 COPIELigne.xls 27.5 KB · Affichages: 54
Bonjour le forum, un petit exemple joint pour être plus clair, Je veux copier une ligne qui comporte dans ces cellules "=feuil!a1", mais je ne veux pas copier la formule mais la valeur trouvée ? Merci, Géraldine
fred65200 XLDnaute Impliqué 27 Novembre 2007 #2 Re : Copier Ligne, la valeur et pas la formule Bonjour, essaie Code: Range("A4:D4").Copy 'ajuste nom de feuille et adresse de cellule Sheets("Feuil1").Range("A4").PasteSpecial Paste:=xlPasteValues cordialement Vote positif 0 Vote négatif
Re : Copier Ligne, la valeur et pas la formule Bonjour, essaie Code: Range("A4:D4").Copy 'ajuste nom de feuille et adresse de cellule Sheets("Feuil1").Range("A4").PasteSpecial Paste:=xlPasteValues cordialement
G Geraldine XLDnaute Occasionnel 27 Novembre 2007 #3 Re : Copier Ligne, la valeur et pas la formule merci fred, j'ai modifié comme ceci : Code: Private Sub CommandButton1_Click() Range("A4:D4").Copy 'ajuste nom de feuille et adresse de cellule Sheets("feuil2").Range("A65536").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteValues End Sub avec mes remerciements, Bonne journée géraldine Vote positif 0 Vote négatif
Re : Copier Ligne, la valeur et pas la formule merci fred, j'ai modifié comme ceci : Code: Private Sub CommandButton1_Click() Range("A4:D4").Copy 'ajuste nom de feuille et adresse de cellule Sheets("feuil2").Range("A65536").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteValues End Sub avec mes remerciements, Bonne journée géraldine