VBA : Insérer plusieurs Range en une fois

Résolu

Jauster Messages postés 142 Statut Membre -
Jauster Messages postés 142 Statut Membre - 30 avr. 2018 à 15:59

Bonjour,

Pour le moment j'ai ce code :

Range("B:B,D:D,E:E,G:G,H:H,CH:CH,BN:BN").Copy wsMAJ.Range("A1")

et je souhaiterais faire la même chose en utilisant ma variable DerLig (DerLig = Range("A" & Rows.Count).End(xlUp).Row) pour limiter le nombre de lignes à copier. Mais est-il possible de le faire sans faire plusieurs copier/coller ?

Merci

Afficher la suite

1 réponse

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

Comme ceci:
```
Dim n As Long
n = Range("B65536").End(xlUp).Row 'prendre la colonne la plus remplie
Range("B1:B" & n & ",D1:D" & n & ",E1:E" & n & ",G1:G" & n & "").Copy wsMAJ.Range("A1") ' a completer
```
1
1. Jauster Messages postés 142 Statut Membre 42
  
  Super merci, j'avais un doute sur l'utilisation du & autant de fois dans Range. Le dernier & "" est nécessaire pour fermer la chaine ?
  
  0

VBA : Insérer plusieurs Range en une fois

1 réponse

Discussions similaires

Newsletters