Změna výplně a uzamknutí aktivní buňky Vyřešeno

[Jsimi]

Zdravím,
Prosím potřeboval bych pomoci s makrem, které by změnilo výplň danou barvou např. světle zalená /barva bude jednotná a nebude se měnit na/a uzamknulo aktivní buňku.
Přikládám vzor.
Předem děkuji za pomoc.

[Reklama]

[cmuch]

Tak tomu svému tlačítku přiřaď toto makro

Kód: Vybrat vše

Sub ZamkniBunku()
  '
  ActiveSheet.Protect UserInterfaceOnly:=True
  '
  With Selection
    .Locked = True
    .Interior.ColorIndex = 4
  End With
End Sub


Potom buňkám, kterým budeš chtít na listu toto provádět odškrtni v formát buňky na kartě zámek "uzamknout" a následně list zamkni.

[Jsimi]

Perfekt. Díky za pomoc.