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.
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
sabatier
je trouve ce Sub Odor quelque peu Sub Versif ... jps
"Philippe.R" wrote:
Bonsoir, 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" a écrit dans le message de news:
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 trouve ce Sub Odor quelque peu Sub Versif ...
jps
"Philippe.R" wrote:
Bonsoir,
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
"Long John" <cballinari@bluewin.ch> a écrit dans le message de news:3fd4d2e2_2@news.bluewin.ch...
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.
je trouve ce Sub Odor quelque peu Sub Versif ... jps
"Philippe.R" wrote:
Bonsoir, 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" a écrit dans le message de news:
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
Philippe.R
Bonsoir, 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" a écrit dans le message de news:
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
Bonsoir,
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
"Long John" <cballinari@bluewin.ch> a écrit dans le message de news:3fd4d2e2_2@news.bluewin.ch...
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.
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" a écrit dans le message de news:
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
AV
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.
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
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.
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 :
