Berechnung per Button

[schauan]

Blattschutz setzen und aufheben kannst Du mit dem Makrorekorder aufzeichnen. Allerdings wird die Passwort Eingabe nicht aufgezeichnet. Da müsstest Du dann noch password:=... dazu schreiben.

[Phoeni]

Danke, ne das meinte ich nicht, der Blattschutz funktioniert schon. 
Nur wenn Blattschutz gesetzt bei diesem Code

Sub Verlust_hinzurechnen()
'
' Makro7 Makro
'

Range("M36") = Range("H18") + Range("L36")

End Sub

bekomme ich einen wenn ds Makro ausgelöst wird einen Laufzeitfehler 1004 , ist Blattschutz raus, funktioniert alles ohne Fehler

[DIZA]

Hallo Phoeni,

gestatte mir die Frage, willst du nicht oder ist Eigeninitiative dir wirklich so fremd ?
Sicherlich ein bequemer Weg, jedoch lernen und verstehen wirst du so nichts.

schauan hat dir den Weg doch mehr als klar aufgezeigt 
(auch Google hätte dir da unendlich viele Lösungen zu präsentiert) 
und dir fällt nicht besseres dazu ein als alles geschriebene zu ignorieren, 
mit null eigenen Versuchen so ein Post hinzulegen und auf das goldene Tablett zu warten.
Mit einer Hoffnung auf Besserung  (stirbt ja zu Letzt) ...

Code:

Sub....
ActiveSheet.Unprotect Password:="dein PW"
hier dein Code // Range was auch immer
ActiveSheet.Protect Password:="dein PW"
End....

... bin ich denn mal das Kopfkissen klopfen.

[Phoeni]

Hallo Diza,
Eigeninitiative ist mir nicht fremd. Viele Fragen oder auch Hilfestellungen die ich hier stelle, habe ich zu 90% vorher gegoogelt, leider kann ich kein VBA und keine umfangreiche Formeln.
Ich weiß eben nur wo es hinkommt. Sollte es den Eindruck jedoch erwecken, ich will alles nur geliefert bekommen, ist das falsch ABER man kann es durchaus ableiten. 

Dennoch Danke für deine Meinung
Gruß Phoeni