Hi zusammen,
ich möchte in einer geschützten Excel-Datei in der einige Zellen nicht gesperrt sind, das Summenzeichen in der Symbolleiste verwenden können. Dies wird aber nach dem Schützen ausgeblendet (inaktiv)
Wer hat mir eine Idee dazu?
Gruss
Trix
Office - Word, Excel und Co. 9.704 Themen, 40.847 Beiträge
Hi, Trix
noch mal ich: Oder so ein Makro, was Du nutzen kannst:
Sub SummenFormel()
'by Nike 05.03.01
Dim rng As Range
Set rng = ActiveSheet.Cells(1, 1)
On Error GoTo Ende
Set rng = Application.InputBox("Eingabe", "Bereichsauswahl", rng.Address, Type:=8)
On Error GoTo 0
Cells(rng.End(xlDown).Row, rng.Column).Offset(1, 0) = Application.WorksheetFunction.Sum(rng)
Ende:
End Sub
Viel Erfolg - ich hoffe ich konnte helfen !