Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
520to524
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
520to524
520to524
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Hyperlink formatieren

Hyperlink formatieren
21.11.2004 15:38:21
ticon
Hallo,
habe ein Code, womit ich die Hyperlinkadresse auslesen kann. Leider nur für jeweils ein Datensatz. Code lautet, wie folgt:

Sub LinkAufteilen()
With ActiveCell
.Offset(0, 1) = .Value
.Offset(0, 2) = .Hyperlinks(1).Address
End With
End Sub

Wie muss der Code sein, damit ich alle Datensätze auslesen kann? Gibt es eine Beschränkung, habe nämlich ca 3000 Datensätze.
Vielen Dank.
Gruss
TICON

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Hyperlink formatieren
andreas
Hallo,
lass doch eine for durchlaufen
for i = 1 to 3000
....
gruß
andreas e
AW: Hyperlink formatieren
21.11.2004 15:46:49
123-Dex
Hallo
So vielleicht
Ganz einfach:
' /Überprüfung der Zelleingaben
startspalte = 6
startzeile = 8
anz_spalten = b3
anz_zeilen = a3

For j = startspalte To startspalte + anz_spalten - 1



For i = startzeile To startzeile + anz_zeilen

x = x + 1
Cells(i, j).Activate

Activecell = Hyperlinks(1).Address

Next i

Next j
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige