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

Daten in ausgeblendete Tabelle schreiben (VBA)

Forumthread: Daten in ausgeblendete Tabelle schreiben (VBA)

Daten in ausgeblendete Tabelle schreiben (VBA)
06.07.2004 11:13:21
Volker
Liebe Forumsteilnehmer,
vielleicht weiß einer von euch eine bessere Lösung:
ich habe über Format-Blatt-Ausblenden eine tabelle versteckt.
In der Programmierung wird bei Erstellen eines neuen Angebots ein Teil der Inhalte in der ausgeblendeten Tabelle gelöscht.
Damit der Code einwandfrei läuft, muß ich aber die Zeile einfügen:
sheets("Erfassung").visible=true
Dann wird gelöscht. Anschließend kommt die Zeile
sheets("Erfassung").visible=false
Meine Frage nun:
kann man auch direkt in einer nichtsichtbaren Tabelle etwas verändern
oder muß ich immer diesen "umständlichen" Weg gehen?
ich bin gespannt, ob es eine Alternative gibt.
Viele Grüße
Volker
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Daten in ausgeblendete Tabelle schreiben (VBA)
Ramses
Hallo
dazu musst die Tabelle nicht einblenden
Worksheets("Erfassung").Rows("4:10").Delete
funktioniert auch.
Gruss Rainer
AW: Daten in ausgeblendete Tabelle schreiben (VBA)
Volker
Hallo Ramses,
danke für den Hinweis, ich will aber nur die Inhalte von 8 Zellen B6:I6 löschen.
Diese werden dann wieder gefüllt mit Inhalten.
Bezogen auf diese Zellen finden dann berechnungen unterhalb dieser Zeile statt.
Hier arbeite ich mit clearcontents.
Application.ScreenUpdating = False
Sheets("SummenStaffel").Visible = True
Sheets("SummenStaffel").Select
Range("B4:I4").Select
Selection.ClearContents
Sheets("SummenStaffel").Visible = False
Sheets("Erfassung").Select
Ist es richtig, daß das Problem nicht existiert, wenn ich worksheets verwende statt sheets?
Gruß
Volker
Anzeige
AW: Daten in ausgeblendete Tabelle schreiben (VBA)
Ramses
Hallo
der Ansatz sollte dir doch geholfen haben :-)
Worksheets("Summenstaffel").Range("B4:I4").ClearContents
Das Ein- und Ausblenden kannst du dir sparen
Gruss Rainer
Anzeige
Anzeige

Infobox / Tutorial

Daten in ausgeblendete Tabellen schreiben mit Excel VBA


Schritt-für-Schritt-Anleitung

  1. VBA-Editor öffnen: Drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Modul erstellen: Klicke mit der rechten Maustaste auf "VBAProject (DeineArbeitsmappe)", wähle Einfügen und dann Modul.

  3. Code eingeben: Füge den folgenden Code in das Modul ein:

    Sub DatenInAusgeblendeteTabelleSchreiben()
       ' Werte in der ausgeblendeten Tabelle ändern
       Worksheets("Erfassung").Range("B6:I6").ClearContents
       ' Füge neue Werte hinzu
       Worksheets("Erfassung").Range("B6").Value = "Neuer Wert"
    End Sub
  4. Makro ausführen: Schließe den VBA-Editor und führe das Makro über Entwicklertools > Makros aus.

Mit dieser Methode kannst du direkt in einer ausgeblendeten Tabelle arbeiten, ohne sie einblenden zu müssen. Dies ist besonders nützlich, um den Überblick in der Arbeitsmappe zu behalten.


Häufige Fehler und Lösungen

  • Fehler: „Laufzeitfehler 1004: Anwendung oder Objekt definierte Fehler.“

    • Lösung: Überprüfe, ob der Name des Arbeitsblattes korrekt geschrieben ist. Achte auf Leerzeichen und Groß-/Kleinschreibung.
  • Fehler: „Das Arbeitsblatt ist ausgeblendet.“

    • Lösung: Stelle sicher, dass der Code korrekt auf die ausgeblendete Tabelle zugreift. Der Zugriff kann ohne Sichtbarkeit des Blattes erfolgen, wenn der Code richtig ist.

Alternative Methoden

Falls du mit Excel VBA ausgeblendete Tabellenblätter ansprechen möchtest, gibt es auch die Möglichkeit, den Status der Sichtbarkeit zu ändern, ohne das Blatt manuell ein- oder auszublenden. Du kannst die Sichtbarkeit über die folgenden Befehle steuern:

Worksheets("Erfassung").Visible = xlSheetVeryHidden

Diese Methode versteckt das Blatt so, dass es nicht einmal über die Benutzeroberfläche sichtbar ist.


Praktische Beispiele

Beispiel 1: Inhalte löschen

Um die Inhalte einer spezifischen Zelle in einer ausgeblendeten Tabelle zu löschen, kannst du folgenden Code verwenden:

Sub InhalteLoeschen()
    Worksheets("Erfassung").Range("B6:I6").ClearContents
End Sub

Beispiel 2: Werte schreiben

Um Werte in die ausgeblendete Tabelle zu schreiben, nutze:

Sub WerteSchreiben()
    Worksheets("Erfassung").Range("B6").Value = "Neuer Wert"
End Sub

Tipps für Profis

  • Verwende immer Worksheets anstelle von Sheets, um Klarheit und Sicherheit zu erhöhen.
  • Aktiviere Application.ScreenUpdating = False vor dem Ausführen von Änderungen, um die Performance zu verbessern und Flackern zu vermeiden.
  • Stelle sicher, dass du regelmäßig deine VBA-Projekte speicherst, um Datenverlust zu vermeiden.

FAQ: Häufige Fragen

1. Kann ich in mehreren ausgeblendeten Tabellen gleichzeitig arbeiten? Ja, du kannst mehrere Tabellen in einem einzigen VBA-Skript ansprechen. Stelle sicher, dass du für jede Tabelle den passenden Code schreibst.

2. Was passiert, wenn ich den Namen der Tabelle ändere? Wenn der Name der Tabelle geändert wird, musst du den VBA-Code entsprechend anpassen, da sonst der Bezug zur Tabelle verloren geht.

3. Ist es möglich, ausgeblendete Tabellen wieder sichtbar zu machen? Ja, du kannst die Sichtbarkeit einer ausgeblendeten Tabelle mit dem folgenden Code ändern:

Worksheets("Erfassung").Visible = True

Nutze diese Tipps und Tricks, um effizienter mit Excel VBA zu arbeiten und deine Daten in ausgeblendeten Tabellen zu verwalten!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige