Fonction paramArray de Range => mettre à nothing

[TgR]

Bonjour,

J'essaye de faire une fonction qui prendrait un nombre de range indéterminé et qui mette toutes ces ranges à "nothing".

j'ai tenté ceci :

Function clearRange(ParamArray cellules() As Variant)
Dim i As Integer
For i = 0 To UBound(cellules)
    cellules(i) = Nothing
Next i
End Function

A l'exécution du code j'obtiens une erreur 91 : Variable objet ou variable de bloc with non définie

Comment arranger ça ?

merci 🙂

 

[Theze]

Re : Fonction paramArray de Range => mettre à nothing

Bonjour,

Je ne sais pas trop ce que tu veux faire mais pour mettre à "Nothing" il faut utiliser l'instruction "Set" :

Set cellules(i) = Nothing

Hervé.