Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Syntax vereinfachen

Forumthread: Syntax vereinfachen

Syntax vereinfachen
03.06.2006 12:02:22
Emil
Hallo,
kann man die Abfrage:
if x=1 or x=4 or x=5 or x=12 or x=23 or x=112 then .....
vereinfachen indem man die Verleichswerte irgendwie in einer Liste zusammenfasst?
Gruß Emil
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Syntax vereinfachen
03.06.2006 12:25:55
Peter
Servus,
in etwa so. Aber ob das mit
vereinfachen gemeint ist ?
Sub t()
Dim x
Dim dblArr()
dblArr = Array(1, 4, 5, 12, 23, 112)
x = 4
On Error Resume Next
If IsError(Application.WorksheetFunction.Match(x, dblArr, 0)) Then
MsgBox "Nicht Gefunden"
Else: MsgBox "Gefunden"
End If
End Sub

MfG Peter
Anzeige
AW: Syntax vereinfachen
ransi
hallo
versuchs mal so
select case x
case 1,4 to 5,12,112
mach was
case else
mach was anderes
end select
ransi
AW: Syntax vereinfachen
03.06.2006 12:43:29
Emil
Hallo Ransi, hallo Peter,
vielen Dank für die Antworten.
Gruß Emil
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige