Powerpoint Excel Verknüpfungen aufheben und ändern mit VBA
Schritt-für-Schritt-Anleitung
Um alle Excel-Verknüpfungen in Powerpoint zu löschen, kannst Du das folgende Makro verwenden. Dieses VBA-Skript durchläuft alle Folien Deiner Präsentation und bricht die Links zu Excel-Datenquellen.
Sub BreakAllExcelLinks()
'PURPOSE: Break any external links in your PowerPoint presentation
Dim shp As Shape
Dim sld As Slide
'Loop Through Each Slide in ActivePresentation
For Each sld In ActivePresentation.Slides
For Each shp In sld.Shapes
On Error Resume Next
shp.LinkFormat.BreakLink
On Error GoTo 0
Next shp
Next sld
End Sub
Um dieses Makro auszuführen, öffne den VBA-Editor in Powerpoint (Alt + F11), füge ein neues Modul ein (Einfügen > Modul) und kopiere den Code dort hinein. Danach kannst Du es ausführen.
Wenn Du die Quelle aller Verknüpfungen ändern möchtest, kannst Du den folgenden Code verwenden. Achte darauf, den newFilePath entsprechend anzupassen:
Sub EditPowerPointLinks()
Dim newFilePath As String
Dim pptPresentation As Presentation
Dim pptSlide As Slide
Dim pptShape As Shape
'file path as a string
newFilePath = "String of\New File Path\Excel File 2.xlsx"
'Set the variable to the PowerPoint Presentation
Set pptPresentation = ActivePresentation
'Loop through each slide in the presentation
For Each pptSlide In pptPresentation.Slides
For Each pptShape In pptSlide.Shapes
pptShape.LinkFormat.SourceFullName = newFilePath
Next
Next
'Update the links
pptPresentation.UpdateLinks
End Sub
Häufige Fehler und Lösungen
Alternative Methoden
Wenn Du kein Makro verwenden möchtest, kannst Du auch manuell alle Verknüpfungen in Powerpoint entfernen:
- Gehe zu Daten in Powerpoint.
- Wähle Verknüpfungen aus.
- Hier kannst Du jede einzelne Verknüpfung auswählen und auf Verknüpfung löschen klicken.
Diese Methode ist jedoch zeitaufwändiger, besonders wenn Du viele Verknüpfungen hast.
Praktische Beispiele
-
Alle Verknüpfungen löschen: Verwende das erste Makro, um alle Excel-Verknüpfungen in Deiner Präsentation zu entfernen, bevor Du sie mit anderen teilst.
-
Verknüpfung aufheben: Wenn Du ein Excel-Diagramm in Powerpoint eingefügt hast und die Verknüpfung aufheben möchtest, nutze das BreakAllExcelLinks Makro, um sicherzustellen, dass die Präsentation unabhängig von der Excel-Datei funktioniert.
Tipps für Profis
- Halte Deine Makros gut organisiert, indem Du sie in verschiedenen Modulen oder sogar in einer separaten Datei speicherst.
- Nutze Kommentare im VBA-Code, um den Überblick zu behalten, was jede Funktion macht.
- Teste Deine Makros in einer Kopie Deiner Präsentation, um unbeabsichtigte Änderungen an wichtigen Dateien zu vermeiden.
FAQ: Häufige Fragen
1. Wie kann ich alle Verknüpfungen in Powerpoint löschen?
Verwende das BreakAllExcelLinks Makro, um alle Excel-Verknüpfungen in Deiner Präsentation schnell zu löschen.
2. Kann ich die Verknüpfungen auch manuell löschen?
Ja, Du kannst die Verknüpfungen manuell über das Menü "Daten" > "Verknüpfungen" in Powerpoint entfernen.
3. Was mache ich, wenn das Makro nicht funktioniert?
Überprüfe die Makroeinstellungen in Powerpoint und stelle sicher, dass die Shapes tatsächlich Links zu Excel haben.