Discussion :

[Tytelle]

Bonjour,

Je cherche à sélectionner plusieurs plages de cellules, mais il semblerais que la méthode range("A1:B3, C2: D4").select ne fonctionne pas. J'obtiens l'erreur "1004: select method of range class failed"
Est-ce mal écris? Il a-t-il quelque chose à sélectionner dans outils>références de l'éditeur VB?

Après plusieurs bidouilles, j'ai contourné le problème avec ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
  Dim r1, r2 As Range
   Set r1 = Worksheets("Summary raw data").Range("A5:AJ5")
   Set r2 = Worksheets("Summary raw data").Range("AZ5:BS5")
   Union(r1, r2).Copy

Mais la méthode select ne marche pas...
J'aimerais aussi selectionner les cellules en dessous avec un offset(end(xldown)) mais là non plus ça ne marche pas...
Help!

Merci de votre aide

[casefayere]

Bonjour,
essayes comme ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Dim r1 As Range, r2 As Range
Set r1 = Worksheets("Summary raw data").Range("A5:AJ5")
Set r2 = Worksheets("Summary raw data").Range("AZ5:BS5")
Application.Union(r1, r2).Select

[Tytelle]

Bizarrement si je regroupe tout comme ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Worksheets("Summary raw data").activate
Union(Range("A5:AJ5"), Range("AZ5:BS5")).Select

Ca fonctionne très bien
Merci pour ton aide