Ben, je crois que tout est dans le titre....
Je souhaite pouvoir sélectionner des plages discontinues (jusque là, je
sais faire...) et les coller ailleurs, le tout en une seule manip (et
là, je ne sais plus faire....) afin d'alléger le code.
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
michdenis
Bonjour Thierry,
Tu dois passer par un objet qui s'appelle Areas -> un petit tour dans l'aide d'excel
dim r as range, s as range For Each r In Selection.Areas For Each s In r s.Copy 'destination Next Next
Salutations!
"ThierryP" a écrit dans le message de news: % Bonjour à tous !
Ben, je crois que tout est dans le titre.... Je souhaite pouvoir sélectionner des plages discontinues (jusque là, je sais faire...) et les coller ailleurs, le tout en une seule manip (et là, je ne sais plus faire....) afin d'alléger le code.
Si quelqu'un a une idée, qu'il le dise !!!
D'avance merci
thierryp
Bonjour Thierry,
Tu dois passer par un objet qui s'appelle Areas -> un petit tour dans l'aide d'excel
dim r as range, s as range
For Each r In Selection.Areas
For Each s In r
s.Copy 'destination
Next
Next
Salutations!
"ThierryP" <thierryp_NO_SPAM@club-internet.fr> a écrit dans le message de news: %23vuMlYypFHA.1260@TK2MSFTNGP10.phx.gbl...
Bonjour à tous !
Ben, je crois que tout est dans le titre....
Je souhaite pouvoir sélectionner des plages discontinues (jusque là, je
sais faire...) et les coller ailleurs, le tout en une seule manip (et
là, je ne sais plus faire....) afin d'alléger le code.
Tu dois passer par un objet qui s'appelle Areas -> un petit tour dans l'aide d'excel
dim r as range, s as range For Each r In Selection.Areas For Each s In r s.Copy 'destination Next Next
Salutations!
"ThierryP" a écrit dans le message de news: % Bonjour à tous !
Ben, je crois que tout est dans le titre.... Je souhaite pouvoir sélectionner des plages discontinues (jusque là, je sais faire...) et les coller ailleurs, le tout en une seule manip (et là, je ne sais plus faire....) afin d'alléger le code.
Si quelqu'un a une idée, qu'il le dise !!!
D'avance merci
thierryp
ThierryP
Bonjour Denis,
toujours aussi efficace :-))) Merci pour l'info, je vais me plonger dans l'aide.
@+ thierryp
Bonjour Thierry,
Tu dois passer par un objet qui s'appelle Areas -> un petit tour dans l'aide d'excel
dim r as range, s as range For Each r In Selection.Areas For Each s In r s.Copy 'destination Next Next
Salutations!
"ThierryP" a écrit dans le message de news: % Bonjour à tous !
Ben, je crois que tout est dans le titre.... Je souhaite pouvoir sélectionner des plages discontinues (jusque là, je sais faire...) et les coller ailleurs, le tout en une seule manip (et là, je ne sais plus faire....) afin d'alléger le code.
Si quelqu'un a une idée, qu'il le dise !!!
D'avance merci
thierryp
Bonjour Denis,
toujours aussi efficace :-)))
Merci pour l'info, je vais me plonger dans l'aide.
@+ thierryp
Bonjour Thierry,
Tu dois passer par un objet qui s'appelle Areas -> un petit tour dans l'aide d'excel
dim r as range, s as range
For Each r In Selection.Areas
For Each s In r
s.Copy 'destination
Next
Next
Salutations!
"ThierryP" <thierryp_NO_SPAM@club-internet.fr> a écrit dans le message de news: %23vuMlYypFHA.1260@TK2MSFTNGP10.phx.gbl...
Bonjour à tous !
Ben, je crois que tout est dans le titre....
Je souhaite pouvoir sélectionner des plages discontinues (jusque là, je
sais faire...) et les coller ailleurs, le tout en une seule manip (et
là, je ne sais plus faire....) afin d'alléger le code.
toujours aussi efficace :-))) Merci pour l'info, je vais me plonger dans l'aide.
@+ thierryp
Bonjour Thierry,
Tu dois passer par un objet qui s'appelle Areas -> un petit tour dans l'aide d'excel
dim r as range, s as range For Each r In Selection.Areas For Each s In r s.Copy 'destination Next Next
Salutations!
"ThierryP" a écrit dans le message de news: % Bonjour à tous !
Ben, je crois que tout est dans le titre.... Je souhaite pouvoir sélectionner des plages discontinues (jusque là, je sais faire...) et les coller ailleurs, le tout en une seule manip (et là, je ne sais plus faire....) afin d'alléger le code.
Si quelqu'un a une idée, qu'il le dise !!!
D'avance merci
thierryp
AV
Si tu veux copier seulement les valeurs de la plage (discontinue ou pas) de "Feuil1" nommée par ex. "plg", au même emplacement(s) en "Feuil2"
For Each c In [plage] Range("Feuil2!" & c.Address) = c Next
AV
Si tu veux copier seulement les valeurs de la plage (discontinue ou pas) de
"Feuil1" nommée par ex. "plg", au même emplacement(s) en "Feuil2"
For Each c In [plage]
Range("Feuil2!" & c.Address) = c
Next