Supportnet / Forum / Tabellenkalkulation
2 Werte Abfragen
Frage
Hallo,
In einer VBA Prozedur möchte ich gerne abfragen welcher monat gewählt wird, das geht, allerdings muss dann noch geprüft werden, ob ein wert => oder =< ist, um ein Objekt ein oder auszublenden.
Wie geh ich da am besten vor.
Gruß´Ralf
Antwort 1 von coros
Hallo Ralf,
leider nicht ganz klar, was Du Dir da so vorstellst.
Was für ein Objekt?
Was für ein Wert nach welchem Kriterium?
Nachfolgend mal ein Beispiel, dass ein Bezeichnungsfeld aus der Symbolleiste "Formular" ausblendet, wenn der Wert in Zelle A1 >= dem Wert 10 ist. Ist der Wert kleiner dem Wert 10, wird das Feld eingeblendet.
Kopiere das Makro in ein StandardModul.
Kopiere das Makro in ein StandardModul und starte es z.B. über eine Befehlsschaltfläche
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
leider nicht ganz klar, was Du Dir da so vorstellst.
Was für ein Objekt?
Was für ein Wert nach welchem Kriterium?
Nachfolgend mal ein Beispiel, dass ein Bezeichnungsfeld aus der Symbolleiste "Formular" ausblendet, wenn der Wert in Zelle A1 >= dem Wert 10 ist. Ist der Wert kleiner dem Wert 10, wird das Feld eingeblendet.
Kopiere das Makro in ein StandardModul.
Kopiere das Makro in ein StandardModul und starte es z.B. über eine Befehlsschaltfläche
Option Explicit
Sub Bezeichnungsfeld_aus_bzw_einblenden()
If Range("A1") >= 10 Then
'Shape ausblenden
ActiveSheet.Shapes("Name_des_Objektes").Visible = False
Else
'Shape einblenden
ActiveSheet.Shapes("Name_des_Objektes").Visible = True
End If
End SubMfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
Antwort 2 von RalfH
Hallo Oliver,
Ich versuchs mal genauer zu beschreiben.
Über ein Formular, Combobox wird ein Monat ausgewählt.
Und dann halt Abgefragt:
Jetzt sind aber in jedem Monat berechnete Werte die variieren können.
Ich möchte gerne herausfinden ob ein Wert größer als Null oder kleiner als null ist. Wenn größer soll das Objekt eingeblendet werden, wenn kleiner nicht.
Wie pack ich das noch zusätzlich in die If Then Else ein.?Gruß Ralf
Ich versuchs mal genauer zu beschreiben.
Über ein Formular, Combobox wird ein Monat ausgewählt.
Und dann halt Abgefragt:
If Userformular1.Combobox1="Januar" then
.......
elseIf Userformular1.Combobox1="Februar" then
...Jetzt sind aber in jedem Monat berechnete Werte die variieren können.
Ich möchte gerne herausfinden ob ein Wert größer als Null oder kleiner als null ist. Wenn größer soll das Objekt eingeblendet werden, wenn kleiner nicht.
Wie pack ich das noch zusätzlich in die If Then Else ein.?Gruß Ralf
Antwort 3 von coros
Hallo Ralf,
so ganz verstehe ich es zwar immer noch nicht, aber wenn es Dir nur um das erweitern der If-Abfrage geht, dann würde das z.B. wie folgt aussehen:
PS.: Nicht wundern, wenn ich jetzt erst mal nicht mehr antworte, aber ich habe einen Termin.
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
so ganz verstehe ich es zwar immer noch nicht, aber wenn es Dir nur um das erweitern der If-Abfrage geht, dann würde das z.B. wie folgt aussehen:
If Userformular1.Combobox1="Januar" And Wert > 0 then
Objekt_welches_auch_immer.Visible = True
Else
Objekt_welches_auch_immer.Visible = False
End ifPS.: Nicht wundern, wenn ich jetzt erst mal nicht mehr antworte, aber ich habe einen Termin.
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
Antwort 4 von RalfH
Guten Morgen,
und vielen Dank für die nette Hilfe !
Gruß Ralf
und vielen Dank für die nette Hilfe !
Gruß Ralf