In Excel Zellen automatisch diagonal durchstreichen, wenn die Zelle leer ist und Zelle wieder "freigeben" wenn Inhalt eingefügt wird?

Meine Frage ist, ob es möglich ist, in einem Tabellenbereich, den ich definieren kann wie ich möchte, diesen diagonal durchzustreichen und wenn ich in eine Zelle im Tabellenbereich einen Wert eingebe, dass diese Diagonale wieder verschwindet?

Die restlichen "geXten" Zellen sollen davon natürlich unberührt beliben und weiterhin die Diagonale enthalten.

Ich habe bei meiner Suche bisher leider nichts gefunden, was meinen Anforderungen genügt und mittlerweile ist mir auch klar, dass das auch nur via VBA möglich sein wird.

Vielen Dank schon mal im Vorraus!

29.10.2021, 09:27

Kleine Ergänzung:

Die Zellen müssen mit der Diagonalen "entwertet" werden.

2 Antworten

Gaterde

Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer

Computer

29.10.2021, 10:19

Ich konnte leider keinen Weg über die bedingte Formatierung finden. Diagonale Linien können da nicht eingefügt werden (wieso auch immer). Wenn es mit Farbe reicht:

Bild zum Beitrag

Ansonsten müsstest du es über VBA Code machen.

Woher ich das weiß:Hobby

NoClueButSure

29.10.2021, 08:53

Wenn ich dich richtig verstehe, möchtest du einen Diagonalen Rahmen in bspw A1 und wenn du in A1 was einträgt ("1234"), soll der Rahmen verschwinden.

...dann könntest du alternativ die Bedingte Formatierung nutzen. Mit dem kleinen Haken, dass du auf den diagonalen Rahmen verzichten musst - stattdessen die Zelle aber ausschraffieren oder farbig markieren kannst.

Neue Regel... basierend auf Formel... =A1="" ... Formatieren.. Reiter "Ausfüllen"... Musterformat auswählen.

Für Zellen in einer zusammenhängenden Spalte wäre die Formel =$A1=""

Vielleicht hilft dir das als Alternativvorschlag zum "ausXen" ohne VBA.

Partner468

Fragesteller

29.10.2021, 09:28

Danke für die schnelle Antwort, aber es muss die Diagonale sein, deinen Vorschlag habe ich bereits angewendet. Er liefert leider nicht das gewünschte Ergebnis.

Ähnliche Fragen

Excel Zellen horizontal durchstreichen

Hallo zusammen,

ich müsste bei Excel eine Komplette Zelle durchstreichen und zwar horizontal, aber nicht nur eine einzelne Zelle sondern halt ab Spalte A bis Ende, und auch nicht den Text der in den Zellen steht sondern komplett.

Danke schon mal für die Hilfe

...zur Frage

Tabelle in Word durchstreichen

Hallo an alle,

ist es möglich, eine Tabelle in Word durchzustreichen. Also ich meine damit, in einer Tabelle einen diagonalen Strich von links-unten nach rechts-oben zu ziehen? Ich möchte aber nicht nur eine einzige Zelle durchstreichen, sondern wie gesagt eine ganze Tabelle. Hat jemand eine Idee?

Danke schon mal im Voraus :-)

PS: Ich nutze Word 2010 unter Windows 7.

...zur Frage

Excel Text aus Zelle filtern?

Hallo,

ich habe mehrere hundert Zellen in einer Spalte die jeweils eine Beschreibung und eine dazugehörige AA Nummer innerhalb einer Zelle beinhaltet. Nun möchte ich aber die ganze Beschreibung raushaben und im Prinzip nur die AA-Nummer rausfiltern, bzw. die Zelle auf diese Nummer reduzieren. Gibt es solch eine Funktion bei Excel oder vielleicht mit VBA? Beispiel wie diese Zellen aktuelle aussehen im Bild (s.u.)

LG Aseterus

...zur Frage

Excel VBA Aktive Zelle mit Doppelklick in Zwischenablage?

Hallo ihr,

ich habe ein Problem mit einer Excel Anwendung, die ich machen möchte.

Ich habe einige Zellen in Excel, die jeweils einige Nummern oder Kennzeichnungen enthalten.

