OVH Cloud OVH Cloud

copier et coller tout sauf les formules

5 réponses
Avatar
JEAN
bonjour,

Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:=False _
', Transpose:=False

cette commande me permet de tout copier

je voudrai tout copier sans les formules
comment s'ecrirai cette lignes alors?

merci

5 réponses

Avatar
denis P
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:úlse

"JEAN" a écrit dans le message de
news:
bonjour,

Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:úlse
_

', Transpose:úlse

cette commande me permet de tout copier

je voudrai tout copier sans les formules
comment s'ecrirai cette lignes alors?

merci


Avatar
JEAN
ca me met une erreur de cellules fusionnées


Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:úlse

"JEAN" a écrit dans le message de
news:
bonjour,

Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:úlse
_

', Transpose:úlse

cette commande me permet de tout copier

je voudrai tout copier sans les formules
comment s'ecrirai cette lignes alors?

merci







Avatar
anomymousA
bonjour,

par ailleurs, ca ne copie ni les formats ni les commentaires. pour avoir
formats et commentaires, il faut déclarer Paste:=xlFormats et
Paste:=xlPasteComments
et effectivement pour les cellules fusionnées, ca ne marche pas.Sans
chercher très loin, peut-être défusionner d'abord puis refusionner ensuite.
Sais pas si y a quelque chose de meiux. Jamais essayé.

A+



ca me met une erreur de cellules fusionnées


Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:úlse

"JEAN" a écrit dans le message de
news:
bonjour,

Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:úlse
_

', Transpose:úlse

cette commande me permet de tout copier

je voudrai tout copier sans les formules
comment s'ecrirai cette lignes alors?

merci









Avatar
JEAN
comment défusionner et refusionner en codes vba
merci


bonjour,

par ailleurs, ca ne copie ni les formats ni les commentaires. pour avoir
formats et commentaires, il faut déclarer Paste:=xlFormats et
Paste:=xlPasteComments
et effectivement pour les cellules fusionnées, ca ne marche pas.Sans
chercher très loin, peut-être défusionner d'abord puis refusionner ensuite.
Sais pas si y a quelque chose de meiux. Jamais essayé.

A+



ca me met une erreur de cellules fusionnées


Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:úlse

"JEAN" a écrit dans le message de
news:
bonjour,

Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:úlse
_

', Transpose:úlse

cette commande me permet de tout copier

je voudrai tout copier sans les formules
comment s'ecrirai cette lignes alors?

merci











Avatar
anomymousA
re,

JEAN, connais-tu l'enregistreur automatique de macros ? Si tu fais dans
Excel "Macros"/ "Nouvelle Macro" puis ensuite tu fais à la main ce que tu
souhaites faire (p.e: fusionner et défusionner des cellules") puis tu arrêtes
l'éditeur de macros. Tu vas ensuite voir dans VBA ce qu'Excel a écrit tout
seul pour toi en code VBA et ensuite tu essayes d'adapter le code à tes
besoins futurs en regardant l'aide de VBA eventuellement. Bref, tu essayes
d'apprendre, ce qui implique des essais et des erreurs, seule méthode garante
d'une progression efficace.
Je ne te veux aucun mal, mais en l'espèce, je ne te répondrai pas car tu as
tout ce qu'il faut pour faire sans même interroger qui que ce soit.

A+


comment défusionner et refusionner en codes vba
merci


bonjour,

par ailleurs, ca ne copie ni les formats ni les commentaires. pour avoir
formats et commentaires, il faut déclarer Paste:=xlFormats et
Paste:=xlPasteComments
et effectivement pour les cellules fusionnées, ca ne marche pas.Sans
chercher très loin, peut-être défusionner d'abord puis refusionner ensuite.
Sais pas si y a quelque chose de meiux. Jamais essayé.

A+



ca me met une erreur de cellules fusionnées


Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:úlse

"JEAN" a écrit dans le message de
news:
bonjour,

Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:úlse
_

', Transpose:úlse

cette commande me permet de tout copier

je voudrai tout copier sans les formules
comment s'ecrirai cette lignes alors?

merci