OVH Cloud OVH Cloud

copier uniquement la valeur d'une cellule

8 réponses
Avatar
lucNo
Bonjour,
J'essaye de copier la valeur d'une cellule (sans la mise=20
en forme etc...), mais en utilisant cette ligne de=20
commande, tout est copi=E9!
Range("A" & i).Copy Destination:=3DSheets("HorsDelais").Range
("A" & b)

J'ai bien trouv=E9 cela:PasteSpecial Paste:=3DxlValues,
mais je ne sais pas o=F9 et comment l'inserer pour ne copier=20
que les valeurs.
Merci pour votre aide

8 réponses

Avatar
Vincent.
Salut !
Essaie ça :
Range("A" & i).copy
Sheets("HorsDelais").Range("A" & b). _
pastespecial xlpastevalues

tchô

-----Message d'origine-----
Bonjour,
J'essaye de copier la valeur d'une cellule (sans la mise
en forme etc...), mais en utilisant cette ligne de
commande, tout est copié!
Range("A" & i).Copy Destination:=Sheets
("HorsDelais").Range

("A" & b)

J'ai bien trouvé cela:PasteSpecial Paste:=xlValues,
mais je ne sais pas où et comment l'inserer pour ne
copier

que les valeurs.
Merci pour votre aide

.



Avatar
luc
J'ai essayé ça:
Range("A" & i).Copy Sheets("HorsDelais").Range("A" &
b).PasteSpecial = xlPasteValues
mais j'obtiens un message d'erreur:
Impossible de lire la propriété PasteSpecial de la classe
Range !
-----Message d'origine-----
Salut !
Essaie ça :
Range("A" & i).copy
Sheets("HorsDelais").Range("A" & b). _
pastespecial xlpastevalues

tchô

-----Message d'origine-----
Bonjour,
J'essaye de copier la valeur d'une cellule (sans la mise
en forme etc...), mais en utilisant cette ligne de
commande, tout est copié!
Range("A" & i).Copy Destination:=Sheets
("HorsDelais").Range

("A" & b)

J'ai bien trouvé cela:PasteSpecial Paste:=xlValues,
mais je ne sais pas où et comment l'inserer pour ne
copier

que les valeurs.
Merci pour votre aide

.

.





Avatar
Vincent.
Il faut mettre un retour à la ligne entre copy et sheets...
Et puis, vérifie que tes variables i et b sont bien des
nombres entiers compris entre 1 et 65536 !
Ca marche ou pas ?
Sinon, envoie dans ma bal (enlève le et remplace AT
par @)...
tchô

-----Message d'origine-----
J'ai essayé ça:
Range("A" & i).Copy Sheets("HorsDelais").Range("A" &
b).PasteSpecial = xlPasteValues
mais j'obtiens un message d'erreur:
Impossible de lire la propriété PasteSpecial de la classe
Range !
-----Message d'origine-----
Salut !
Essaie ça :
Range("A" & i).copy
Sheets("HorsDelais").Range("A" & b). _
pastespecial xlpastevalues

tchô

-----Message d'origine-----
Bonjour,
J'essaye de copier la valeur d'une cellule (sans la
mise



en forme etc...), mais en utilisant cette ligne de
commande, tout est copié!
Range("A" & i).Copy Destination:=Sheets
("HorsDelais").Range

("A" & b)

J'ai bien trouvé cela:PasteSpecial Paste:=xlValues,
mais je ne sais pas où et comment l'inserer pour ne
copier

que les valeurs.
Merci pour votre aide

.

.


.






Avatar
Vincent.
Il faut mettre un retour à la ligne entre copy et sheets...
Et puis, vérifie que tes variables i et b sont bien des
nombres entiers compris entre 1 et 65536 !
Ca marche ou pas ?
Sinon, envoie dans ma bal (enlève le et remplace AT
par @)...
tchô

-----Message d'origine-----
J'ai essayé ça:
Range("A" & i).Copy Sheets("HorsDelais").Range("A" &
b).PasteSpecial = xlPasteValues
mais j'obtiens un message d'erreur:
Impossible de lire la propriété PasteSpecial de la classe
Range !
-----Message d'origine-----
Salut !
Essaie ça :
Range("A" & i).copy
Sheets("HorsDelais").Range("A" & b). _
pastespecial xlpastevalues

tchô

-----Message d'origine-----
Bonjour,
J'essaye de copier la valeur d'une cellule (sans la
mise



en forme etc...), mais en utilisant cette ligne de
commande, tout est copié!
Range("A" & i).Copy Destination:=Sheets
("HorsDelais").Range

("A" & b)

J'ai bien trouvé cela:PasteSpecial Paste:=xlValues,
mais je ne sais pas où et comment l'inserer pour ne
copier

que les valeurs.
Merci pour votre aide

.

.


.






Avatar
AV
Range("HorsDelais!A" & b) = Range("A" & i).Value

PS : par défaut Range("A" & i) concerne la feuille active sinon préciser la
feuille dans la plage :
Range("HorsDelais!A" & b) = Range("laFeuilleA" & i).Value

AV
Avatar
lucno
Je t'ai envoyé un mail, l'as tu reçu?
Ca ne fonctionne tj pas et mes variables sont bonnes car
avant ce fonctionnait mais je copiais aussi la mise en
forme, c'est trop long, je veux juste les valeurs
Merci
Luc
-----Message d'origine-----
Il faut mettre un retour à la ligne entre copy et
sheets...

Et puis, vérifie que tes variables i et b sont bien des
nombres entiers compris entre 1 et 65536 !
Ca marche ou pas ?
Sinon, envoie dans ma bal (enlève le et remplace
AT

par @)...
tchô

-----Message d'origine-----
J'ai essayé ça:
Range("A" & i).Copy Sheets("HorsDelais").Range("A" &
b).PasteSpecial = xlPasteValues
mais j'obtiens un message d'erreur:
Impossible de lire la propriété PasteSpecial de la
classe


Range !
-----Message d'origine-----
Salut !
Essaie ça :
Range("A" & i).copy
Sheets("HorsDelais").Range("A" & b). _
pastespecial xlpastevalues

tchô

-----Message d'origine-----
Bonjour,
J'essaye de copier la valeur d'une cellule (sans la
mise



en forme etc...), mais en utilisant cette ligne de
commande, tout est copié!
Range("A" & i).Copy Destination:=Sheets
("HorsDelais").Range

("A" & b)

J'ai bien trouvé cela:PasteSpecial Paste:=xlValues,
mais je ne sais pas où et comment l'inserer pour ne
copier

que les valeurs.
Merci pour votre aide

.

.


.


.







Avatar
AV
T'as regardé juste au-dessous ?

AV
Avatar
lucno
Merci avec un peu de retard
Luc
-----Message d'origine-----
Je t'ai envoyé un mail, l'as tu reçu?
Ca ne fonctionne tj pas et mes variables sont bonnes car
avant ce fonctionnait mais je copiais aussi la mise en
forme, c'est trop long, je veux juste les valeurs
Merci
Luc
-----Message d'origine-----
Il faut mettre un retour à la ligne entre copy et
sheets...

Et puis, vérifie que tes variables i et b sont bien des
nombres entiers compris entre 1 et 65536 !
Ca marche ou pas ?
Sinon, envoie dans ma bal (enlève le et remplace
AT

par @)...
tchô

-----Message d'origine-----
J'ai essayé ça:
Range("A" & i).Copy Sheets("HorsDelais").Range("A" &
b).PasteSpecial = xlPasteValues
mais j'obtiens un message d'erreur:
Impossible de lire la propriété PasteSpecial de la
classe


Range !
-----Message d'origine-----
Salut !
Essaie ça :
Range("A" & i).copy
Sheets("HorsDelais").Range("A" & b). _
pastespecial xlpastevalues

tchô

-----Message d'origine-----
Bonjour,
J'essaye de copier la valeur d'une cellule (sans la
mise



en forme etc...), mais en utilisant cette ligne de
commande, tout est copié!
Range("A" & i).Copy Destination:=Sheets
("HorsDelais").Range

("A" & b)

J'ai bien trouvé cela:PasteSpecial Paste:=xlValues,
mais je ne sais pas où et comment l'inserer pour ne
copier

que les valeurs.
Merci pour votre aide

.

.


.


.


.