Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zellwertabfrage mit If - then

Forumthread: Zellwertabfrage mit If - then

Zellwertabfrage mit If - then
17.08.2002 10:58:37
Werner Hassold
Hi Leute,
ich möchte den Wert einer Zelle in VBA mit If abfragen.
Beispiel:
---------------------------------------
If (A1="Mo") or (A1="Di") then M1=10
---------------------------------------
Leiter werde ich aus meinem Buch nicht schlau und bekomme
Fehlermeldungen.
Würde mich freuen wenn mir jemand ein Beispiel geben kann.
Danke schon mal.
Gruß, Werner
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Zellwertabfrage mit If - then
17.08.2002 11:15:04
Dieter
Probiere mal folgendes:

If Range("A1").Value = "Mo" Or Range("A1").Value = "Di" Then
Range("M1").Value = 10
End If

Gruß Dieter

Re: Zellwertabfrage mit If - then
17.08.2002 12:23:33
Werner Hassold
Danke Dieter für deine schnelle Hilfe, läuft super!
Jetzt hätte ich noch eine Folgefrage ....
Ich will 31 Zellen A1..A31 (alle Monatstage) abfragen,
hierzu müßte ich die If-Abfrage 31 Mal einbauen!
Geht es auch in einer Schleife, z.B.
-----------------------
For i=1 to 31 ....
-----------------------
Könnte man die Zelle auch als Veriable angeben,
eine Veriable die sich bei jedem Durchlauf um
1 erhöht (A1, A2, A3 .. A31)?
Ich kenne das aus Pascal, leiter komme ich mit Basic noch nicht
so zurecht.
Wäre super wenn du mir hierfür ein Beispiel geben könntest.
Nochmals Danke.
Freundliche Grüsse
Werner

Anzeige
Re: Zellwertabfrage mit If - then
17.08.2002 12:29:24
andreas e
nimm die ceIIs-meth0de
a1 wird zu ceIIs(1,1)
und statt der zeiIe 1 nun dein i
aIs0 ceIIs(i,1)
achtung ist genau andersrum wie bei Range zuerst zeiIe dann spaIte

gruß
andreas e

Re: Zellwertabfrage mit If - then
17.08.2002 12:49:51
Werner Hassold
Hi Andreas, Danke für deinen Vorschlag.
Leider komme ich damit nicht zurecht, könntest du mir ein Beispiel schreiben?
Gruß Werner
Anzeige
Re: Zellwertabfrage mit If - then
17.08.2002 13:03:20
PeterW
Hallo Werner,

For i = 1 to 31
If Cells(i, 1) = "Mo" Or Cells(i, 1) = "Di" Then Cells(i, 13)= 10
End If
Next i

Gruß
Peter

Re: Zellwertabfrage mit If - then
17.08.2002 13:20:47
Silvio
Wenn ich mich mal kurz einmischen darf

Ich glaube ohne End If geht das ganze besser!
Mfg Silvio

Re: Zellwertabfrage mit If - then
17.08.2002 13:27:21
PeterW
Klar darfst Du Dich einmischen - besonders nachdem hier die Sonne zu stark aufs Hirn gewirkt hat, ;)
Anzeige
Re: Zellwertabfrage mit If - then
17.08.2002 17:26:52
Werner Hassold
Hi Leute,
Danke für die gute Hilfeleistung, hat mich echt weitergebracht.
Freundliche Grüße
Werner
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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