Zellenformatierung

• Zellenformatierung von Sidon Futterknecht vom 07.12.2003 21:40:50
  • AW: Zellenformatierung - von K.Rola am 07.12.2003 22:17:09
    • AW: Zellenformatierung - von Sidon am 07.12.2003 22:38:42
      • AW: Zellenformatierung - von K.Rola am 07.12.2003 23:26:01
        • AW: Zellenformatierung - von Sidon am 07.12.2003 23:34:56
          • AW: Zellenformatierung - von K.Rola am 07.12.2003 23:41:27
            • AW: Zellenformatierung - Herzlichen Dank!!!!! - von Sidon am 07.12.2003 23:55:04

Betrifft: Zellenformatierung
von: Sidon Futterknecht
Geschrieben am: 07.12.2003 21:40:50
Sehr geehrte Damen und Herren,

ich hätte gerne einen Lösungsansatz für folgenden Sachverhalt:

Nur ein definierter Zellbereich (z.B. von C4 bis F11) soll für den Benutzer der Tabelle anwählbar sein. Desweiteren sollten in diesem Bereich nur ein paar ausgewählte Zellen für Werteingaben z.b. D5, D7, D9, E6, E10 zur Verfügung stehen. Alle anderen Zellen sollten nicht für eine Eingabe gesperrt sein --> wie ein Formular, wobei man durch TAB zu den berechtigten Zellen gelangt!

Vielen Dank im Voraus für Tipps

Betrifft: AW: Zellenformatierung
von: K.Rola
Geschrieben am: 07.12.2003 22:17:09
Hallo,

Option Explicit

Private Sub Workbook_Open()
With Sheets("Tabelle1")
.[d5,d7,d9,e6,e10].Locked = False
.ScrollArea = "$C$4:$F$11"
.EnableSelection = 1
.Protect contents:=True
End With
End Sub

Gruß K.Rola

Betrifft: AW: Zellenformatierung
von: Sidon
Geschrieben am: 07.12.2003 22:38:42
Hallo K.Rola,

ein echter Profi - vielen herzlichen Dank, hat prima geklappt.
Hier noch ne Frage: was bedeutet "Option Explicit"? Hat das eine spezielle Bedeutung oder heisst das, dass man es über Makroprogrammierung löst?!

Gruss

Sidon

Betrifft: AW: Zellenformatierung
von: K.Rola
Geschrieben am: 07.12.2003 23:26:01
Das bedeutet, dass die Deklaration von Variablen obligatorisch ist.
So werden z.b. Schreibfehler gleich angemeckert, wenn man eine Variable
im Code anders schreibt als in der Deklaration.
Sollte man sich selbst als Gefallen tun, wenns zunächst mal auch nach
Mehrarbeit aussieht.

Gruß K.Rola

Betrifft: AW: Zellenformatierung
von: Sidon
Geschrieben am: 07.12.2003 23:34:56
Noch eine Frage:

Wie kann man die Formatierung zurücksetzen oder die getätigte Formatierung editieren, um Änderungen vorzunehmen?

Betrifft: AW: Zellenformatierung
von: K.Rola
Geschrieben am: 07.12.2003 23:41:27
Hallo,

meinst du jetzt deinen speziellen Fall?

Option Explicit

Sub aufheben()
With Sheets("Tabelle1")
.unprotect
.ScrollArea = ""
End With
End Sub

Gruß K.Rola

Betrifft: AW: Zellenformatierung - Herzlichen Dank!!!!!
von: Sidon
Geschrieben am: 07.12.2003 23:55:04
Genau,

Du bist wirklich ein Genie!!

Schönen Abend noch und nochmals vielen Dank

Gruss

Sidon