LIGNE MASQUEE inputbox

Question

BONJOUR à tous
j 'ai creé un tableau sur excel ligne du A1 au A30
je voudrais savoir comment masquer des lignes d'une feuille excel (certains lignes donnés) avec input box
c'est à dire si je voudrais masqué les lignes superieur d'une valeur donnée ex : tous les lgnes sup à A24 (A24 au A30 masqués) 
comment le faire en utilisant input box
et merci

abouziad2010 · Answer

resolut j ai trouvé la solution 
MERCI 
Dim i As Integer
 Dim j As Integer
 
Dim lig As Range
i = InputBox("Quel est le numéro de la ligne à masquer")
 j = Cells.SpecialCells(xlCellTypeLastCell).Row
     Rows(i & ":" & j).Select
    Selection.EntireRow.Hidden = True

Patrice33740 · Answer

Essaies :
Option Explicit
Sub t()
Dim Rep As String
Dim N°L As Long
Dim Min As Long
Dim Max As Long
  'Valeurs limites tolérées
  Min = 1
  Max = 30
  'Demander le numèro de ligne
  Do
    Rep = InputBox("Numéro de ligne :")
    If Rep = "" Then Exit Sub
    If IsNumeric(Rep) Then
      N°L = Int(CDbl(Rep))
      If N°L = CDbl(Rep) And N°L >= Min And N°L <= Max Then Exit Do
    End If
  Loop
  'Masquer les lignes
  Rows(N°L & ":" & Max).Hidden = True
End Sub

LIGNE MASQUEE inputbox

2 réponses

Discussions similaires

Newsletters