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

• #23973 Fferi50 Topikgazda Wyll #23971

  Új Válasz 2014-10-29 16:01:54 #23973

  Ú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

  

  Fferi50

  Topikgazda

  válasz Wyll #23971 üzenetére

  Szia!

  Tedd a kódot a Userform Activate eseménybe (is).

  Egyébként lehetne rövidebben:

  Private Sub togbutTranslate_Click()
  Range("b_forditocellak").EntireColumn.Hidden = Not Range("b_forditocellak").EntireColumn.Hidden
  End Sub
  
  Private Sub UserForm_Activate()
  Me.togbutTranslate.Value =Not Range("b_forditocellak").EntireColumn.Hidden
  Me.labVersion.Caption = "Jegyzőkönyv verziója: " & Worksheets("MAGYAR").Range("N2").Value
  End Sub

  Üdv.

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