Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1216to1220
1216to1220
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bezugsfehler bei Tabelle-löschen verhindern

Forumthread: Bezugsfehler bei Tabelle-löschen verhindern

Bezugsfehler bei Tabelle-löschen verhindern
Jockel
Hallo,
habe ein kleines Problem mit Formeln. Ich versuche es mal in einem einfachen Rahmen zu erklären:
Habe eine Mappe mit zwei Tabellenblättern. In der ersten Mappe habe ich in A1 eine Verknüpfung auf das zweite Tabellenblatt ebenfalls auf die Zelle A1. (=Tabelle2!A1)
Nun muss ich das zweite Tabellenblatt an jemand schicken und der füllt Daten nach und sendet zurück.
(Er darf nur das eine bekommen)
Ich würde nun gerne einfach das alte, kopierte, Tabellenblatt aus meiner Mappe entfernen und das zurückgesendete Tabellenblatt vom Kollege mit den neuen Daten bei mir einfügen. So, dass auch die verknüpfung wieder funktioniert.
das Problem: lasse ich in meiner Mappe das "Tabellenblatt2" drin und füge sein "Tabellenblatt2" bei mir ein, verweist meine Verknüpfung nicht auf das neue Blatt, müsste manuell angepasst werden.
Lösche ich zuerst mein "Tabellenblatt2" um das neue "Tabellenblatt2" einzufügen, hat Excel den Bezug vergessen und findet die Daten nicht mehr im neuen Sheet.
Meine Frage dazu:
Kann ich in meiner Mappe das "Tabellenblatt2" löschen, OHNE dass der Bezug von Tabellenblatt1/A1 auf das "Tabellenblatt2/A1 verloren geht und nach dem einfügen des neuen Tabellenblattes der Bezug wieder stimmt ?
Ich weiss, das ist ein blödes vorgehen, aber ist halt so entstanden und es handelt sich nicht nur um einen Bezug, sondern um viele. Wäre also ein großes Geschäft, das manuell wieder anzupassen.
Hat da jemand eine Idee ?
Danke mal
Jockel
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Bezugsfehler bei Tabelle-löschen verhindern
06.06.2011 10:39:07
oberschlumpf
Hi Jockel
Du kannst den Bezug per VBA setzen.
Sub sbBezug()
Range("A1").FormulaLocal = "=neueTabelle2!A1"
End Sub

Für
neueTabelle2
musst du natürlich den richtigen Blattnamen eintragen, bzw die neue Tabelle muss immer so heißen, wie im Code vorgegeben.
Sollte das neue Tabellenblatt immer am Ende der Blätter stehen, dann kannst du auch mit dem Index arbeiten.
dann ersetze die obige Zeile durch diese:
Range("A1").FormulaLocal = "=" & Sheets(Sheets.Count).Name & "!A1"
Das Makro kannst du dann immer nach dem Hinzufügen des neuen Blattes starten.
Und für alle anderen Bezüge kannst du genau so verfahren.
Hilfts?
Ciao
Thorsten
Anzeige
AW: Bezugsfehler bei Tabelle-löschen verhindern
06.06.2011 10:47:11
Jockel
Hi Thorsten,
OK, habe ich soweit verstanden. Das heisst, ich muss dann aber ein Makro schreiben, dass ALLE meine Bezüge kennt. Hmmm, viel Arbeit.
Das aktualisieren, dass die Mappe schon beim löschen eines Tabellenbalttes erkennt, dass der Bezug ungültig wird, kann man nicht ausschalten, Mappen tauschen und dann wieder einschalten ?
Danke
Jockel
Anzeige
is mir nich bekannt...owT
06.06.2011 11:52:20
oberschlumpf
Kopiere die Daten owT
06.06.2011 10:46:43
Rudi
andere Idee
06.06.2011 11:12:17
Rudi
Hallo,
verschiebe Blatt2 in eine neue Mappe. Dann lautet der Bezug z.B. =[Mappe1]Blatt2!A1
Jetzt kopierst du Blatt2 des Kollegen in deine Mappe. Anschließend Bearbeiten-Verknüpfungen-Quelle ändern und deine Mappe auswählen. Hierdurch wird der externe Bezug aufgehoben. Das importierte Blatt muss hierbei immer so heißen, wie das exportierte (Blatt2)
Gruß
Rudi
Anzeige
andere Idee per VBA
06.06.2011 11:49:35
Rudi
Hallo,
in deine Mappe: 
Sub Blatt_importieren()
Dim strFile As String, strTemp As String
Const strWks As String = "Blatt2"
strTemp = ThisWorkbook.Path & "\Temp.xls"
With Application.FileDialog(msoFileDialogFilePicker)
.Title = "Importdatei wählen"
.InitialFileName = ThisWorkbook.Path & "\*.xls"
If .Show = -1 Then
strFile = .SelectedItems(1)
End If
End With
If strFile  "" Then
Application.ScreenUpdating = False
Sheets(strWks).Move
With ActiveWorkbook
.SaveAs strTemp
.Close
End With
With Workbooks.Open(strFile)
.Sheets(strWks).Move after:=ThisWorkbook.Sheets(1)
.Close False
End With
With ThisWorkbook
.ChangeLink strTemp, .Name, 1
End With
Kill strTemp
End If
End Sub

Gruß
Rudi
Anzeige
AW: Bezugsfehler bei Tabelle-löschen verhindern
06.06.2011 11:45:05
Reinhard
Hallo Jockel,
vielleicht so: 
Sub FormelnAUS()
Dim Zelle As Range
With ThisWorkbook.Worksheets("Tabelle1").UsedRange
For Each Zelle In .SpecialCells(xlCellTypeFormulas)
Zelle.FormulaLocal = "#Ä#" & Zelle.FormulaLocal
Next Zelle
End With
End Sub


Sub FormelnEIN()
Dim Zelle As Range
With ThisWorkbook.Worksheets("Tabelle1").UsedRange
.Replace What:="#Ä#", Replacement:="", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:= _
False
End With
End Sub

Gruß
Reinhard
Anzeige
Vielen Dank an alle, Super Ideen :-) owT
07.06.2011 11:39:03
Jockel
Danke vielmals
;

Forumthreads zu verwandten Themen

geschütztes Blatt - "ersetzen" geht nicht
Meli

Hallo,
ich muß ein geschütztes Blatt befüllen, sprich nur in einigen Zellen darf ich Werte/Verknüpfungen einfügen.
Ich muß ziemlich viele Zellen/Blätter ausfüllen, deswegen möchte ich die Verknüpfungen kopieren und dann durch anderen Text ersetzen lassen. Diese Funktionen (Kopieren/Erse...
30.01.2009 12:43:10
Thread-ID: 1045365
5 Beiträge
Anzeige
Blatt Löschen nur erste Zelle nicht
Sascha

Hallo Forum
Wie kann ich ein Tabellenblatt löschen bis auf die erste Zelle.
Das ganze Blatt löschen ist ja nicht schwer aber das will mir nicht gelingen.
Ist es möglich das Löschen dieser Tabelle von einem anderem Tabellenblatt zu machen
Grüsse Sascha
02.04.2010 19:27:49
Thread-ID: 1150041
4 Beiträge
Zelle kopieren in anderes Blatt geht nicht
Joel

Hallo zusammen
Ich weis nicht warum, aber irgendwie geht das nicht, wenn ich eine ganze Zelle in ein neues Blatt kopieren will. Kopieren geht schon, aber es nimmt nicht alles. Es kopiert mir nur einen Teil (etwa 30%).
Das ist doch nicht normal oder?
Danke schon im Voraus.
Gruss...
10.01.2012 10:08:47
Thread-ID: 1245445
14 Beiträge
Tabellenblätter löschen, wenn Name nicht ...
Basti

Hallo Zusammen,
versuche mich gerade an einem ein Sub (), die alle Tabellenblätter einer Arbeitsmappe löscht, die nicht einen bestimmten Teil eines Textes aufweisen.
Ziel soll es sein, per InputBox den Tabellenblattname, der Blätter die gelöscht werden sollen, abzufragen.
Bsp: Tabel...
15.09.2014 15:11:08
Thread-ID: 1381687
8 Beiträge
Blatt löschen nach Drucken funktioniert nicht
rschmid

Hallo an Alle!
Ich programmiere ein Frontend zur Datensichtung.
Beim Öffnen wird ein Tabellenblatt mit den Daten aus einer passwortgeschützten Datei kopiert. Über Listboxen werden Bedingungen ausgewählt, die Daten in einer Listbox angezeigt. - Funktioniert einwandfrei!
Man kann per...
09.10.2015 00:33:43
Thread-ID: 1451495
7 Beiträge
Sortierbezug ist ungültig
Manuel

So zum letzten mal hoffentlich heute abend,
bei meinem Makro funktioniert eigentlich alles, jedenfalls wenn ich es alleine starte und nicht mit "Call ..." aufrufe.
Wenn ich den Ursprungsmakro ausführe und darunter dann mit Call einen weiteren aufrufe bekomme ich leider immer die Fehler...
09.11.2015 21:10:37
Thread-ID: 1457310
6 Beiträge
Anzeige
Blattschutz bei Spinbutton aufheben geht nicht
Martin

Hallo,
Ich habe den nachfolgenden Code. Private Sub SpinButton1_SpinUp() ActiveSheet.Unprotect sabot Range("G89") = Range("G89") + 0.1 ActiveSheet.Protect sabot End Sub Ich habe einen Blattschutz auf dem Blatt.
Das Passwort ist richtig geschrieben und des kommt trotzdem nach dem Klick...
03.01.2016 13:19:28
Thread-ID: 1466810
6 Beiträge
Profil löschen geht nicht
Sdravi

Hy,
aus irgendeinem Grund werd ich ingnoriert möchte mein
Profil löschen was nicht funktioniert, wieso?
Mfg
23.05.2016 22:05:27
Thread-ID: 1494944
2 Beiträge
Profil löschen geht nicht
Sdravi

Hy,
aus irgendeinem Grund werd ich ingnoriert möchte mein
Profil löschen was nicht funktioniert, wieso?
Mfg
23.05.2016 22:05:49
Thread-ID: 1494945
2 Beiträge
Profil löschen geht nicht
Sdravi

Hy,
aus irgendeinem Grund werd ich ingnoriert möchte mein
Profil löschen was nicht funktioniert, wieso?
Mfg
23.05.2016 22:06:07
Thread-ID: 1494946
2 Beiträge
Profil löschen geht nicht
Sdravi

Hy,
aus irgendeinem Grund werd ich ingnoriert möchte mein
Profil löschen was nicht funktioniert, wieso?
Mfg
23.05.2016 22:06:07
Thread-ID: 1494947
2 Beiträge
Neues Tabellenblatt - Kopierter Code - geht nicht
Nermin

Guten Morgen liebe Leute,
ich habe es gestern hinbekommen, dass mein Makro ein neues Tabellenblatt erstellt, es so formatiert wie ich es möchte und Werte einfügt wie ich es möchte.
Falls man noch weitere Eingaben vornehmen will, wollte ich das ganze mit worksheet change automatisieren d...
02.08.2016 08:38:47
Thread-ID: 1507352
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Bezugsfehler beim Löschen von Excel-Tabellenblättern vermeiden

Schritt-für-Schritt-Anleitung

  1. Verknüpfung im ursprünglichen Tabellenblatt erstellen: Sorge dafür, dass dein erstes Tabellenblatt eine Verknüpfung auf das zweite Tabellenblatt hat. Beispiel: In Zelle A1 schreibe =Tabelle2!A1.

  2. Tabellenblatt vorbereiten: Bevor du das zweite Tabellenblatt löschst, stelle sicher, dass du das neue Blatt mit dem gleichen Namen (z.B. "Tabelle2") bereit hast.

  3. VBA zur Aktualisierung der Bezüge verwenden:

    Sub sbBezug()
   Range("A1").FormulaLocal = "=Tabelle2!A1"
End Sub

  4. Altes Tabellenblatt löschen: Lösche das alte Tabellenblatt. Prüfe, ob die Verknüpfungen noch funktionieren.

  5. Neues Tabellenblatt einfügen: Füge das neue Tabellenblatt in die Excel-Mappe ein. Stelle sicher, dass der Name identisch ist.

  6. Bezug aktualisieren: Wenn der Bezug nicht mehr funktioniert, führe das VBA-Makro erneut aus, um die Verknüpfungen zu aktualisieren.

Häufige Fehler und Lösungen

  • Fehler: "Excel der Bezug ist ungültig" Popup
    Lösung: Stelle sicher, dass das neue Blatt den gleichen Namen hat wie das alte. Wenn du den Namen änderst, musst du die Verknüpfung manuell anpassen.

  • Fehler: Excel Blatt löschen geht nicht
    Lösung: Überprüfe, ob das Blatt, das du löschen möchtest, geschützt ist. Du musst den Blattschutz aufheben.

  • Fehler: Bezug Excel entfernen nicht möglich
    Lösung: Wenn ein Bezug auf ein nicht existentes Blatt verweist, erstelle ein neues Blatt mit dem alten Namen, um den Bezug zu retten, bevor du das Blatt endgültig entfernst.

Alternative Methoden

  • Daten in eine neue Mappe verschieben: Du kannst das Tabellenblatt in eine neue Excel-Mappe verschieben. Der Bezug wird dann extern, z.B. =[Mappe1]Tabelle2!A1. Später kannst du die Quelle ändern, um den Bezug zu aktualisieren.

  • VBA-Skript verwenden: Rudi schlägt vor, ein VBA-Skript zu verwenden, um das Blatt zu importieren, das die Bezüge automatisch aktualisiert:

    Sub Blatt_importieren()
   ' Hier den Code einfügen
End Sub

Praktische Beispiele

  1. Bezug mit VBA setzen:

    Sub SetBezug()
   Dim ws As Worksheet
   Set ws = ThisWorkbook.Sheets("Tabelle1")
   ws.Range("A1").Formula = "=Tabelle2!A1"
End Sub

  2. Formeln temporär deaktivieren: Mit einem weiteren VBA-Skript kannst du Formeln in deiner Tabelle temporär deaktivieren:

    Sub FormelnAUS()
   Dim Zelle As Range
   With ThisWorkbook.Worksheets("Tabelle1").UsedRange
       For Each Zelle In .SpecialCells(xlCellTypeFormulas)
           Zelle.FormulaLocal = "#Ä#" & Zelle.FormulaLocal
       Next Zelle
   End With
End Sub

Tipps für Profis

  • Bezüge regelmäßig überprüfen: Halte deine Bezüge im Blick, besonders nach dem Löschen oder Verschieben von Blättern.

  • Makros für häufige Aufgaben nutzen: Speichere Makros, um die Arbeit mit Bezügen zu automatisieren. So kannst du schnell auf Änderungen reagieren.

  • Einfache Benennung: Halte die Namen deiner Tabellenblätter einfach und nachvollziehbar, um Verwirrung zu vermeiden.

FAQ: Häufige Fragen

1. Wie kann ich Excel-Bezüge entfernen, ohne die Formeln zu verlieren?
Du kannst den Bezug vorübergehend deaktivieren, indem du die Formeln in Text umwandelst. Später kannst du die Formeln wieder aktivieren.

2. Warum erscheint der Fehler "Bezug ist ungültig"?
Dieser Fehler tritt auf, wenn ein Bezug auf ein entferntes oder umbenanntes Tabellenblatt verweist. Überprüfe die Blattnamen und passe die Formeln entsprechend an.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige