Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
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

343 Forumthreads zu ähnlichen Themen


Hallo zusammen,
wie bekomme ich es hin, in eine Zelle "7 a" (7 Leerzeichen a) zu schreiben? Excel macht mir dann immer 7:00 AM daraus oder 0,29...
Danke

Guten Morgen!
Ich hätte folgendes Problem: Ich erhalte automatisiert Exceltabellen, bei denen nicht alle Zellen einer Zeile gefüllt werden, wenn dort der Inhalt einer darüberliegenden Zeile stehen sollte. Zur Weiterverarbeitung muss ich aber diese Zellen mit den dazugehörigen Werten füllen....

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...

Hallo,
ich möchte den Wert in farbigen Zellen addieren.
Z.B.
Zelle A1 :C1 Zellfarbe gelb, in jeder Zelle steht der Wert 1 ; Ergebnis soll 3 sein
oder
Zelle A2 = grün Wert =1, B2 = gelb Wert=2, C2 = gelb Wert =2; Ergebnis soll 4 sein
gibt es dafür eine Funktion oder is...

Halli Hallo,
ich bin ziemlicher Neuling in VBA. Daher würde ich euch bitten mir bei meiner Fragestellung zu helfen und zwar wie folgt: Ich möchte aus einer Tabelle aller Zellen kopieren, bis der Wert einer Zelle 0 annimmt. Diesen bestimten Bereich möchte ich in einer neuen Datei abspeichern...
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige