online 1
gast (50)

/ Forum / Tabellenkalkulation

TabellenkalkulationTabellenkalkulation

Fragevon Meikel vom 03.05.2019, 16:13 Options

Wenn/Dann Formel nur mit VBA lösbar?

Hallo zusammen,

würde gerne Eure Hilfe in Anspruch nehmen.

In meiner Spalte B stehen sowohl numerische als auch alphanumerische Werte wie z.B.

Spalte B
100000001
100000002
A234GF
B75RTZ

Ich möchte nun relasieren, wenn in Spalte B ein alphanumerischer Wert steht, das die ganze Zeile einen roten Hintergrund bekommt.

Hat jemand ein Idee,was ich machen könnte.

Danke vorab, Gruß meikel


Antwort schreiben

Antwort 1 von Pistenschreck vom 03.05.2019, 16:19 Options

Hi Meikel

Format -> Bedingte Formatierung -> Formel ist:

=ISTTEXT(B2)

unter Format -> Muster die Farbe auswählen

Ist für Zelle B2. Mit dem Besen in der Symbolleiste dieses Format nach unten übertragen.

Gruss Werner

Antwort 2 von Meikel vom 03.05.2019, 16:40 Options

Danke Werner für die Info,

leider geht das so nicht ganz, denn auch die Ziffern sind im Textformat und das brauch ich leider auch so.

Antwort 3 von rainberg vom 03.05.2019, 19:23 Options

Hallo Meikel,

nutze die Bedingte Formatierung mit dieser Formel

=SUMMENPRODUKT((CODE($B$1:$B$4)>57)*1)

Bezüge sind anzupassen, Leerzellen sind nicht erlaubt.

Gruß
Rainer

Antwort 4 von coros vom 03.05.2019, 19:43 Options

Hallo meikel,

von mir kommt, wie sollte es auch anders sein, eine VBA-Lösung. Nachfolgenden Code kopiere in das VBA-Projekt des Tabellenblattes, in dem er wirken soll. Der Code greift, wenn in Spalte B ein Eintrag getätigt wird. Ist der eingetragene Wert numerisch, passiert nichts. Ist er nicht numerisch, wird die Zeile der Eingabe in rot geändert.

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Target.Column = 2 And Not IsNumeric(Target.Cells) = True Then
Rows(Target.Row).Interior.ColorIndex = 3
Else
Rows(Target.Row).Interior.ColorIndex = xlNone
End If
Application.EnableEvents = True
End Sub


Ich hoffe, Du meintest das so. Bei Fragen melden.

MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.

Antwort 5 von Meikel vom 03.05.2019, 21:03 Options

Hallo zusammen,

sorry, das ich mich erst jetzt melde. Habe es mit dem VBA-Code von Oliver versucht, klappt perfekt.

Ich kann mich nur mal wieder bei allen für die prompte und kompetente Hilfe bedanken.

Viele Grüße, miekel

Ähnliche Themen

Lange FMatrix Formel per VBA berechnen lassen
achim71  24.02.2007 - 123 Hits - 2 Antworten

VBA: Formel mit Textvariable
Oli00  21.06.2007 - 95 Hits - 1 Antwort

VBA Datentyp - 2 Nachkommastellen
Catze  22.08.2007 - 32 Hits - 2 Antworten

Eingabe auf Formel anwenden
Fighter_XP  08.09.2007 - 41 Hits - 1 Antwort

Formel per VBA in Zelle schreiben
Kauz  17.04.2008 - 82 Hits - 2 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Thu Jan 8 21:07:44 2026