Copier/coller de valeur et non de formule

[Tungstene]

Bonjour,

Voici mon code pour copier coller. Sauf que je veux que cela copie uniquement la veleur et non la formule complète. Que dois -je modifier svp?

Range('B100:AK100').Copy
Range('B101').Select
ActiveSheet.Paste
Application.CutCopyMode = False

 

[anuky]

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+

 

[Hervé]

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

 

[Tungstene]

Parfait je vous remercie!
A+