Új hozzászólás Aktív témák

• #15817 Delila_1 veterán Vladek83 #15816

  Új Válasz 2012-12-16 12:27:36 #15817

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Delila_1

  veterán

  válasz Vladek83 #15816 üzenetére

  Az A1-re, vagy A16-ra duplán klikkelve tűnnek el, vagy jelennek meg a címhez tartozó sorok.
  További Case utasításokkal bővítheted.

  Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
  Select Case Target.Address
  Case "$A$1"
  If Rows("2:15").Hidden = True Then
  Rows("2:15").Hidden = False
  Else
  Rows("2:15").Hidden = True
  End If
  Case "$A$16"
  If Rows("17:25").Hidden = True Then
  Rows("17:25").Hidden = False
  Else
  Rows("17:25").Hidden = True
  End If
  End Select
  End Sub

Új hozzászólás Aktív témák