VB-Codeerweiterung
17.10.2007 11:03:30
Mathias
Private Sub Workbook_Open()
Sheets("FUNKTION").Protect UserInterfaceOnly:=True
Sheets("FUNKTION").EnableOutlining = True
Sheets("FUNKTION").EnableAutoFilter = True
End Sub
Dies brauche ich da ich einzelne Zellen Schützen muss und trotzdem noch die o.g. Funktionen nutzen möchte. Nun will ich aber, dass eine vorhandene Zeile mit hinterlegten Format und Formeln kopiert werden soll, und mit "Kopierte Zellen einfügen" wieder eingefügt werden kann.
Durch o.g. Code geht das zur Zeit nicht mehr. Was muss ich tun, damit dies ermöglicht wird.
Genauso soll es möglich sein eine vorhandene Zeile zu löschen. Danke.
Anzeige