Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
288to292
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
288to292
288to292
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Kombinationsfeld+andere Felder deaktivieren

Kombinationsfeld+andere Felder deaktivieren
06.08.2003 14:33:32
Markus
Hey,
ich habe ien Problem wo ich bitte Eure Hilfe brauche.
Ich habe ein Kombinationsfeld, wo ich werte aus einer Tabelle einlese, ich möchte nun wenn ein leeren eintrag gewählt wurde, alle anderen Felder auf Enabled=False setzen, aber leider klappt das nicht, was mache ich falsch?
Code

Private Sub Filiale_Change()
'Arrays setzen
Dim Fil_Ar As Variant
Dim VK_Name_Ar As Variant
Dim Modell_Ar As Variant
Dim Zul_Grund_Ar As Variant
Dim Status_Ar As Variant
'Felder in Abhängigkeit der Filiale füllen
'Listenboxen  füllen
VK_Name.List = VK_Name_Ar
Modell.List = Modell_Ar
If Filiale.Value <> "" Then
'Felder freigeben
KD_Nummer.Enabled = True
KD_Name.Enabled = True
VK_Name.Enabled = True
Modell.Enabled = True
Fhgst_Nummer.Enabled = True
Zul_Datum.Enabled = True
Zul_Grund.Enabled = True
status.Enabled = True
zaehlen_ja.Enabled = True
zaehlen_nein.Enabled = True
eintragen.Enabled = True
Else
KD_Nummer.Enabled = False
KD_Name.Enabled = False
VK_Name.Enabled = False
Modell.Enabled = False
Fhgst_Nummer.Enabled = False
Zul_Datum.Enabled = False
Zul_Grund.Enabled = False
status.Enabled = False
zaehlen_ja.Enabled = False
zaehlen_nein.Enabled = False
eintragen.Enabled = False
End If
End Sub

Folgende Formel steht in den Quellzellen =WENN(I9=$Q$36;B9;"")
Der Inhalt der Zelle ist also leer, warum geht das dann nicht
Danke schonmal
Markus

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kombinationsfeld+andere Felder deaktivieren
07.08.2003 00:09:16
Mario
Der Grund ist die Formel, die Zelle ist also nicht leer. Versuche es doch mal mit "0"
statt mit "" bzw. nur 0.
Auch kann die Frage anders lauten:
If IsNumeric(Filiale.Value) Then

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige