Hyperlink mit Schleife
22.01.2004 10:59:09
holzkuchen
Ich möchte in mehrere Felder einer Spalte(4) einen Hyperlink ertsellen, der aus einem statischen Teil "http:///linkname" und einem dynamischen Teil einer Zahl aus einer anderen Spalte(5) ensteht.
Dim reihen as Integer
...inhalte in Worksheet einfügen
'Reihen zählen
reihen = ActiveSheet.UsedRange.Rows.Count
For a = 1 To (reihen - 1)
ActiveSheet.Cells(a + 1, 4).Hyperlinks.Add Anchor:=Selection, _
Address:="http://linkname" & ActiveSheet.Cells(a + 1, 5)
Next a
Problem ist: es wird nur die erste Zeile die ich anspreche verlinkt, aber mit dem Wert aus der letzten Zeile der Spalte 5.
Außerdem wird nicht das Feld in Spalte 4 verlinkt, sondern die ganze Zeile.
PS: -1 und +1 sind nur dazu da um Überschriften zu überspringen