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

VBA Code: wenn B1 <> blank, dann I in A1 schreiben

VBA Code: wenn B1 <> blank, dann I in A1 schreiben
18.11.2008 16:27:16
maxx_1985
Hi mit'nander
Braeuchte einen kleine Code dafuer:
wenn B1 blank, dann schreibe ein I in A1.
kann mir vielleicht jemand helfen? :-)
vielen vielen dank
denis

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Code: wenn B1 <> blank, dann I in A1 schreiben
18.11.2008 16:29:37
JogyB
Hi.
Sorry, aber mußt Du für so Kleinkram jedesmal einen neuen Thread aufmachen?

If Range("B1")  "" Then Range("A1") = "I"

Gruss, Jogy

AW: VBA Code: wenn B1 <> blank, dann I in A1 schre
18.11.2008 17:16:25
maxx_1985
sorry, my mistake.
und das Ganze fuer einen sich aendernden datenbereich? :-)
danke!
AW: VBA Code: wenn B1 <> blank, dann I in A1 schre
18.11.2008 17:43:00
JogyB
So:

Sub test2()
Dim i As Long
With ActiveSheet
For i = 1 To .Cells(Rows.Count, 2).End(xlUp).Row
If .Cells(i, 2)  "" Then
.Cells(i, 1) = "I"
End If
Next
End With
End Sub


Gruss, Jogy

vielen dank
18.11.2008 18:34:00
maxx_1985
vielen lieben dank. funktioniert ganz prima.
gruss
denis
Anzeige

357 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige