Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Copier picoler

Copier picoler

6 réponses
Avatar
garnote
Bonsoir,

J'aimerais savoir s'il est possible d'utiliser
cette syntaxe avec un PasteSpecial (xlValues).
Par exemple, j1:p2 contient des formules et
je voudrais ne copier que les valeurs.

Sub SubSub()
[j1:p2].Copy Sheets(3).[s4]
End Sub

Serge
Signaler un problème avec ce contenu

6 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Philippe.R
Bonjoir Serge,
Je n'ai trouvé que ceci, mais pas sur que ce soit le résultat attendu :

Sub SubSubSub()
[j1:p2].Copy
Sheets(3).[s4].PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End Sub

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"garnote" a écrit dans le message de news:Pg8Yb.58828$
Bonsoir,

J'aimerais savoir s'il est possible d'utiliser
cette syntaxe avec un PasteSpecial (xlValues).
Par exemple, j1:p2 contient des formules et
je voudrais ne copier que les valeurs.

Sub SubSub()
[j1:p2].Copy Sheets(3).[s4]
End Sub

Serge




Avatar
garnote
Salut Philippe,

Ça marche parfaitement.

Serge

"Philippe.R" a écrit dans le message de news:

Bonjoir Serge,
Je n'ai trouvé que ceci, mais pas sur que ce soit le résultat attendu :

Sub SubSubSub()
[j1:p2].Copy
Sheets(3).[s4].PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End Sub

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"garnote" a écrit dans le message de
news:Pg8Yb.58828$

Bonsoir,

J'aimerais savoir s'il est possible d'utiliser
cette syntaxe avec un PasteSpecial (xlValues).
Par exemple, j1:p2 contient des formules et
je voudrais ne copier que les valeurs.

Sub SubSub()
[j1:p2].Copy Sheets(3).[s4]
End Sub

Serge








Avatar
sabatier
dis, serge, tu pourrais pas, de temps en temps, te servir de
l'enregistreur de macros avant de poser des questions dont ma petite
fille -qui va avoir 6 ans dans quelques jours dit qu'il y a déjà trois
ans qu'elle sait écrire de telles procs....
jps

garnote a écrit:
Salut Philippe,

Ça marche parfaitement.

Serge

"Philippe.R" a écrit dans le message de news:


Bonjoir Serge,
Je n'ai trouvé que ceci, mais pas sur que ce soit le résultat attendu :

Sub SubSubSub()
[j1:p2].Copy
Sheets(3).[s4].PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End Sub

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"garnote" a écrit dans le message de


news:Pg8Yb.58828$

Bonsoir,

J'aimerais savoir s'il est possible d'utiliser
cette syntaxe avec un PasteSpecial (xlValues).
Par exemple, j1:p2 contient des formules et
je voudrais ne copier que les valeurs.

Sub SubSub()
[j1:p2].Copy Sheets(3).[s4]
End Sub

Serge












Avatar
garnote
L'enregistreur de macros, mon oeil !

En voyant ça :
Sub EnregistreurDeMacros()
Selection.Copy
Range("C7").Select
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub

Tu peux en déduire ça :
Sub SansEnregistreur()
Selection.Copy [c7]
End Sub

Tu en as de la chance.

Quant au xlValues, je pensais que c'était possible
de l'inclure sur la seule ligne de la précédente macro.

Serge






"sabatier" a écrit dans le message de news:

dis, serge, tu pourrais pas, de temps en temps, te servir de
l'enregistreur de macros avant de poser des questions dont ma petite
fille -qui va avoir 6 ans dans quelques jours dit qu'il y a déjà trois
ans qu'elle sait écrire de telles procs....
jps

garnote a écrit:
Salut Philippe,

Ça marche parfaitement.

Serge

"Philippe.R" a écrit dans le message de news:


Bonjoir Serge,
Je n'ai trouvé que ceci, mais pas sur que ce soit le résultat attendu :

Sub SubSubSub()
[j1:p2].Copy
Sheets(3).[s4].PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End Sub

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"garnote" a écrit dans le message de


news:Pg8Yb.58828$

Bonsoir,

J'aimerais savoir s'il est possible d'utiliser
cette syntaxe avec un PasteSpecial (xlValues).
Par exemple, j1:p2 contient des formules et
je voudrais ne copier que les valeurs.

Sub SubSub()
[j1:p2].Copy Sheets(3).[s4]
End Sub

Serge















Avatar
sabatier
bon, bon, ne crie pas, serge, même si tu veux optimiser ton code....
jps

garnote a écrit:
L'enregistreur de macros, mon oeil !

En voyant ça :
Sub EnregistreurDeMacros()
Selection.Copy
Range("C7").Select
ActiveSheet.Paste


ici, tu n'as pas fait Collage valeurs sinon tu aurais eu :
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse

Application.CutCopyMode = False
End Sub

Tu peux en déduire ça :
Sub SansEnregistreur()
Selection.Copy [c7]
End Sub

Tu en as de la chance.

Quant au xlValues, je pensais que c'était possible
de l'inclure sur la seule ligne de la précédente macro.

Serge






"sabatier" a écrit dans le message de news:


dis, serge, tu pourrais pas, de temps en temps, te servir de
l'enregistreur de macros avant de poser des questions dont ma petite
fille -qui va avoir 6 ans dans quelques jours dit qu'il y a déjà trois
ans qu'elle sait écrire de telles procs....
jps

garnote a écrit:

Salut Philippe,

Ça marche parfaitement.

Serge

"Philippe.R" a écrit dans le message de news:



Bonjoir Serge,
Je n'ai trouvé que ceci, mais pas sur que ce soit le résultat attendu :

Sub SubSubSub()
[j1:p2].Copy
Sheets(3).[s4].PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End Sub

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"garnote" a écrit dans le message de


news:Pg8Yb.58828$


Bonsoir,

J'aimerais savoir s'il est possible d'utiliser
cette syntaxe avec un PasteSpecial (xlValues).
Par exemple, j1:p2 contient des formules et
je voudrais ne copier que les valeurs.

Sub SubSub()
[j1:p2].Copy Sheets(3).[s4]
End Sub

Serge

















Avatar
garnote
OK d'abord.
Bonne fête, même si on ne doit pas dire ça en français français !
Et quant à mon code, je m'en câlice complètement !

:-)))

Serge

bon, bon, ne crie pas, serge, même si tu veux optimiser ton code....
jps