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

• #2249 lúzer veterán lúzer #2242

  Új Válasz 2007-06-12 14:47:53 #2249

  Ú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

  

  lúzer

  veterán

  válasz lúzer #2242 üzenetére

  Hurrá!
  Csiszolni kell de műxik:
  
  Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As _
  Excel.Range)
  If ActiveSheet.Cells(1, 1).Text = ''i'' Then
  Rows(''26:37'').Select
  Selection.EntireRow.Hidden = True
  Else
  End If
  If ActiveSheet.Cells(1, 1).Text = ''h'' Then
  Rows(''26:37'').Select
  Selection.EntireRow.Hidden = False
  Else
  End If
  End Sub

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