Alternativtext einer Grafik in Excel auslesen
Schritt-für-Schritt-Anleitung
Um den Alternativtext einer Grafik in Excel auszulesen, kannst Du den folgenden VBA-Code verwenden. Dieser Code sucht gezielt nach einer Grafik in einer bestimmten Zelle und liest den Alternativtext aus.
- Öffne Excel und drücke
ALT + F11, um den VBA-Editor zu öffnen.
- Klicke auf
Einfügen > Modul, um ein neues Modul zu erstellen.
- Füge den folgenden Code in das Modul ein:
Sub Main()
Dim objShp As Shape
With ThisWorkbook.Worksheets("Tabelle1")
For Each objShp In ActiveSheet.Shapes
If objShp.Type = msoPicture Then
If objShp.TopLeftCell.Address = "$A$7" Then
MsgBox objShp.AlternativeText
End If
End If
Next objShp
End With
End Sub
- Ändere
"Tabelle1" in den Namen der Tabelle, in der sich Deine Grafik befindet.
- Schließe den VBA-Editor und kehre zurück zu Excel.
- Führe das Makro aus, um den Alternativtext anzeigen zu lassen.
Häufige Fehler und Lösungen
-
Laufzeitfehler '91': Dieser Fehler tritt auf, wenn Du versuchst, eine Zelle anzusprechen, die nicht existiert oder nicht richtig zugeordnet ist. Stelle sicher, dass die Zelladresse korrekt ist und dass die Grafik tatsächlich in dieser Zelle platziert ist.
-
Kein Alternativtext angezeigt: Überprüfe, ob die Grafik tatsächlich einen Alternativtext hat. Du kannst den Alternativtext bearbeiten, indem Du mit der rechten Maustaste auf die Grafik klickst und "Alternativtext bearbeiten..." wählst.
Alternative Methoden
Wenn Du den Alternativtext nicht über VBA auslesen möchtest, kannst Du auch die Funktion "Text aus Bild auslesen" in PowerPoint verwenden, um den Text der Grafik zu extrahieren. Danach kannst Du den Alternativtext manuell in Excel eingeben. Beachte, dass in PowerPoint der Alternativtext ebenfalls bearbeitet werden kann.
Praktische Beispiele
Angenommen, Du hast eine Grafik mit dem Alternativtext "Brasilien", die sich in Zelle A7 befindet. Wenn Du das obige VBA-Skript ausführst, wird eine MsgBox mit dem Text "Brasilien" angezeigt. Du kannst die Zelladresse in dem Code ändern, um Alternativtexte aus anderen Zellen auszulesen.
Tipps für Profis
- Nutze die
MsgBox-Funktion, um mehrere Alternativtexte in einer einzigen Ausführung anzuzeigen, indem Du die Werte in einer Variablen speicherst und sie am Ende anzeigst.
- Wenn Du regelmäßig mit Grafiken arbeitest, erwäge, eine Schaltfläche in Deiner Excel-Datei zu erstellen, die das Makro ausführt, um den Prozess zu vereinfachen.
- Überlege, ob Du den Alternativtext in eine bestimmte Zelle statt in einer MsgBox anzeigen lassen möchtest. Dies kann durch Anpassung des Codes erfolgen.
FAQ: Häufige Fragen
1. Wie kann ich den Alternativtext in Excel anzeigen lassen?
Du kannst den Alternativtext durch den oben genannten VBA-Code auslesen und in einer MsgBox anzeigen oder in eine Zelle schreiben.
2. Funktioniert dieser Code in allen Excel-Versionen?
Ja, der VBA-Code sollte in den meisten modernen Excel-Versionen funktionieren, vorausgesetzt, Du hast Zugriff auf die Entwickleroptionen.
3. Was ist Alternativtext und warum ist er wichtig?
Alternativtext ist eine Beschreibung einer Grafik, die von Screenreadern gelesen wird. Dies ist besonders wichtig für die Barrierefreiheit, damit auch sehbehinderte Personen verstehen, was auf einem Bild dargestellt wird.
4. Kann ich den Alternativtext auch in PowerPoint auslesen?
Ja, in PowerPoint kannst Du den Alternativtext ebenfalls anzeigen lassen und bearbeiten, ähnlich wie in Excel.