Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 14:06:20
Gesamte Column löschen, wenn Column-Bereich leer
24.04.2024 13:44:05
Bezeichnung Tabellenblatt aus Zelle für Formel auslesen
24.04.2024 12:38:40
Formeländerung durch Wechsel von Excel 2021 auf 2019
24.04.2024 12:31:18
Excel - Sverweis mit Wenn-Abfrage kombinieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
148to152
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
148to152
148to152
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

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

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
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

Anzeige
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, ;)
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

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige