Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1716to1720
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
1716to1720
1716to1720
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

mehrere Hyperlinks auslesen und speichern in TXT

mehrere Hyperlinks auslesen und speichern in TXT
04.10.2019 09:02:11
Alex
Hallo Herber Forum, :-)
Vorgeschichte: Habe ca. 500 Links in einer Exceltabelle
A1 = Name
B1 = Link fürs Web
A2 = Name
B2 = Link ...
usw...
komme irgend wie nicht dahinter wie ich den Link (B1) per VBA einlese - ausgebe in eine TXT mit Name (A1 - Speichername), usw... die Links (Sammlung) kann varieren mal 500 mal 750 mal 1000 usw...
gibt es da einen Weg, wenn ja welchen? Hoffe das es so einigermassen verständlich ist :-)
Gruss Alex

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: mehrere Hyperlinks auslesen und speichern in TXT
04.10.2019 09:35:48
peterk
Hallo
z.B. Folgenden Code ins allgemeine Modul

Function HyperlinkAdresse(Zelle As Range)
Dim Link As String
Application.Volatile
Link = ""
If Zelle.Hyperlinks.Count Then
Link = Zelle.Hyperlinks(1).Address
End If
HyperlinkAdresse = Link
End Function
Dann kannst Du z.B. in C die Formel "=HyperlinkAdresse(B1)" schreiben
Peter
AW: mehrere Hyperlinks auslesen und speichern in TXT
04.10.2019 09:55:59
Alex
Hallo Peter,
danke für die schnelle Antwort,
ok ich gebs zu null plan :-)
Modul erstellt - inhalt - eingefügt - tut sich nix.
hmmm.... verdammt :-)
gruss Alex
AW: mehrere Hyperlinks auslesen und speichern in TXT
04.10.2019 09:46:25
Beverly
Hi Alex,
meinst du so etwas:
Sub HyperlinksNachTextDatei()
Dim Fso
Dim fsoDatei
Dim lngZeile As Long
Dim lngLetzte As Long
Set Fso = CreateObject("Scripting.FileSystemObject")
Set fsoDatei = Fso.OpenTextFile("E:\Z_Test\TextinDatei" & _
".txt", 8, True) ' 0 Then
fsoDatei.Write .Cells(lngZeile, 1) & " " & _
.Cells(lngZeile, 2).Hyperlinks(1).Address & vbCrLf
End If
Next lngZeile
End With
fsoDatei.Close
Set fsoDatei = Nothing
Set Fso = Nothing
End Sub


Anzeige
AW: mehrere Hyperlinks auslesen und speichern in TXT
04.10.2019 10:16:01
Alex
Hi Berverly,
so in der Art, arbeite hier über einen Terminalserver laaagt hier alles ein bisschen.(heulll)
in Zelle B1 der Hyperlink welcher ausgelesen wird und als Txt gespeichert werden soll,
in Zelle A1 ist der Name für die Datei deklariert die Gespeichert wird.
und das geht immer so weiter
A2 -B2 = auslesen & speichern TXT
A3 -B3 = auslesen & speichern TXT ...
:-)
gruss alex
AW: mehrere Hyperlinks auslesen und speichern in TXT
04.10.2019 10:38:01
Alex
Hi Berverly,
ok mein Fehler habs verstanden, funzt.
bräuchte bloss den Inhalt (Quelltext)
in der TXT, mit der Bezeichnung des angegebenen Namens, soweit OK :-)
Gruss Alex
Anzeige
AW: mehrere Hyperlinks auslesen und speichern in TXT
04.10.2019 10:48:46
Alex
Userbild
z.B.
gruss Alex
AW: mehrere Hyperlinks auslesen und speichern in TXT
04.10.2019 11:43:52
Alex
Danke auch an PeterK :-)

301 Forumthreads zu ähnlichen Themen

Zwei Dinge in einer Zelle
Sabine

Hallo,
ich möchte ein Problem mit Excel Formeln und ohne VBA lösen.
Es gibt drei Spalten: Datum1, Zweck, Datum 2
Wenn in Zweck in einer Spalte das Wort "Show" eingetragen wird, soll in Datum 2 in der entsprechenden Zeile stehen "Bitte nennen Sie ein Verwendungsdatum". Das kriege ich...
29.08.2008 15:25:00
Thread-ID: 1005860
2 Beiträge
Anzeige
mehreren Zellen in einer Zelle mit Absätzen
Christian

1. Ist es möglich, die markierten Zeilen von Screenshot 1 per Formel/Makro so zu übernehmen, das diese wie in Screenshot 2 übernommen werden? Solche Felder kommen aber öfters und auch mit einzelnen Zeilen dazwischen vor. Die Formatierung (bei Zahlen mit ,00 soll ein langer Strich stehen) sollte...
28.11.2008 15:53:49
Thread-ID: 1028725
3 Beiträge
mehrere Zellen in einer Zelle mit Absätzen II
Christian

Hi
Wir brauchen etwas ähnliches wie in diesem Script von Daniel (der uns schon sehr weitergeholfen hat!):
https://www.herber.de/bbs/user/57225.xls
Zeilen sollen zusammengefasst werden, wenn die Bezeichnung in Spalte A und B gleich sind (siehe Screenshots).
https://www.herber.de...
05.12.2008 15:47:00
Thread-ID: 1030485
7 Beiträge
Anzeige
zählen bestimmter Zeichen in einer Zelle
Georg

Hallo Excel Welt,
wie kann ich die Anzahl bestimmter Zeichen (z.B. Kommas) in einer Zelle zählen?
Beispiel:
A2 = 12, 34, 2, 134
B2 = 3 (es sind drei Kommas in der Zelle A2) = dafür benötige ich die Lösung
Oder kann ich die Anzahl der (durch Kommas getrennten) Zahlen direkt...
21.01.2009 16:03:36
Thread-ID: 1042267
6 Beiträge
mehrere Zellen in einer einfügen
Claus

Hallo,
wie kann ich per Makro die Eingaben einiger Zellen in einer andere kopieren? Beispiel
A1 = 1,
A2 = 2,
A3 = 3,
A4 = 4,
A5 = 5,
Ergebnis sollte in B1 stehen und müsste wie folgt lauten 1,2,3,4,5,
Die Anzahl der A Zeilen ist nich fix. Fängt immer bei A1...
27.01.2009 18:00:00
Thread-ID: 1044333
2 Beiträge
Wörterabstand in einer Zelle
Anja

Hallo Allerseits!
Ich möche einen Vor- und Zunamen in einer Zelle formatieren. Kann man den Abstand der untereinanderstehenden Wörter verändern?
Beispieldatei ist im Anhang.
https://www.herber.de/bbs/user/58883.xls
DANKE im Vorraus für Holfe.
Gruß ANJA
29.01.2009 09:13:00
Thread-ID: 1044800
4 Beiträge
Unterschiedliche Schriftgrößen in einer Zelle
Gerd

Hallo zusammen,
gibt es die Möglichkeit in einer Zelle verschiedene Schriftgrößen darzustellen? Dies soll automatisch funktionieren, da es sich um ca. 3000 verschiedene Zellen handelt. Es soll die erste Zeile in der Zelle z.B. die Schriftgröße 40 sein, in den nächsten Schriftgröße 18.
04.02.2009 11:07:00
Thread-ID: 1046938
7 Beiträge
Letzten 3 geänderten Zeilen in einer Zelle anzeige
Tobias

Ich hab schon eine Funktion, die mir bei jeder änderunng in einer Zeile einen Datumsstempel in Spalte D schreibt.
Ich möchte nun in EINER Zelle die 3 Werte von Spalte A anzeigen, die bei Spalte D das neueste Datum anzeigen. (Es reichen die letzten 3 Werte, kommagetrennt...)
(Wie) kann...
20.02.2009 08:56:00
Thread-ID: 1052332
14 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
1
3
2
6
11
5
1
3
6
13
5
4
7
7
3
2
1
2
6
2
5
10
2
3
3