Copié différentes cellules en vba

JulienHch Messages postés 22 Statut Membre -  
JulienHch Messages postés 22 Statut Membre -
Bonjour,

J'aurais aimé savoir comment faire pour par exemple copié les cellule A1,A3,A7

et les coller respectivement en B1,B3,B7

Bien Cdlmnt
A voir également:

1 réponse

Réponse 1 / 1
cs_Le Pivert Messages postés 8437 Statut Contributeur 729
 
Bonjour,

En vba comme ceci: 

Worksheets("Feuil1").Range("B1").Value = Worksheets("Feuil1").Range("A1").Value


c'est simple, tu fais de même pour les autres
0
JulienHch Messages postés 22 Statut Membre
 
Bonjour,

Ce n’est pas possible de faire ;

.....Range(« A1 » et « A3 » et « A7 » ) = ........Range(« B1 » et « B3 » et « B7 ») ?

Cdlmnt
0
cs_Le Pivert Messages postés 8437 Statut Contributeur 729
 
Tu peux faire cela: 

Worksheets("Feuil1").Range("A1:A7").Copy _
    Destination:=Worksheets("Feuil1").Range("B1:B7")


Si tu veux démarrer en VBA, il y a de très bons tutoriaux sur le Net

https://www.excel-pratique.com/fr/vba/premiere_macro.php

Voilà
0
JulienHch Messages postés 22 Statut Membre
 
le problème avec cela c’est que ça va aussi copier les celulles A2 A4 et A5 et ça je ne veux pas
0
cs_Le Pivert Messages postés 8437 Statut Contributeur 729
 
Voir ceci:

https://www.mediaforma.com/vba-excel-on-selectionner-feuille-de-calcul/

ce qui donne cela: 

Worksheets("Feuil1").Range("B1:B2").Value = Worksheets("Feuil1").Range("A1:A2").Value
Worksheets("Feuil1").Range("B7").Value = Worksheets("Feuil1").Range("A7").Value


voilà
0
cs_Le Pivert Messages postés 8437 Statut Contributeur 729
 
et pour aller plus loin:

http://boisgontierjacques.free.fr/pages_site/tableaux.htm#Array

ce qui donne: 

  Dim a, i
a = Array(1, 3, 7)
  For i = LBound(a) To UBound(a)
    Worksheets("Feuil1").Range("B" & a(i)).Value = Worksheets("Feuil1").Range("A" & a(i)).Value
  Next i


Là, on a fait le tour de la question!
0

Discussions similaires

Copier un lien instagram
alaurore -
LEFEUVRE -

7 réponses
Retrouver liens copiés sur le téléphone
SAMA -
Peterson -

3 réponses
copie d'un lien dans le navigateur internet
Ulysse Orseau -
diamantnoir -

4 réponses
lien copié presse papier smartphone Samsung
luckygirl63 -
Pierr10 -

3 réponses