Copier/coller de valeur et non de formule

A

anuky

XLDnaute Occasionnel

• 28 Novembre 2005

• #2

Bonjour Tungstene et le forum,

Utilise ce code qui correpond à collage spécial valeurs:

remplacer :
ActiveSheet.Paste

Par:
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

Bon courrage, Bon appéti

A+

 

Vote positif 0 Vote négatif

Hervé

XLDnaute Barbatruc

• 28 Novembre 2005

• #3

Bonjour tungstène

essaye comme ceci :

Range('B100:AK100').Copy
Range('B101').PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False

salut

edition : salut anuky

Message édité par: hervé, à: 28/11/2005 12:08

 

Vote positif 0 Vote négatif

T

Tungstene

XLDnaute Occasionnel

• 28 Novembre 2005

• #4

Parfait je vous remercie!
A+

 

Vote positif 0 Vote négatif