Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
2016to2020
2016to2020
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Link in Textbox anzeigen wenn TextToDisplay

Forumthread: Link in Textbox anzeigen wenn TextToDisplay

Link in Textbox anzeigen wenn TextToDisplay
27.08.2025 11:08:26
Chris
Hallo zusammen,

ich habe in Zelle B1 ein String mit einer Verlinkung ins Internet, d. h. der TextToDisplay ist nicht der Link. Bsp:

Angezeigt wird "Hallo", der dahinterliegende Link ist www.hallowelt.de

Ich möchte nun den Link (www.hallowelt.de) in eine Textbox anzeigen und nicht den Zellwert "Hallo".

Wie löse ich dies in VBA? 

Textbox1.value = Sheets("Test").Cells(ActiveCell.Row, 2).Hyperlinks(1).Address


funktioniert nicht, es erscheint in der TB "Hallo"

Danke und Gruß
Chris




Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Link in Textbox anzeigen wenn TextToDisplay
27.08.2025 12:05:23
daniel
Du hast da eine etwas komische Ermittlung der Zeilennummer.

Gib zum Testen mal statt ActiveCell.row die konkrete Zeilennummer der Zelle mit dem Hyperlink ein.

Gruß Daniel
AW: Link in Textbox anzeigen wenn TextToDisplay
27.08.2025 14:21:56
Ulf
Hi,
angenommen du hast ein COM-Textfeld in einer Tabelle und der Code wird im Tabellenblatt ausgeführt. 
Me.TextBox1.Text = CStr(Me.Cells(ActiveCell.Row, 2).Hyperlinks(1).Address)

hth
Ulf
Anzeige
AW: Link in Textbox anzeigen wenn TextToDisplay
27.08.2025 14:21:10
Chris
Hallo Daniel,

hab das getestet:

.TextBox18.Value = Sheets("Test").Cells(20, 28) 'Link in Zelle
Funktioniert nicht, da in der TB der "TextToDisplay" erscheint, nicht der Link selbst.

....das ActiveCell.Row rührt daher, dass bei Klick in einem bestimmen Bereich
eine Userform geöffnet wird und verschiedene Inhalte der aktiven Reihe in Labels dargestellt werden.

Ein Lösungsansatz wäre evtl. den TextToDisplay aufzulösen bzw. rückgängig zu machen und den
Wert der Zelle (=Link) in eine Variabel zu schreiben und diesen Wert in der TB anzeigen zu lassen.

Gru0
Chris
Anzeige
AW: Link in Textbox anzeigen wenn TextToDisplay
27.08.2025 14:31:21
daniel
Was ergibt denn

.TextBox18.Value = Sheets("Test").Cells(20, 28).Hyperlinks(1).Address

In der Eingangsfrage hattest du noch Spalte 2 referenziert, jetzt ist es 28.

Wenn du ActiveCell.Row verwendest, dann ist komisch, du das mit einem fixen Tabellenblatt kombiniert, denn wenn das angegebene Blatt nicht das aktive ist, Holst du dir die Zeilennummer von einem anderen Blatt.

Am besten lädst du mal die Datei hoch, dann sehen wir, was du gemacht hast.

Gruß Daniel
Anzeige
AW: Link in Textbox anzeigen wenn TextToDisplay
27.08.2025 14:40:48
Chris
Hi Daniel,

die Antwort von Ulf funktioniert bei mir ...Cstr ist die Lösung, der gesamte Link wird in der TB dargestellt.

Eine Bespieldatei müsste ich bauen....aber nun nicht mehr nötig.

LG
Chris

Forumthreads zu verwandten Themen

comboboxen plötzlich alle leer :-/
oliver

hallo,
ich habe gestern mit eurer hilfe (*vielen vielen dank*) mit vba unendlich viele comboboxen in meine tabelle eingefügt, welche als liste die zahlen 0-100 besaßen!!!
heute habe ich die ca 400 boxen eingestellt....und nun sind sie leer bzw. die schon eingestellten werte sind noch vo...
05.10.2006 20:17:50
Thread-ID: 808224
1 Beitrag
Ich will auch was beitragen: Protokolle
maxg

Hallo, VBA-User - MÄDELS und JungsIch, der ich ganz neu in dieser User-Group bin, will auch mal etwas vorstellen, was Ihr vielleicht
gebrauchen könnt.Ein Änderungsprotokoll.Die Idee:
Da ich im Kreditwesen (Leiter EDV) arbeite, brauche ich jede Transaktion protokolliert, gleichgültig ob
17.05.2002 21:43:46
Thread-ID: 121797
1 Beitrag
Code optimieren
Andreas

Hallo Excelfreunde,
Ich habe folgenden Code aus dem Internet mir in meiner Datei entsprechend anzupassen.
So gesehen funktioniert auch alles.
Mein Problem was ich habe und gern gelöst bekommen würde ist folgendes
in der Codezeile
(Bereich = "B5:IV697" ' aus welchem Bereic...
18.10.2020 16:17:41
Thread-ID: 1788093
6 Beiträge
transponieren
Jürg

Hallo Forum, Hallo Hajo
ich habe dieses VBA von Hajo gefunden :
Option Explicit
Public Function GetDataClosedWB(SourcePath As String, _ SourceFile As String, sourceSheet As String, _ SourceRange As String, TargetRange As Range) As Boolean 'Holt einen Bereich aus einer _geschlossene...
14.01.2020 11:52:50
Thread-ID: 1734031
4 Beiträge
Anzeige
Daten aus geschlossenen Mappen auslesen
Simone

Hallo, ich benötige leider Hilfe. Ich möchte meine Zeitabrechnungen zusammenführen. Leider wäre der Umfang zu groß um jede Mappe zu öffnen und dann Daten auszulesen. Daher habe ich hier geschmökert und auch eine Funktion gefunden, welche perfekt für mich wäre:
Option Explicit
Public Fu...
09.08.2019 14:28:16
Thread-ID: 1706859
8 Beiträge
Daten aus geschlossener Datei mit Bedingungen kopi
Heiner

Hallo zusammen,
ich habe folgenden Code gefunden um Daten aus einer geschlossennen Datei zu holen:
Option Explicit Public Function GetDataClosedWB(SourcePath As String, _ SourceFile As String, sourceSheet As String, _ SourceRange As String, TargetRange As Range) As Boolean 'Holt einen...
03.11.2011 20:15:27
Thread-ID: 1236486
10 Beiträge
Kopieren aus Datei
Herbert

Hallo zusammen,
ich komme einfach nicht weiter, habe mir folgenden Vbacode kopiert, aber jetzt fehlt mir noch eine Kleinigkeit.Meine geschlossene Datei hat in Zeile 1 ein fortlaufendes Datum für ein ganzes Jahr stehen also 01.01.2014 bis 31.12.2014. Ich möchte, das wenn ich in der aktiven...
28.07.2014 03:55:32
Thread-ID: 1372636
3 Beiträge
Aus Geschlossener Datei daten auslesen
Herbert

Hallo zusammen,
ich komme einfach nicht weiter, habe mir folgenden Vbacode kopiert, aber jetzt fehlt mir noch eine Kleinigkeit.Meine geschlossene Datei hat in Zeile 1 ein fortlaufendes Datum für ein ganzes Jahr stehen also 01.01.2014 bis 31.12.2014. Ich möchte, das wenn ich in der aktiven T...
30.07.2014 19:04:54
Thread-ID: 1373216
12 Beiträge
VBA Kontextmenü showpopup Laufzeitfehler??
goma
Hilfeee- sorry Leute aber ich häng hier immer noch mit meinen Kontextmenüs ab

Vielleicht vorab ich hab xl97

Aber es klappte mal – dann immer nur wenn ich xl komplett schloß und jetzt nachdem ich für meine commandbar mycontext2 die onaction subs fertig habe (umständlich aber die kla...
04.01.2004 20:28:38
Thread-ID: 358683
6 Beiträge
Summe bilden
Ralf

Hallo
Ich hatte gestern schon mal eine anfrage gestartet habe auch eine Antwort bekommen leider ist mir nacher die Zeit weggelaufen und konnte mich nicht mehr zurückmelden.
Aber jetzt zu meinem Problem Ich suche eine Formel, die ich per Vba in eine Zelle einfügen möchte. Die Formel soll m...
02.06.2003 20:55:22
Thread-ID: 264044
1 Beitrag
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum