Supportnet / Forum / Tabellenkalkulation

Hallo! Ich wuerde gerne bei Excel das Format einer ganzen einer ganzen Zeile aendern (z.B. Schriftfarbe rot) wenn bei einem Feld dieser Zeile nichts eingetragen wird. Kann mir jemand weiterhelfen? Danke! Ben

Hallo

Bei welchem Feld?
Sei´ nicht so sparsam Gegebenheiten mitzuteilen; viele helfende können nicht hellsehen, auch wenn Du Dein Problem direkt vor Augen und Sinn hast.

Gruß

Hallo!

Ich habe eine tabelle mit beschrifteten spalten (eine art Mini Datenbank). Es bestrifft eine spalte in der das datum eingetragen werden soll. Falls das Datum fehlt soll die ganze Zeile rot markiert werden.

Ich hoffe das mein Problem nun verstaendlicher ist...

Nun soll ich raten, in welcher Spalte das Datum steht?

A | B | C
1 Datum | Name | Nachname
2 20.10.05 | Ralf | Muster1
3 22.09.05 | Egon | Muster2
4 | Peter | Muster3


Wenn A4 leer bleibt, wuerde ich gerne dass die ganze Spalte 4 die Schriftfarbe rot bekommt d.h. B4 sowie C4 .

Du meinst die ganze Zeile?

Hallo,

aus meiner Sicht keine großen Experimente. Installier Excel neu, Fall erledigt

Gruß

Helmut

@Saarbauer:
Was soll das den bringen? Um eine Formatierung von Daten zu erhalten das gesamte Excel neu zu installieren?

Hallo,

Sorry,war auf dem falschen Dampfer

Gruß

Helmut

Eine Möglichkeit zumindest die betroffene Zelle zu färben, wäre die "Bedingte Formatierung".
Format -> Bedingte Formatierung und dort das Kriterium eingeben. Einfach mal ausprobieren.

Hallo,

Für die Zellen A4:C4 mit "bedingter Formatierung""Formel ist"

=istleer($A4)

und Farbe angeben

Sollen mehrere Werte berücksichtigt werden

=Und(Istleer($a4);Istleer($b4);Istleer($c4))

oder

= Oder (Istleer($a4);Istleer($b4);Istleer($c4))

und Farbe angeben

Für alle übrigen Zellen mit Pinsel markieren

Gruß

Helmut

@Saarbauer,
habe mal mitgemacht und glaube, so kommt nicht ganz das raus, was benlogo will:
Wenn ichs richtig verstanden habe, will er die gesamte Zeile - Beispiel "4 A-C" rot unterlegen, wenn in A kein Datum drinsteht.
Also nutzt ein kopieren von a auf b auf c nichts, weil da ja der Name drinsteht, b + c also nicht leer sind.
Kann man da ein Makro schreiben?
Damit kenn ich mich leider nicht aus, würde mich aber auch interessieren, da ähnliche Probleme immer wieder mal vorkommen.
Gruß und noch nen schönen Tag

Hallo

Versuchs ´mal hiermit:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim zeilen&, zeile&, farbe%, zpos$
Application.ScreenUpdating = False
zpos = ActiveCell.Address
Range("B65535").End(xlUp).Offset(1, 0).Select
zeilen = Right(Selection.Address(False, False), Len(Selection.Address(False, False)) - 1)
For zeile = 1 To zeilen
If Cells(zeile, 1).Value = "" Then
Rows(CStr(zeile) & ":" & CStr(zeile)).Select
Selection.Font.ColorIndex = 3
End If
farbe = Cells(zeile, 1).Font.ColorIndex
If farbe = 3 And Cells(zeile, 1).Value > 0 Then
Rows(CStr(zeile) & ":" & CStr(zeile)).Select
Selection.Font.ColorIndex = 1
End If
Next
Range(zpos).Select
Application.ScreenUpdating = True
End Sub

Gruß

Hi,

Saarbauer hat schon recht.

Markiere den gesamten Bereich, der rot geschrieben werden soll, wenn in der entsprechenden Zeile in Spalte A nichts steht, dann:

FORMAT - BEDINGTE FORMATIERUNG - FORMEL ist:

=$A2*1=0

Schriftformat auswählen und das wars.


CU Aliba

@Aliba,
hast recht - funzt.
Danke, obwohl ich nicht der ursprungliche Fragesteller war :-)
@Saarbauer,
bin irgendwie nur mit deiner Formel nicht klargekommen - sorry, trotzdem Danke für die Mühe
@Event,
hab den Code eingegeben, aber es tut sich überhaupt nichts. Wahrscheinlich hab ich was falsch gemacht, bin ja VBA-mäßig noch total green hinter den Ohrwatscheln - auch sorry und auch dir Danke für den Aufwand hier was zu erstellen.
Ich muß mal mit VBA-Code ganz von Anfang anfangen, damit ich überhaupt erst mal den Sinn dr Befehle kapier.
Kannst du mir da ne Seite empfehlen?
Gruß und schönes Wochenende noch :-)

Hallo

Zum Einstieg gut geeignet www.excelbeispiele.de unseres Excelpapstes Coros.

Gruß

• Wie kann man ein Makro starten wenn ein bestimmter Wert in ein Zelle erreicht ist
• Passwort aendern Windows XP professional
• eBay oeffnet sich nicht.I
• wenn in einer zelle ein bestimmter wert steht, soll in einer anderen zelle keine eingabe möglich sein
• habe windows 2000 in italienisch