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

• #36024 Delila_1 veterán Evuska #36021

  Új Válasz 2017-08-24 14:51:50 #36024

  Ú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 Evuska #36021 üzenetére

  Az első 3 oszlop zárolása után valószínűleg levédted a lapot.
  Rendeld a laphoz a lenti makrót (lásd a Téma összefoglalót).

  Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Protect Password:="Saját_jelszavad", UserInterfaceOnly:=True
If Target.Column = 4 Then Range(Target.Address).Locked = True
End Sub

  A "Saját_jelszavad" helyére írd be az igazi jelszót.

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