Utiliser une valeur stockée dans une variable

Résolu/Fermé

romaingateau Messages postés 8 Date d'inscription lundi 20 avril 2015 Statut Membre Dernière intervention 3 juin 2015 - 20 avril 2015 à 13:53
Thorak83 Messages postés 1051 Date d'inscription jeudi 20 juin 2013 Statut Membre Dernière intervention 22 décembre 2017 - 20 avril 2015 à 14:34

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

A voir également:

Utiliser une valeur stockée dans une variable
Utiliser chromecast - Guide
Utiliser une tablette comme ecran pc - Guide
Utiliser iphone comme webcam - Guide
Comment utiliser l'ia - Accueil - Guide Intelligence artificielle
Comment utiliser utorrent - Télécharger - Téléchargement & Transfert

2 réponses

Réponse 1 / 2

Thorak83 Messages postés 1051 Date d'inscription jeudi 20 juin 2013 Statut Membre Dernière intervention 22 décembre 2017 156
20 avril 2015 à 14:18

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

romaingateau Messages postés 8 Date d'inscription lundi 20 avril 2015 Statut Membre Dernière intervention 3 juin 2015
20 avril 2015 à 14:28

parfait merci beaucoup !

Thorak83 Messages postés 1051 Date d'inscription jeudi 20 juin 2013 Statut Membre Dernière intervention 22 décembre 2017 156 > romaingateau Messages postés 8 Date d'inscription lundi 20 avril 2015 Statut Membre Dernière intervention 3 juin 2015
20 avril 2015 à 14:34

de rien,
mettre en résolu

Réponse 2 / 2

Patrice33740 Messages postés 8561 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 15 mars 2025 1 779
20 avril 2015 à 14:23

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

Discussions similaires

Impossible d'utiliser ce numéro de téléphone pour la validat

réservations

additionner nombres dans cellules avec texte

Votre PC ne peut pas utiliser un autre écran.