Excel: So reparieren Sie defekte Links
In einer Arbeitsmappe können Sie manchmal Links zu anderen Arbeitsmappen erstellen, um auf einige relevante Informationen zu verweisen. Wenn die Quellarbeitsmappe jedoch umbenannt oder an einen anderen Speicherort verschoben wird, werden diese zusätzlichen Verknüpfungen unterbrochen. Hier stellt dieses Tutorial zwei verschiedene Methoden zum Reparieren der defekten Links in Excel vor.
Korrigieren Sie defekte Links, indem Sie „Links bearbeiten“ anwenden
Korrigieren Sie defekte Links mithilfe von VBA-Code
In Excel können Sie zum Dialogfeld "Links bearbeiten" gehen, um sie einzeln zu korrigieren.
1. Aktivieren Sie die Arbeitsmappe, die die defekten Links enthält, und klicken Sie auf Datum > Links bearbeiten (in Abfragen und Verbindungen Gruppe).
2. In dem Links bearbeiten Dialog, klicken Sie auf Status überprüfen um herauszufinden, welche Links defekt sind.
3. Klicken Sie dann auf die defekten Links und dann auf Quelle ändern Schaltfläche, in der Quelle ändern Fenster, wählen Sie die richtige Quellarbeitsmappe aus und klicken Sie auf OK.
Jetzt können Sie den Status von geändert sehen Fehler zu OK, und wiederholen Sie dann Schritt 3, um andere defekte Links zu reparieren.
Hier wird ein VBA-Code vorgestellt, der Ihnen helfen kann.
1. Aktivieren Sie die Arbeitsmappe, deren fehlerhafte Links Sie reparieren möchten, und drücken Sie Andere + F11 Schlüssel.
2. Dann im Knallen Microsoft Visual Basic für Applikationen Klicken Sie im Fenster Insert > Modul um ein neues leeres Modul zu erstellen.
3. Kopieren Sie den folgenden Code und fügen Sie ihn in das neue Modul ein.
VBA: Defekte Links reparieren
Sub ResetInvalidLinks()
'UpdatedbyExtendoffice20220701
Dim xWB As Workbook
Dim xLks As Variant
Dim xFNum, xStatus As Integer
Dim xStrLk, xLinAddress As String
Dim xF
Dim xLk
Set xWB = Application.ActiveWorkbook
xLks = xWB.LinkSources(xlExcelLinks)
If IsEmpty(xLks) Then
MsgBox "Select updated source"
Exit Sub
End If
On Error Resume Next
For xFNum = LBound(xLks) To UBound(xLks)
xStrLk = xLks(xFNum)
xStrLk = Right(xStrLk, Len(xStrLk) - InStrRev(xStrLk, "\"))
xStatus = ActiveWorkbook.LinkInfo(xStrLk, xlLinkInfoStatus)
If xStatus <> 0 And xStatus <> 3 Then
MsgBox xStrLk & " the link is broken, please select new source"
xF = Application.GetOpenFilename()
If xF <> "" Then
For Each xLk In ActiveSheet.UsedRange.Hyperlinks
xLinAddress = Right(xLk.Address, Len(xLk.Address) - InStrRev(xLk.Address, "\"))
If InStr(xStrLk, GetAddress) <> 0 Then
ActiveSheet.Hyperlinks.Add Anchor:=xLk.Range, Address:=xF
End If
Next
ActiveWorkbook.ChangeLink xLks(xFNum), xF, xlLinkTypeExcelLinks
End If
End If
Next
End Sub
4. Drücken Sie F5 Schlüssel oder Führen Sie Taste im nun erscheinenden Bestätigungsfenster nun wieder los. um den Code zu aktivieren. Jetzt sucht es nach defekten Links. Wenn dies der Fall ist, wird ein Dialogfeld angezeigt, das Ihnen mitteilt, welcher Link fehlerhaft ist. Bitte wählen Sie eine neue Quelle aus. Klicken OK um fortzufahren.
5. In dem Offen Fenster, wählen Sie die aktualisierte Quelle, klicken Sie auf OK.
Wenn in der Arbeitsmappe immer noch ein defekter Link vorhanden ist, werden die obigen Dialogfelder erneut angezeigt, bis alle defekten Links behoben sind.
Hinweis: Wenn in der Arbeitsmappe kein fehlerhafter Link vorhanden ist, wird VBA nach der Ausführung angehalten.
Tipp: Wenn Sie alle zusätzlichen Links anzeigen und die defekten Links unterbrechen möchten, Kutools for Excel Finden und brechen Sie defekte Links Feature wird ein guter Helfer sein.
Für Details zu dieser Funktion klicken Sie bitte hier.
Für eine 30-tägige kostenlose Testversion laden Sie es bitte herunter unter hier.
So fixieren/sperren Sie die Hintergrundfarbe in einem Blatt
Wenn Sie ein Blatt zur Bearbeitung mit anderen teilen, möchten Sie manchmal die Hintergrundfarbe in einem Bereich von Zellen sperren und verhindern, dass sie geändert werden.
Wie kann man die Größe von Excel-Dateien reduzieren?
Manchmal dauert das Öffnen oder Speichern Minuten, wenn die Excel-Datei zu groß ist. Um dieses Problem zu lösen, erfahren Sie hier in diesem Tutorial, wie Sie die Größe der Excel-Datei reduzieren, indem Sie unnötige oder nie verwendete Inhalte oder Formate entfernen.
Excel: So erstellen oder fügen Sie ein Lesezeichen ein
Haben Sie sich jemals vorgestellt, ein Lesezeichen zu erstellen oder einzufügen, um schnell zu einem bestimmten Datenbereich zu springen, während sich viele Daten in einem Arbeitsblatt oder einer Arbeitsmappe befinden?
Wie wende ich Schattierungen auf ungerade oder gerade (alternative) Zeilen / Spalten in Excel an?
Beim Entwerfen eines Arbeitsblatts wenden viele Benutzer Schattierungen auf ungerade oder gerade (alternative) Zeilen oder Spalten an, um das Arbeitsblatt visueller zu gestalten. Dieser Artikel zeigt Ihnen zwei Methoden zum Anwenden von Schattierungen auf ungerade oder gerade Zeilen / Spalten in Excel.
Die besten Tools für die Office-Produktivität
Kutools for Excel löst die meisten Ihrer Probleme und erhöht Ihre Produktivität um 80%
- Super Formelriegel (leicht mehrere Textzeilen und Formeln bearbeiten); Layout lesen (leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
- Zellen / Zeilen / Spalten zusammenführen und Speichern von Daten; Inhalt geteilter Zellen; Kombinieren Sie doppelte Zeilen und Summe / Durchschnitt... doppelte Zellen verhindern; Bereiche vergleichen...
- Wählen Sie Duplizieren oder Eindeutig Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufällige Auswahl ...
- Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen zu mehreren Blättern; Aufzählungszeichen einfügen, Kontrollkästchen und mehr ...
- Lieblingsformeln und schnell einfügen, Bereiche, Diagramme und Bilder; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
- Text extrahieren, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen;; Paging-Zwischensummen erstellen und drucken; Inhalt und Kommentare zwischen Zellen konvertieren...
- Superfilter (Speichern und Anwenden von Filterschemata auf andere Blätter); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
- Kombinieren Sie Arbeitsmappen und Arbeitsblätter;; Tabellen basierend auf Schlüsselspalten zusammenführen; Daten in mehrere Blätter aufteilen; Batch-Konvertierung von xls, xlsx und PDF...
- Pivot-Tabellengruppierung nach Wochennummer, Wochentag und mehr ... Entsperrte, gesperrte Zellen anzeigen durch verschiedene Farben; Markieren Sie Zellen mit Formel / Name...
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!