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

• #22575 mh197 őstag

  Új Válasz 2014-07-25 06:11:34 #22575

  Ú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

  

  mh197

  őstag

  A mentés másként funkció használatát akarom jelszóhoz kötni.

  Most az alábbi kód van:

  Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
  If SaveAsUI Then
  MsgBox "A 'mentés másként' funkció NEM HASZNÁLHATÓ!!!"
  MsgBox "A táblázat NEM KERÜLT MENTÉSRE! Mentse ISMÉT a 'mentés' gombbal!!!", vbInformation
  Cancel = True
  End If

  Ez ugye kompletten tiltja a mentés másként használatát. Mivel lehetne megadni, hogy jelszót kérjen a mentés másként funkciónál? A sima mentés mehet jelszó nélkül, csak a mentés másként lenne jelszóhoz kötött.

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