Valeur de cellule pour variable VBA

Bonjour,

J'ai un petit problème avec l'attribution d'une variable

Voici ce que je veux faire en cliquant sur un bouton :

Sub bouton_fonctionnel()
Sheets("Feuil1").Rows("5:53").EntireRow.Hidden = True
End Sub

J'aimerai saisir un intervalle de ligne à cacher en écrivant leurs numéros dans des cellules sur une page ("Feuil2" Range A1 et A2). Ces nombres sont par la suite attribuer à des variables (i, y) dans une macro VBA.

Je saisie donc A1=5 et A2=53 sur la feuil2

Sauf que quand j'active la macro il une il y a une erreur de compilation avec la valeur des variables.

Sub bouton_NOK()
Dim i
Dim y
i = Sheets("Feuil2").Range("A1").Value
y = Sheets("Feuil2").Range("A2").Value
Sheets("Feuil1").Rows("i:y").EntireRow.Hidden = True
End Sub

N'est-il pas possible, dans Rows, de remplacer les numéros de ligne par des variables ayant pour valeur ces mêmes numéros de ligne ?

Merci d'avance, bonne journée

2test.xlsm (19.61 Ko)

Bonjour,

Ceci:

Sheets("Feuil1").Rows(i & ":" & y).EntireRow.Hidden = True

Cdlt

Merci bien ! Simple, efficace

Bonne journée !

Rechercher des sujets similaires à "valeur variable vba"