Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Einzelne Zellen ausblenden

Einzelne Zellen ausblenden
alex
Hallo liebe Excelgemeinde,
ich möchte in meiner Tabelle gerne einzelne Bereich ausblenden, allerdings nie die ganze Spalte oder Zeile.
Ich habe dafür folgenden Code geschrieben. Leider entfernt Excel lediglich die Werte aus den Zellen. Die Zellen rechts von den Bereichen sollen aber nach links aufrücken.
Außerdem sollen bei einem gegen Makro die werte in den ausgeblendeten Zellen wieder sichtbar werden und die Zellen die vorher nach links gerückt sind wieder nach rechts rücken.
Sub test()
If MsgBox("Sollen nicht benötigte Quartale, für eine bessere Übersicht, ausgeblendet werden?",  _
vbYesNo) = vbYes Then
If Date >= CDate("01.01." & Year(Date)) And Date  CDate("31.03." & Year(Date)) And Date  CDate("30.06." & Year(Date)) And Date  CDate("30.09." & Year(Date)) And Date 
Dank im Vorraus und Gruß
alex
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Einzelne Zellen ausblenden
03.12.2009 17:50:04
F1
"....allerdings nie die ganze Spalte oder Zeile...."
das geht nicht.
F1
AW: Einzelne Zellen ausblenden
03.12.2009 18:16:01
alex
geht nicht gibs nicht^^....
ist es nicht möglich die zellen in die zwischenablage zu kopieren danach zu löschen, die rechten zellen aufrücken zulassen, das weitere makro (tabellen soll gedruckt werden) auszuführen und dann die zellen aus der zwischenablage wieder einzufügen?
Anzeige
Brauche hilfe
03.12.2009 18:47:20
alex
so mein makro funktioniert bis auf eine ausnahme. das einfügen aus der zwischenablage. kann mir dabei eventuell jemand helfen. ich weiß nicht was ich falsch mache
Sub test
If MsgBox("Sollen nicht benötigte Quartale, für eine bessere Übersicht, ausgeblendet werden?",  _
vbYesNo) = vbYes Then
If Date >= CDate("01.01." & Year(Date)) And Date  CDate("31.03." & Year(Date)) And Date  CDate("30.06." & Year(Date)) And Date  CDate("30.09." & Year(Date)) And Date = CDate("01.01." & Year(Date)) And Date  CDate("31.03." & Year(Date)) And Date  CDate("30.06." & Year(Date)) And Date  CDate("30.09." & Year(Date)) And Date 

Anzeige
AW: Brauche hilfe
03.12.2009 20:15:23
werni
Hi Alex
Wie ist es, wenn du vorübergehend einfach die Schrift in diesen Zellen auf weiss stellst, und nach dem Drucken wieder zurück.
Gruss Werner
AW: Brauche hilfe
03.12.2009 20:23:26
alex
das bringt nix weil das ziel des makros sein soll die tabelle schmaler zumachen damit sie auf einem din a4 blatt im gesamten größer wird
Anzeige
AW: Einzelne Zellen ausblenden
03.12.2009 21:09:48
Uduuh
Hallo,
dann kopiere deine Tabelle, lösche dort die Zellen, drucke sie aus und lösche anschließend die Kopie.
Gruß aus’m Pott
Udo

;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Einzelne Zellen in Excel ausblenden


Schritt-für-Schritt-Anleitung

Um in Excel einzelne Zellen auszublenden, kannst Du die folgende VBA-Makro-Lösung verwenden. Diese Methode ermöglicht es, bestimmte Zellen unsichtbar zu machen, ohne die gesamte Zeile oder Spalte auszublenden.

  1. Öffne den VBA-Editor:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Füge ein neues Modul hinzu:

    • Klicke mit der rechten Maustaste auf "VBAProject (deine Datei)" und wähle Einfügen > Modul.
  3. Füge den folgenden Code ein:

    Sub ZellenAusblenden()
       Dim rng As Range
       Set rng = Range("A1:A10") ' Passe den Bereich an
       rng.Font.Color = rng.Interior.Color ' Schriftfarbe an Hintergrundfarbe anpassen
    End Sub
  4. Führe das Makro aus:

    • Schließe den VBA-Editor und gehe zurück zu Excel. Drücke ALT + F8, wähle ZellenAusblenden aus und klicke auf Ausführen.

Mit diesem Code werden die Werte in den angegebenen Zellen unsichtbar gemacht, indem die Schriftfarbe der Zellenfarbe angepasst wird.


Häufige Fehler und Lösungen

  • Problem: Die Zellen werden nur "leer" angezeigt.

    • Lösung: Stelle sicher, dass die Schriftfarbe der Zellen wirklich der Hintergrundfarbe entspricht. Ansonsten könntest Du die Zelleninhalt ausblenden, indem Du die Schriftfarbe auf Weiß stellst.
  • Problem: Das Makro funktioniert nicht wie gewünscht.

    • Lösung: Überprüfe den angegebenen Bereich im Code. Stelle sicher, dass Du den richtigen Zellbereich angegeben hast.

Alternative Methoden

Wenn Du keine VBA-Programmierung verwenden möchtest, gibt es auch andere Möglichkeiten, einzelne Zellen auszublenden:

  1. Schriftfarbe ändern: Ändere die Schriftfarbe der Zellen auf die gleiche Farbe wie den Hintergrund.
  2. Zellen formatieren: Wähle die Zellen aus, gehe zu Formatieren und stelle die Sichtbarkeit der Zellen durch Anpassung der Schriftart und -farbe ein.

Praktische Beispiele

  1. Einzelne Zellen ausblenden:

    • Wenn Du die Zellen A1 bis A10 ausblenden möchtest, verwende den oben genannten VBA-Code und passe den Bereich an.
  2. Ausblenden von nicht benötigten Zellen:

    • Nutze einen ähnlichen VBA-Code, um alle nicht benutzten Zellen in einem größeren Bereich auszublenden.

Tipps für Profis

  • VBA optimieren: Du kannst Makros so gestalten, dass sie dynamisch auf Datenänderungen reagieren.
  • Verwendung von Variablen: Definiere Variablen für häufig verwendete Bereiche, um deinen Code übersichtlicher zu gestalten.
  • Backup erstellen: Vor dem Ausführen von Makros empfehle ich, eine Sicherungskopie Deiner Datei zu erstellen.

FAQ: Häufige Fragen

1. Kann ich auch ganze Zeilen oder Spalten ausblenden?
Ja, Du kannst auch ganze Zeilen oder Spalten ausblenden, indem Du die Funktion "Ausblenden" in Excel verwendest oder entsprechende VBA-Befehle anwendest.

2. Wie kann ich die ausgeblendeten Zellen wieder sichtbar machen?
Du kannst das gleiche Makro verwenden und die Schriftfarbe wieder auf Schwarz oder eine andere Farbe ändern oder die Zellen einfach auswählen und die Schriftfarbe anpassen.

3. Was ist der Unterschied zwischen "Zelle ausblenden" und "Werte ausblenden"?
Das Ausblenden einer Zelle macht sie unsichtbar, während das Ausblenden von Werten bedeutet, dass die Zelle vorhanden bleibt, der Inhalt jedoch nicht angezeigt wird.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige