Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Prob de copie avec collage spécail

Prob de copie avec collage spécail

5 réponses
Avatar
Coucou
Bonjour,

Avec la formule ci-dessous j'arrive à copier M1 en A1
mais je voudrais ne pas devoir "aller" en A1 et rester une fois l'opération
finie où j'étais au départ...

[M1].Copy
Range("A1").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=
_
False, Transpose:=False
Application.CutCopyMode = False

Merci de votre aide
Coucou
Signaler un problème avec ce contenu

5 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
AV
| Avec la formule ci-dessous j'arrive à copier M1 en A1
| mais je voudrais ne pas devoir "aller" en A1 et rester une fois l'opération
| finie où j'étais au départ...

[A1]=[M1]

AV
Avatar
Jacky
Bonsoir,
ou encore.....sans vba

En A1
=M1

Salutations
JJ

"Coucou" a écrit dans le message de news:
44524879$0$23533$
Bonjour,

Avec la formule ci-dessous j'arrive à copier M1 en A1
mais je voudrais ne pas devoir "aller" en A1 et rester une fois
l'opération
finie où j'étais au départ...

[M1].Copy
Range("A1").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks: > _
False, Transpose:úlse
Application.CutCopyMode = False

Merci de votre aide
Coucou




Avatar
Coucou
Visblement je me suis mal exprimé car je souhaite pas simplement copier mais
copier en valeur...

--
Bonjour,

Merci de votre aide
Coucou
"Coucou" a écrit dans le message de news:
44524879$0$23533$
Bonjour,

Avec la formule ci-dessous j'arrive à copier M1 en A1
mais je voudrais ne pas devoir "aller" en A1 et rester une fois
l'opération

finie où j'étais au départ...

[M1].Copy
Range("A1").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone,
SkipBlanks: > _

False, Transpose:úlse
Application.CutCopyMode = False

Merci de votre aide
Coucou




Avatar
AV
| Visblement je me suis mal exprimé car je souhaite pas simplement copier mais
| copier en valeur...

C'est ce que fait l'intruction déjà proposée
[A1]=[M1]

AV
Avatar
Coucou
Merci c'est OK
Jamais j'aurai pensé à un code aussi simple...


--
Bonjour,

Merci de votre aide
Coucou
"Coucou" a écrit dans le message de news:
44524879$0$23533$
Bonjour,

Avec la formule ci-dessous j'arrive à copier M1 en A1
mais je voudrais ne pas devoir "aller" en A1 et rester une fois
l'opération

finie où j'étais au départ...

[M1].Copy
Range("A1").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone,
SkipBlanks: > _

False, Transpose:úlse
Application.CutCopyMode = False

Merci de votre aide
Coucou