Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 19:22:16
Von exceltabelle in word per steuerelement temarker
16.04.2024 18:50:53
Fehlermeldung bei Code - Excel speichern mit Bez. aus Zelle
16.04.2024 17:18:01
Projektplan-Tabelle oder Gantt ohne Balken
16.04.2024 17:05:25
formatierten Text direkt in Zelle einfügen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1832to1836
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1832to1836
1832to1836
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Alternativ-Text einer Grafik auslesen

Alternativ-Text einer Grafik auslesen
23.05.2021 12:28:24
reiner
Hallo Leute,
https://www.herber.de/bbs/user/146330.xlsb
mit dem Beispielcode werden ohne Zuweisung einer Zelladresse die Namen der 3 Grafikdateien ausgelesen und als "Picture 9", "Picture 3", "Picture 2" jeweils in der MsgBox angezeigt.
Wie kann ich eine Zelle gezielt ansprechen und nur den Namen der in der zugewiesenen Zelle befindlichen einen Grafikdatei anzeigen lassen?
Wie lässt sich der jeder Grafikdatei zugeordnete Alternativtext (z.B. "Brasilien") in Zelle A7 auslesen?
ich freue mich über Rückmeldungen
reiner

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Alternativ-Text einer Grafik auslesen
23.05.2021 12:57:05
Nepumuk
Hallo reiner,
ich versteh nur Bahnhof.
Gruß
Nepumuk
AW: Alternativ-Text einer Grafik auslesen
23.05.2021 13:33:36
reiner
hallo Nepumuk,
zu der ersten Frage:
wenn die For Each ... Next -Schleife durchlaufen wird, werden nacheinander die Namen der 3 Grafikdateien ausgelesen und als "Picture 9", "Picture 3", "Picture 2" jeweils in einer MsgBox angezeigt.
Ich will aber nur den Namen der Grafikdatei (z.B. "Brasilien") in Zelle A7 angezeigt bekommen; mit der For Each ... Next -Schleife ist das aber nicht möglich weil damit ALLE Grafikdateien abgefragt werden.
Wenn ich die Zeilen: For Each objShp In ActiveSheet.Shapes und Next objShp auskommentiere und stattdessen Range("A7").Select eintrage, erscheint die Meldung: Laufzeitfehler '91#
Wenn ich mit der rechten Maustaste auf eine beliebige Flagge (Grafikdatei) klicke, erscheint im Kontextmenü der Eintrag "Alternativtext bearbeiten...". Am rechten Bildschirmrand lese ich dann den Namen des zur Flagge gehörenden Staates, in diesem Fall "Brasilien".
Meine 2. Frage bezog sich darauf, ob und wie ich gezielt nach dem Namen im Alternativtext "Brasilien" suchen kann unter Angabe der Zelladresse "A7"
Anzeige
AW: Alternativ-Text einer Grafik auslesen
23.05.2021 13:43:07
Nepumuk
Hallo reiner,
ohne Schleife geht das nicht.
Ein Beispiel wie du das für Brasilien machen kannst:
Code:



[Cc]







	
	
	
	




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
Gruß
Nepumuk
Anzeige
AW: Alternativ-Text einer Grafik auslesen
23.05.2021 13:53:00
reiner
Danke Nepumuk,
dein Vorschlag hilft mir weiter, danach habe ich gesucht
alles Gute
reiner

301 Forumthreads zu ähnlichen Themen

Stundenwert zwischen zwei Tagen
Huber

Hallo,
folgendes Problem.
Möchte den Stundenwert zwischen zwei Tagen (ohne Datum) wissen.
Beispiel: Zelle A1: Samstag 06:00 Zelle B1: Sonntag 12:00 C1: 30
Danke im voraus...
22.08.2008 08:11:00
Thread-ID: 1003710
13 Beiträge
Anzeige
Formel Textteilstring dynamisch extrahieren
Horst_H

Hallo,
seit Stunden probiere ich bislang leider ergebnislos eine Formel zu erstellen:
Quelle:
"S2001W.rar;http://www.netload.in/dateigTTIDfQowZ/S2001W.rar.htm;93.32
MB;0;12.02.2009"
Ergebnis soll sein der string zwischen dem 1. und dem 2. Semikolon, weil die Testlänge unters...
19.02.2009 13:50:00
Thread-ID: 1052127
6 Beiträge
Text mit Zahl in neue Zelle auslesen
Lemmi

Hallo zusammen,
ich habe einen Text ais einer Datenbank den ich Teilweise auslesen möchte.
z. B. Text
A) in A1 : Büro ABC Hamburg 1256 zu Hause
B) in A2 : Büro Berlin 12345 in Straße XXX
Nun möchte ich das Wort Hamburg in B1 auslesen! soweit hat man mir bereits vor...
16.09.2009 21:47:50
Thread-ID: 1103375
17 Beiträge
Anzeige
Textboxinhalt aus anderer Exceldatei auslesen
Urmila

Hallo alle,
zwar weiß ich wie man in einer Zelle den Inhalt aus y-beliebigen Excel Datei eingeben kann, doch ich suche die Möglichkeit, den Inhalt von Zelle B1-B10 in den Textboxen TextBox1-TextBox10 anzeigen zu lassen. Die Datei, worin die Werte stehen, ist C:/Test/Versuch.xls.
Danke u...
05.10.2009 09:17:20
Thread-ID: 1107205
4 Beiträge
noch mal: Werte zwischen zwei Zahlen zählen
Bernd

Guten Morgen zusammen,
mein Problem vom Freitag ist leider noch nicht ganz gelöst :-((
Die Hilfe von "WF" hat mich schon ein ganzes Stück weitergebracht, aber leider hat die Formel ein Problem mit der Berechnung von negativen Werten
'=SUMMENPRODUKT(('Grunddaten berechnet'!$R7:$R4000...
30.11.2009 08:57:22
Thread-ID: 1120929
6 Beiträge
Text zwischen zwei Zeichen
Uwe

Guten Abend an Alle,
gibt es eine Formel um ein Wort unterschiedlicher Länge zwischen zwei eindeutigen Zeichen zu extrahieren?
z.b.
Applause
oder
Gran Move
benötigt würde nur das Wort Applause und Gran Move
Vorab schon mal Dank für die Hilfe!
Gruß Uwe
08.01.2010 18:53:49
Thread-ID: 1128368
6 Beiträge
Auslesen einer Textbox in einer Userform | Herbers Excel-Forum
Bernd Cramer
Hallo,
ich benutze in einer Userform eine mehrzeiliege Textbox.
Diese soll Zeile für Zeile per VBA Ausgelesen werden und in ein Excel-Blatt eingetragen werden.
Vor einiger Zeit hatte mir ein anderer Forum teilnehmer folgenden Tip gegeben.
With tbgrund1
.SetFocus
tbz = 0 'Di...
27.01.2010 17:04:25
Thread-ID: 1133524
4 Beiträge
Tage zwischen zwei Datümern auswerten
Reinhard

Hallo Wissende,
in A ist der Starttermin, in C der Endtermin. Beide Spalten benutzerdefiniert so formatiert: TTT, TT.MM.JJJJ
Es können da ja 0-X Tage dazwischenliegen, diese Zahl der dazwischenliegenden Tage möchte ich ermitteln.
Mit Datediff-1 erhalte ich diese Zahl. Diese will ich...
05.03.2010 17:05:03
Thread-ID: 1143798
13 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
12
5
5
16
2
3
5
5
3
12
8
4
1
2
7
3
2
6
7
1
2
7
13
13
1