Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
16.10.2025 13:18:36
Übersicht von Excel Konstanten
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
952to956
952to956
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Hyperlink-Adressen auslesen?

Forumthread: Hyperlink-Adressen auslesen?

Hyperlink-Adressen auslesen?
17.02.2008 10:10:56
Selma
Hallo Leute,
wie kann ich alle Hyperlink-Adressen des aktives Arbeitsblattes in das Arbeitsblatt "Hyperlinks" auslesen / eintragen?
Arbeitsblatt "Hyperlinks":
In Spalte A soll der Zellname stehen, wo der Hyperlink gefunden wurde
In Spalte B soll die Hyperlink-Adresse stehen
zum Beispiel:
A2 = D20
B2 = D:\angebote\2058\2058\Eingang\Müller GmbH\2007-10-28\GUTSCHRIFT_26_07_07.doc
A3 = F54
B3 = D:\angebote\2058\2058\Eingang\Fa. Müller\2007-10-27\Abnahmeprozedere_20060426.mpp
Vielen Dank im Voraus !
Viele Grüße,
Selma

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Hyperlink-Adressen auslesen?
17.02.2008 10:30:45
Josef
Hallo Selma,
probier mal.
Sub readLink()
Dim hLink As Hyperlink
Dim lngR As Long

lngR = 2
With Sheets("Hyperlinks")
    .Range("A2:B" & Rows.Count).Clear
    For Each hLink In ActiveSheet.Hyperlinks
        .Cells(lngR, 1) = hLink.Parent.Address(0, 0)
        
        'als Text eintragen
        ' If hLink.Address = "" Then
        ' .Cells(lngR, 2) = hLink.SubAddress
        ' Else
        ' .Cells(lngR, 2) = hLink.Address
        ' End If
        
        'oder als Hyperlink eintragen
        .Hyperlinks.Add Anchor:=.Cells(lngR, 2), _
            Address:=hLink.Address, _
            SubAddress:=IIf(hLink.SubAddress <> "", hLink.SubAddress, ""), _
            TextToDisplay:=IIf(hLink.Address = "", hLink.SubAddress, hLink.Address)
        
        
        lngR = lngR + 1
    Next
    .Columns.AutoFit
End With
End Sub


Gruß Sepp



Anzeige
AW: Hyperlink-Adressen auslesen?
17.02.2008 11:05:27
Selma
Hallo lieber Sepp,
vielen Dank es funktioniert prima. Ich habe eine Frage noch (siehe Beispieldatei): https://www.herber.de/bbs/user/49969.xls
Im Arbeitsblatt "Hyperlinks" steht unteranderem auch dies:
B3:B6 D:\angebote\2058\2058\Eingang\Fa. Müller\2007-10-27\
B8:B11 D:\angebote\2058\2058\Eingang\Müller GmbH\2007-11-01\
Diese Zellbereiche sagen mir nichts. Ansonsten ist alles andere wie immer richtig :-)
Vielen Dank !
Viele liebe Grüße,
Selma

Anzeige
AW: Hyperlink-Adressen auslesen?
17.02.2008 11:26:37
Josef
Hallo Selma,
in diesen Zellen stehen Hyperlinks genau wie in den anderen auch, nur erstrecken sie sich über mehrere Zellen.

Gruß Sepp



AW: Hyperlink-Adressen auslesen?
17.02.2008 11:33:00
Selma
Danke Sepp !
Liebe Grüße,
Selma
;

Forumthreads zu verwandten Themen

Zahlen aus Zelle auslesen
Timo

Hallo liebes Forum,
gibt es eine Möglichkeit aus einer Zelle nur die Zahlen auszulesen, siehe Beispiel:
'123456 BLA --> 123456
Ist eine Excel-interne (keine VBA-Programmierung) hier möglich?
Vielen Dank für die Unterstützung!
Timo
14.08.2008 11:16:00
Thread-ID: 1001770
7 Beiträge
Email per Hyperlink aus Zelle mit Formel
Frank

Hallo und schönen guten Morgen zusammen,
neues kleines Problem!
Ich möchte mit Hilfe eines Hyperlink per klick eine Email öffnen!
Soweit so gut und kein Problem!
Jetzt steht die Email Adresse aber nicht wirklich in der Zelle sondern diese hole ich mir per
Sverweises aus ein...
21.08.2008 09:22:45
Thread-ID: 1003367
3 Beiträge
Hyperlinks als Text
Markus

Hallo,
ich habe im Archiv bereits gesucht, aber nix passendes gefunden.
Ich schreibe eine grössere Tabelle mit vielen LINKS
Z.B. info@hammer.ch, www.meier.ch, \\pdc\LaufwerkC$, etc.
Sobald ich diese Werte in eine Tabelle schreibe, macht Excel sofort einen Hyperlink daraus.
W...
15.01.2009 08:18:00
Thread-ID: 1039886
8 Beiträge
Zahl aus best. Zelle auslesen
klaus

Hallo!
Folgende Tabelle soll dargestellt werden:
Tabelle1

 AB1Spalte 1nur 90 (für Anzahl Werte >2 und 210019,12,15,70,70,8,90,9013100160410009,10016,10019,10021,12,16,19,2,24,70,77,8,9,9015 0610009,77,99,88,10019,10021,12,16,19,2,24,70,77,8,9,900

Excel Tabel...
02.03.2009 15:51:14
Thread-ID: 1055623
6 Beiträge
Anzeige
Datum aus Zelle auslesen im Dateinamen übernehmen
Ralf

Hallo Zusammen,
hab' ein kleines Problem:
Wie kann man ein in einer Zelle hinterlegtes Datum im Dateinamen übernehmen.
Gruß Ralf
13.03.2009 16:49:57
Thread-ID: 1059943
4 Beiträge
Anzeige
Daten aus Zelle per CSV nur bedingt auslesen
Heiko

Hallöchen,
ich habe eine Datendatei in CSV mit Simikolon getrennt ohne Umbrüche.
Diese Lade ich auf eine Seite hoch, die mir die jeweiligen Zellen innerhalb einer Datenbank ausfüllt.
Meine Frage wäre jetzt, ob es eine Möglichkeit gibt, durch eingaben innerhalb der CSV-Datei den Text...
13.06.2009 20:14:31
Thread-ID: 1081318
4 Beiträge
Wert aus Zelle herauslesen
Johannes

Hallo zusammen,
weiß jemand, wie man eine Zahl aus einer Zelle mittels einer Formel herauslesen kann und mit dieser auch weiter rechnen kann?
Beispiel:
In Zelle A1 steht (das ' signalsiert den Zellanfang und -ende):
' 600 Haushaltswaren'
Jetzt möchte in A2 nur den W...
28.09.2009 11:51:34
Thread-ID: 1105996
3 Beiträge
Zahlen aus Textzelle auslesen
Heike

Guten Tag an die Excel-Profis,
nach erfolgloser Recherche und vergeblichen Tests von Formeln (siehe Datei) aus diesem Forum und auch anderen Excel-Tipps-Seiten, bitte ich um Eure Hilfe.
Aus einer Spalte mit ca. 2000 Materialnummern, die aus Text-Zahlen-Zeichenkombinationen bestehen, müs...
21.04.2010 20:22:08
Thread-ID: 1153195
9 Beiträge
Notes - Emailempfänger aus Zelle auslesen
Wolfgang

Hallo Experten !
Ein begeisterter, aber leider sehr unwissender VBA-Nutzer hofft mal wieder auf Eure Unterstützung.
Dank freundllicher Hilfe dieses Forums habe ich eine Automatik zur Verfügung, um aus einem Excel-Arbeitsblatt E-Mails per Lotus Notes zu versenden. Unter anderem werden di...
14.06.2010 17:14:53
Thread-ID: 1161802
3 Beiträge
Anzeige
Zeichen aus Zelle auslesen und speichern
terraner

Hallo Leute,
ich hätte mal wieder zwei Fragen. Hier erstmal ein Code der mir hier freundlicherweise gegeben wurde:
Sub schreibe_in_Datei() Dim i As Integer fName = Dir("*.xls") 'Pfad verbessern Call newRecord(fName) Do fName = Dir Call newRecord(fName) Loop While fName "" End Sub Sub...
11.01.2011 16:28:34
Thread-ID: 1195058
3 Beiträge
Hyperlinks aus Bildern auslesen
vi-doc

Hallo,
ich bin ein absolutes Greenhorn mit Excel, habe auch überhaupt keine Ahnung wie ich z.B. eine Formel erstelle, wo ich sie einfügen muss, etc.
Mein Probelm:
Ich habe eine Tabelle mit 332 Zeilen und 5 Spalten. Spalte 1-4 haben Name, Straße, PLZ und Ort.
In Spalte 5 habe...
25.01.2011 07:16:07
Thread-ID: 1197154
4 Beiträge
VBA Code / Freitags Werte aus Zelle auslesen
potetos00

Guten Tag,
ich bitte um Hilfe für folgendes Problem:
ich möchte aus den Arbeitsblatt "Berechnung" den Wert der Zelle "E5" JEDEN FREITAG auslesen. Dieser Wert soll dann in das Arbeitsblatt "Übersicht" in die Zelle "D2" eingetragen werden. In der Zelle E5 steht immer eine Zahl.
z.b: a...
20.08.2011 15:08:34
Thread-ID: 1226909
10 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige