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
Jacky
Bonsoir,
Ceci copie la zone de la feuille 2 vers la même zone de la feuille 1 y compris les formules et les formats
'----------- Sheets(2).Range("D1:J8").Copy Sheets(1).Range("D1") ou Sheets("feuil2").Range("D1:J8").Copy Sheets("Feuil1").Range("D1") '-----------
Ceci ne copie que les valeurs '--------- Sheets(2).Range("D1:J8").Copy Sheets(1).Range("D1").PasteSpecial Paste:=xlPasteValues ou Sheets("feuil2").Range("D1:J8").Copy Sheets("feuil1").Range("D1").PasteSpecial Paste:=xlPasteValues '-------
Salutations JJ
"MorMic" a écrit dans le message de news: 45897a5a$0$25947$
Bonsoir à tous
Je cherche à recopier le contenu d'une zone d'une feuille vers une autre.
Si ce n'est pas possible, quelle est la meilleure solution ?
Merci d'avance pour votre aide.
Michel
Bonsoir,
Ceci copie la zone de la feuille 2 vers la même zone de la feuille 1 y
compris les formules et les formats
'-----------
Sheets(2).Range("D1:J8").Copy Sheets(1).Range("D1")
ou
Sheets("feuil2").Range("D1:J8").Copy Sheets("Feuil1").Range("D1")
'-----------
Ceci ne copie que les valeurs
'---------
Sheets(2).Range("D1:J8").Copy
Sheets(1).Range("D1").PasteSpecial Paste:=xlPasteValues
ou
Sheets("feuil2").Range("D1:J8").Copy
Sheets("feuil1").Range("D1").PasteSpecial Paste:=xlPasteValues
'-------
Salutations
JJ
"MorMic" <mor.mic@wanadoo.fr> a écrit dans le message de news:
45897a5a$0$25947$ba4acef3@news.orange.fr...
Bonsoir à tous
Je cherche à recopier le contenu d'une zone d'une feuille vers une autre.
Ceci copie la zone de la feuille 2 vers la même zone de la feuille 1 y compris les formules et les formats
'----------- Sheets(2).Range("D1:J8").Copy Sheets(1).Range("D1") ou Sheets("feuil2").Range("D1:J8").Copy Sheets("Feuil1").Range("D1") '-----------
Ceci ne copie que les valeurs '--------- Sheets(2).Range("D1:J8").Copy Sheets(1).Range("D1").PasteSpecial Paste:=xlPasteValues ou Sheets("feuil2").Range("D1:J8").Copy Sheets("feuil1").Range("D1").PasteSpecial Paste:=xlPasteValues '-------
Salutations JJ
"MorMic" a écrit dans le message de news: 45897a5a$0$25947$
Bonsoir à tous
Je cherche à recopier le contenu d'une zone d'une feuille vers une autre.
Si ce n'est pas possible, quelle est la meilleure solution ?
Merci d'avance pour votre aide.
Michel
MorMic
Merci Jacky
La solution ne copiant que les valeurs me convient parfaitement. Mais j'ai un message d'alerte Excel m'indiquant que le Presse-papiers contient trop d'éléments, etc, etc ce qui est génant dans mon application. Y-a-t'il un moyen de ne pas avoir ce message ?
Merci encore pour votre aide. Michel
"Jacky" a écrit dans le message de news:
Bonsoir,
Ceci copie la zone de la feuille 2 vers la même zone de la feuille 1 y compris les formules et les formats
'----------- Sheets(2).Range("D1:J8").Copy Sheets(1).Range("D1") ou Sheets("feuil2").Range("D1:J8").Copy Sheets("Feuil1").Range("D1") '-----------
Ceci ne copie que les valeurs '--------- Sheets(2).Range("D1:J8").Copy Sheets(1).Range("D1").PasteSpecial Paste:=xlPasteValues ou Sheets("feuil2").Range("D1:J8").Copy Sheets("feuil1").Range("D1").PasteSpecial Paste:=xlPasteValues '-------
Salutations JJ
"MorMic" a écrit dans le message de news: 45897a5a$0$25947$
Bonsoir à tous
Je cherche à recopier le contenu d'une zone d'une feuille vers une autre.
Si ce n'est pas possible, quelle est la meilleure solution ?
Merci d'avance pour votre aide.
Michel
Merci Jacky
La solution ne copiant que les valeurs me convient parfaitement.
Mais j'ai un message d'alerte Excel m'indiquant que le Presse-papiers
contient trop d'éléments, etc, etc
ce qui est génant dans mon application.
Y-a-t'il un moyen de ne pas avoir ce message ?
Merci encore pour votre aide.
Michel
"Jacky" <dupont@marcel.fr> a écrit dans le message de news:
e5JfqVGJHHA.1008@TK2MSFTNGP06.phx.gbl...
Bonsoir,
Ceci copie la zone de la feuille 2 vers la même zone de la feuille 1 y
compris les formules et les formats
'-----------
Sheets(2).Range("D1:J8").Copy Sheets(1).Range("D1")
ou
Sheets("feuil2").Range("D1:J8").Copy Sheets("Feuil1").Range("D1")
'-----------
Ceci ne copie que les valeurs
'---------
Sheets(2).Range("D1:J8").Copy
Sheets(1).Range("D1").PasteSpecial Paste:=xlPasteValues
ou
Sheets("feuil2").Range("D1:J8").Copy
Sheets("feuil1").Range("D1").PasteSpecial Paste:=xlPasteValues
'-------
Salutations
JJ
"MorMic" <mor.mic@wanadoo.fr> a écrit dans le message de news:
45897a5a$0$25947$ba4acef3@news.orange.fr...
Bonsoir à tous
Je cherche à recopier le contenu d'une zone d'une feuille vers une
autre.
La solution ne copiant que les valeurs me convient parfaitement. Mais j'ai un message d'alerte Excel m'indiquant que le Presse-papiers contient trop d'éléments, etc, etc ce qui est génant dans mon application. Y-a-t'il un moyen de ne pas avoir ce message ?
Merci encore pour votre aide. Michel
"Jacky" a écrit dans le message de news:
Bonsoir,
Ceci copie la zone de la feuille 2 vers la même zone de la feuille 1 y compris les formules et les formats
'----------- Sheets(2).Range("D1:J8").Copy Sheets(1).Range("D1") ou Sheets("feuil2").Range("D1:J8").Copy Sheets("Feuil1").Range("D1") '-----------
Ceci ne copie que les valeurs '--------- Sheets(2).Range("D1:J8").Copy Sheets(1).Range("D1").PasteSpecial Paste:=xlPasteValues ou Sheets("feuil2").Range("D1:J8").Copy Sheets("feuil1").Range("D1").PasteSpecial Paste:=xlPasteValues '-------
Salutations JJ
"MorMic" a écrit dans le message de news: 45897a5a$0$25947$
Bonsoir à tous
Je cherche à recopier le contenu d'une zone d'une feuille vers une autre.
Si ce n'est pas possible, quelle est la meilleure solution ?
Merci d'avance pour votre aide.
Michel
Jacky
Re... En fin de macro ou de la copie, ceci: '-------- Application.CutCopyMode = False '--------- Salutations JJ
"MorMic" a écrit dans le message de news: 45898640$0$5084$
Merci Jacky
La solution ne copiant que les valeurs me convient parfaitement. Mais j'ai un message d'alerte Excel m'indiquant que le Presse-papiers contient trop d'éléments, etc, etc ce qui est génant dans mon application. Y-a-t'il un moyen de ne pas avoir ce message ?
Merci encore pour votre aide. Michel
"Jacky" a écrit dans le message de news:
Bonsoir,
Ceci copie la zone de la feuille 2 vers la même zone de la feuille 1 y compris les formules et les formats
'----------- Sheets(2).Range("D1:J8").Copy Sheets(1).Range("D1") ou Sheets("feuil2").Range("D1:J8").Copy Sheets("Feuil1").Range("D1") '-----------
Ceci ne copie que les valeurs '--------- Sheets(2).Range("D1:J8").Copy Sheets(1).Range("D1").PasteSpecial Paste:=xlPasteValues ou Sheets("feuil2").Range("D1:J8").Copy Sheets("feuil1").Range("D1").PasteSpecial Paste:=xlPasteValues '-------
Salutations JJ
"MorMic" a écrit dans le message de news: 45897a5a$0$25947$
Bonsoir à tous
Je cherche à recopier le contenu d'une zone d'une feuille vers une autre.
Si ce n'est pas possible, quelle est la meilleure solution ?
Merci d'avance pour votre aide.
Michel
Re...
En fin de macro ou de la copie, ceci:
'--------
Application.CutCopyMode = False
'---------
Salutations
JJ
"MorMic" <mor.mic@wanadoo.fr> a écrit dans le message de news:
45898640$0$5084$ba4acef3@news.orange.fr...
Merci Jacky
La solution ne copiant que les valeurs me convient parfaitement.
Mais j'ai un message d'alerte Excel m'indiquant que le Presse-papiers
contient trop d'éléments, etc, etc
ce qui est génant dans mon application.
Y-a-t'il un moyen de ne pas avoir ce message ?
Merci encore pour votre aide.
Michel
"Jacky" <dupont@marcel.fr> a écrit dans le message de news:
e5JfqVGJHHA.1008@TK2MSFTNGP06.phx.gbl...
Bonsoir,
Ceci copie la zone de la feuille 2 vers la même zone de la feuille 1 y
compris les formules et les formats
'-----------
Sheets(2).Range("D1:J8").Copy Sheets(1).Range("D1")
ou
Sheets("feuil2").Range("D1:J8").Copy Sheets("Feuil1").Range("D1")
'-----------
Ceci ne copie que les valeurs
'---------
Sheets(2).Range("D1:J8").Copy
Sheets(1).Range("D1").PasteSpecial Paste:=xlPasteValues
ou
Sheets("feuil2").Range("D1:J8").Copy
Sheets("feuil1").Range("D1").PasteSpecial Paste:=xlPasteValues
'-------
Salutations
JJ
"MorMic" <mor.mic@wanadoo.fr> a écrit dans le message de news:
45897a5a$0$25947$ba4acef3@news.orange.fr...
Bonsoir à tous
Je cherche à recopier le contenu d'une zone d'une feuille vers une
autre.
Re... En fin de macro ou de la copie, ceci: '-------- Application.CutCopyMode = False '--------- Salutations JJ
"MorMic" a écrit dans le message de news: 45898640$0$5084$
Merci Jacky
La solution ne copiant que les valeurs me convient parfaitement. Mais j'ai un message d'alerte Excel m'indiquant que le Presse-papiers contient trop d'éléments, etc, etc ce qui est génant dans mon application. Y-a-t'il un moyen de ne pas avoir ce message ?
Merci encore pour votre aide. Michel
"Jacky" a écrit dans le message de news:
Bonsoir,
Ceci copie la zone de la feuille 2 vers la même zone de la feuille 1 y compris les formules et les formats
'----------- Sheets(2).Range("D1:J8").Copy Sheets(1).Range("D1") ou Sheets("feuil2").Range("D1:J8").Copy Sheets("Feuil1").Range("D1") '-----------
Ceci ne copie que les valeurs '--------- Sheets(2).Range("D1:J8").Copy Sheets(1).Range("D1").PasteSpecial Paste:=xlPasteValues ou Sheets("feuil2").Range("D1:J8").Copy Sheets("feuil1").Range("D1").PasteSpecial Paste:=xlPasteValues '-------
Salutations JJ
"MorMic" a écrit dans le message de news: 45897a5a$0$25947$
Bonsoir à tous
Je cherche à recopier le contenu d'une zone d'une feuille vers une autre.