Discussion :

[qvn83]

Bonjour,

J'ai un problème tout simple mais je ne trouve pas la syntaxe approprié pour ce problème.
1:
Je souhaite definir une plage de cellulle avec plusieurs cellules discontinue dans une feuille excel:
Dim maPlage As Range
Set maPlage = Range(Cells(5,2),(Cells(8,1)), ça fonctionne sauf qu'il va parcourir toutes les cellules de (5,2) à (8,1) !
Moi je veux que 2 cellules (5,2) et (8,1). J'ai essayé de mettre un ; à la place de , mais il retourne erreur.

2:
Je souhaite également savoir s'il n'est pas possible d'avoir une plage avec l'objet .Range sans passer par le nom de la plage en excel, ex Range("A16"), mais par des indices de ligne et colonne.

Merci d'avance car j'ai cherché sur de nombreux site, aucun ne traite du problème, bizarre car ce genre de chose est souvent utilisé en programmation (Python par ex)

[deedolith]

Salut,

Je pense qu'il va falloir jouer avec les adresses:

Code :

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

1
2
3
4
5
Dim Ws As Excel.Worksheet
Set Ws = ThisWorkbook.Worksheets("MaFeuille")
 
Dim Rng As Excel.Range
Set Rng = Ws.Range(Ws.Cells(5,2).Address & ", " & Ws.Cells(8,1).Address)

PS: Soit explicite avec tes références,
ca t'évitera de bien vilaines surprises pour la suite.

[Franc]

Bonjour, pour définir une plage de cellules discontinues, vous pouvez utiliser la méthode Union.

Code :

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

1
2
Dim maPlage As Range
Set maPlage = Union(Cells(5, 2), Cells(8, 1))

[qvn83]

Merci pour vos réponses !

J'avais pensé à union, mais j'étais plus parti sur une erreur de virgules ou de point virgule etc...

Bonne continuation à vous !