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

• #8652 Fire/SOUL/CD félisten zagoston #8651

  Új Válasz 2010-11-16 12:08:50 #8652

  Ú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

  

  Fire/SOUL/CD

  félisten

  válasz zagoston #8651 üzenetére

  Tudtommal Excelből csak egyesével lehet ki- és bekapcsolni a lapvédelmet, de makróval megoldható, hogy az összeset levédd. Az első kód bekapcsolja(jelszóval védve), míg a második meg feloldja a lapvédelmet, az összes munkalapon

  Private Sub CommandButton1_Click()
  
  For i = 1 To Sheets.Count
  Sheets(i).Activate
  ActiveSheet.Protect Password:="FSCD"
  Next i
  Sheets(1).Select
  
  End Sub
  
  Private Sub CommandButton2_Click()
  
  For i = 1 To Sheets.Count
  Sheets(i).Activate
  ActiveSheet.Unprotect Password:="FSCD"
  Next i
  Sheets(1).Select
  
  End Sub

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