Für verschiedene Fälle muss ich einige dieser Nummern in eine Liste herausschreiben.

Ich möchte gerne, dass wenn ich auf eine Zelle Klicke oder Doppelklicke, dass sich der Inhalt dieser Aktiven Zelle in die Zwischenablage kopiert. Im Besten Fall fügt sich die Zwischenablage dann untereinander in einem Excel Blatt wieder ein, sodass ich nacheinander die verschiedenen Zellen anklicken kann und meine Liste so zusammenstellen kann.

Habe in VBA schon versucht, sowas zu realisieren, aber bis jetzt hat das nicht so funktioniert.

Ich hoffe, jemand kann mir weiterhelfen.

Vielen Dank!

...zur Frage

VBA: Datum aus Zelle lesen?

Hallo, ich habe eine große Excel Tabelle und muss nun das Datum aus einer Zelle lesen, um es in eine andere zu schreiben. In der Zelle steht beispielsweise "neu ab 07.05.16". Jetzt muss ich aus dieser Zelle das "07.05.16" lesen und in eine andere schreiben. Die Zellen haben immer dasselbe Format: Neu ab 'Datum'. Kann mir hier jemand helfen? Das ganze soll mit VBA gemacht werden.

...zur Frage

Wie kann man mit VBA in Excel 2016 Zellen aktualisieren?

Hallo liebe Community,

ich habe für eine Automatisierung auf Arbeit ein Programm mit VBA in Excel geschrieben. Das hat auch ein halbes Jahr ohne Probleme funktioniert. Jetzt über das Wochenende wurde ein Excel Update auf 2013 gemacht. Seitdem arbeiten die Zellverweise nicht mehr richtig (die waren vorher da, deshalb habe ich sie vom VBA unberührt gelassen). Man muss jede Zelle einzeln anklicken (Doppelklick), damit der Wert durch den Verweis übernommen wird. Gibt es eine Möglichkeit dieses "Anklicken" durch eine Funktion im VBA zu übernehmen? Mit Range.activate hat es nicht funktioniert.

...zur Frage

Zufallszelle in Excel anzeigen lassen

Habe ein Problem mit Excel. Ich brauche eine Formel, die mir aus einem bestimmten Tabellenbereich (z.B. Zelle B32-B35) zufällig eine Zelle auswählt und mir deren Inhalt anzeigt. Um das ganze etwas verständlicher zu gestalten:

Ich möchte für den Fußballverein eine Tabelle machen, die mir die Mannschaft zufällig aufstellt. Ich habe die Stürmer in B32-B35 stehen, die Mittelfeldspieler in B17-B27 etc. Im Aufstellungsbereich soll dann also bei der Position Stürmer eine zufällige Zelle von B32-B35 angezeigt werden.

