Discussion :

[bilou_12]

Bonjour,

Je cherche à affecter une plage de cellules à une variable range comme suit:

Code :

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

1
2
3
4
5
6
7
8
Sub Selection_Donnees(date_debut As Date, date_fin As Date)
 
    Dim max_i As Integer, max_j As Integer, i As Integer, debut As Integer, fin As Integer
    Dim grandeplage As Range, plage As Range
 
    If date_fin > date_debut Then
 
        grandeplage = Worksheets("Feuil1").Range("A1:B2548")

Pourquoi cela ne marche pas?

L'erreur est

variable objet ou variable de bloc With non définie

Merci d'avance!

[gFZT82]

Bonjour,

Pour affecter la référence de la plage A1:B2548 à la variable grandeplage, tu dois utiliser l'instruction Set

Code :

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

Set grandeplage = Worksheets("Feuil1").Range("A1:B2548")

Cordialement.

[bilou_12]

Merci !!!