Sélection
Le
Long John
Bonjour,
Je vais en faire sourire certaine et certains, mais mes connaissances en VBA
sont très sommaires, mais faute avouées à moitié pardonnée.
Dans une feuille de calcul, j'aimerais faire un copier/coller, par exemple
le contenu d'une cellule dans deux autres cellules non adressées.
Copier cellule A2 et coller dans des cellules à ne pas référencer, car je
travaille en mode filtre et les 2 cellules à coller ne doivent pas être
référencées, car les références ne seront pas utilisables.
J'ai fait des essais avec l'enregistreur de macro, mais impossible de
résoudre le problème de l'adressage.
Je remercie d'avance ceux qui prendront la peine de me répondre et je salue
tout le monde.
CB
Je vais en faire sourire certaine et certains, mais mes connaissances en VBA
sont très sommaires, mais faute avouées à moitié pardonnée.
Dans une feuille de calcul, j'aimerais faire un copier/coller, par exemple
le contenu d'une cellule dans deux autres cellules non adressées.
Copier cellule A2 et coller dans des cellules à ne pas référencer, car je
travaille en mode filtre et les 2 cellules à coller ne doivent pas être
référencées, car les références ne seront pas utilisables.
J'ai fait des essais avec l'enregistreur de macro, mais impossible de
résoudre le problème de l'adressage.
Je remercie d'avance ceux qui prendront la peine de me répondre et je salue
tout le monde.
CB
Poser une question
jps
"Philippe.R" wrote:
Ceci convient il ?
Sub OdOr()
' MPFE le 08/12/2003 par Philippe Raulet
'copie A2 vers les cellules selectionnées
With Selection
[a2].Copy
'Range("AG11:AG12").Select
ActiveSheet.Paste
Application.CutCopyMode = False
End With
End Sub
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL97 / XL2002
"Long John"
Un truc m'échappe : "deux autres cellules non adressées"
Qu'est-ce à dire ?
Sous réserve....si tu veux copier le contenu de A1 en B5 et en C10 :
Range("B5,C10") = [A1]
AV