Ist das ohne VBA möglich? Habe mich schon durch gewisse Excel-Foren geklickt aber nichts verstanden :-(

...zur Frage

VBA Makro gesucht: Inhalt von Zellen löschen wenn eine andere Zelle bestimmten "TEXT" beinhalted?

Hallo Zusammen,

ich bin absoluter VBA neuling, bräuchte aber ein einfaches Makro zu folgendem Fall:

In den Zellen der Spalte R (R6:R150) steht entweder: "STATUS1=grün" oder "STATUS2=gelb" oder "STATUS3=rot".

Wenn zum Beispiel Zelle R6 = "STATUS1=grün" dann sollen die Zellen (I6:J6) und die Zellen (L6:N6) geleert werden
Wenn R6 = "STATUS2=gelb" dann sollen die Zellen (I6:J6) geleert werden
Wenn R6 = "STATUS3=rot" dann soll nichts gelöscht werden.
Wenn R6 = "" (also leer) soll auch nicht gelöscht werden.

--> Gleiches soll für alle Zelle im Bereich (R6:R150) gelten

--> Die Spalten I,J,L,M und N müssen aber befüllbar sein, daher lässt sich das ja nicht über eine Formel machen.

Das ist alles was ich bis jetzt zusammen gebastelt habe: leider funktioniert es nicht:

Private Sub Worksheet_Change(ByVal Target As Range)
'Abfrage, ob Änderung in Zelle A1 erfolgt ist
If Target.Address = "$R$6" Then
    If IsValue(STATUS1 = grün) Then
    
            Range("4:F14").Select
            Selection.ClearContents
    End Select
End If
End Sub

Vielen Dank für eure Hilfe.

...zur Frage

Excel VBA - Zellen nach Datum löschen?

Hallo Liebe Excel - Kenner,

gibt es die Möglichkeit oder einen Code, wo ich Zellen löschen die ich nach Datum und Uhrzeit bestimme?

Bsp: Zelle A1: K30 löschen am 25.03.2016 - 14:00 Uhr

Gruß Manuel

...zur Frage

Excel VBA, wenn Zelle eine bestimme Farbe hat, dann soll in diese Zelle ein Text.?

Moin ich komm mal direkt zum Punkt.

Ich mach grade eine Zeiterfassung. Wenn an einem Tag Wochenende ist, dann werden Zellen Orange hinterlegt. Aber damit die Zellen nicht nur in Oranger Farbe vorhanden sind, soll auch gleichzeitig in eine Zelle "Wochenen." geschrieben werden, wenn der Fall eintritt, dass die Zelle Orange hinterlegt ist. Ich bin relativ neu in VBA und muss leider eure Hilfe in Anspruch nehmen :P
Hier noch ein Bild:

Dazu kommt, dass dieses Makro dauerhaft laufen muss. Man soll nicht immer auf einen Knopf drücken müssen, damit das geht. Hoffe, dass eine Automatisiserung überhaupt möglich ist :/

Im Grunde genommen soll dieses Makro dauerhaft den gelben Bereich überwachen und in jede Zelle "Wochenen." reinschreiben, sobald sie Orange wird. Wenn die Zelle dann wieder Weis ist, dann soll der Text wieder rausgelöscht werden.

...zur Frage

Excel > Zelle > Hintergrund > Streifenmuster?

Wie kann ich in Excel 2010 den Abstand zwischen den Hintergrundstreifen ändern?

Rechtsklick auf Zelle > "Zellen formatieren" > "Ausfüllen" > "Musterformat" > "Diagonal gestreift" > ???

Vielen Dank um Antwort!

...zur Frage

Wie kann ich Excel-Zellen für Word auslesen?

Ich muss den Inhalt einer speziellen Zelle in einem Excel-Sheet als String auslesen und in einem Word-Dokument einfügen. Das ganze soll per VBA funktionieren. Dabei sollte die Excel-Datei bestenfalls geschlossen bleiben. Kann jemand helfen? Nutze MS-Office 2013.

...zur Frage

Wie ermittelt man in Excel (VBA) den Zelleninhalt bei verbundenen Zellen?

Ich durchlaufe in meinem Excel VBA-Script die Zellen einer Spalte, um den Zelleninhalt auszuwerten. Nun kann es passieren daß Zellen "verbunden" sind. In diesem Fall liefert mir das Script nur jeweils für die linke oberste Zelle der verbundenen Zellen den Wert zurück. In den anderen Zellen kommt Blank zurück. Ich würde in allen Zellen den gleichen Wert zurückerwarten?
Wie könnte man das bewerkstelligen?
Hardcopy/Beispiel: In den grünen Spalten steht was ich erwarten würde. In den gelben die tatsächliche VBA-Ausgabe.

Private Sub Worksheet_Activate()
  Dim iRow As Integer
  iRow = 4
  Do
    Worksheets("Test").Cells(iRow, 5) = Worksheets("Test").Cells(iRow, 1)
    Worksheets("Test").Cells(iRow, 7) = Worksheets("Test").Cells(iRow, 2)
    iRow = iRow + 1
    If iRow > Worksheets("Test").UsedRange.Rows.Count Then Exit Do
  Loop
End Sub

...zur Frage

Kann man in Excel 2010 eine Zelle zweifarbig "bemalen"?

Hallo. Ich würde gerne eine bzw. mehrere Zellen in Excel 2010 mehrfarbig gestalten. Das Besondere daran: über die Diagonale. Es soll so wie im Bild aussehen, dass es durch eine (unsichtbare, also nicht schwarze) Linie in der Diagonale getrennt wird. links eben rot, rechts meinetwegen blau. Geht das? Wenn ja, bitte wie!

...zur Frage

Was möchtest Du wissen?

Deine Frage stellen