Blattschutz kurzweilig deaktivieren
03.08.2018 11:24:17
Daniel
ich habe folgendes Problem. Ich bastle an einer mittlerweile sehr komplexen Excel Datei welche geschützt ist, sodass die User nur in den vorgegebenen Zellen Eintragungen vornehmen können und sonst nirgendwo.
Jetzt muss aber ein Makro auf Knopfdruck die Spaltenbreite von "V" verändern. Ein 2. Knopf muss Sie wieder auf Ihren Ursprung zurückbringen.
Mein Versuch war:
+++
Sub Letzte_Spalte_Groß()
ActiveWorkbook.Unprotect Password:="MeinPW"
Columns("V").ColumnWidth = 4.29
ActiveWorkbook.Protect Password:="MeinPW"
End Sub
Sub Letzte_Spalte_Klein()
ActiveWorkbook.Unprotect Password:="MeinPW"
Columns("V").ColumnWidth = 2.57
ActiveWorkbook.Protect Password:="MeinPW"
End Sub
+++
Dazu kommt noch, dass die Spalte, welche verändert wird, aus vielen zusammengefassten Zellen besteht. Bin mir unsicher ob das ein Problem macht, denke aber nicht. Will es ja nur verbreitern, nichts inhaltlichen ändern.
Die Fehlermeldung die ich immer bekomme lautet:
Laufzeitfehler '1004': Die ColumnWidth-Eigenschaft des Range-Objektes kann nicht festgelegt werden.