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

• #21832 Delila_1 veterán toth60 #21831

  Új Válasz 2014-05-31 13:08:58 #21832

  Ú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 toth60 #21831 üzenetére

  A lapvédelem előtt add meg a háttérszínt az összes cellának. A makró a védett tartomány hátterét fehérre állítja a védelemmel azonos időben.

  Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Column = 5 Then
  ActiveSheet.Protect Password:="aaa", UserInterfaceOnly:=True
  Rows(Target.Row).Locked = True
  Range("A" & (Target.Row) & ":E" & Target.Row).Interior.Color = vbWhite
  End If
  End Sub

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