Utiliser une valeur stockée dans une variable Résolu

Question

Bonjour, 

Je suis en train de rédiger un bout de code, mais je suis débutant et j'ai besoin d'aide. Le code consiste à afficher la ligne 4 à x, x étant une valeur sotckée dans une variable.
Voici le code:

Sub valider()
Dim x As Byte
x = Range("D2")
MsgBox x
Rows("3:x").EntireRow.Hidden = True
End Sub

Le Msgbox affiche bien un entier mais il y a une erreur d'imcopatibilité à la ligne suivante. Comment je peux faire ? 

Cordialement
Romain
Configuration: Windows 7 / Chrome 42.0.2311.90

Thorak83 · Answer

Bonjour

Rows("3:" & x).EntireRow.Hidden = True

Pour utiliser une variable, il faut la sortir de la chaine de caractère "" et utiliser le & qui permet de concatener

Cordialement

Patrice33740 · Answer

Bonjour,

La syntaxe de l'adresse du Rows() est pas correcte.
D'autre part, les Rows() sont toujours entières, pas besoin de le préciser (EntireRow) et il est préférable d'utiliser le type Long pour un numéro de ligne

Option Explicit
Sub valider()
Dim x As Long
  x = Range("D2").Value
  MsgBox x
  Rows("3:" & x).Hidden = True
End Sub

Utiliser une valeur stockée dans une variable

2 réponses

Discussions similaires

Newsletters