Hyperlink
12.11.2017 14:35:28
Helmut
Wer hilft mir? ich habe ein Programm, das mir ArbeitsBlätter auflistet, z.B.
B C D E
3 I_Verz1a 1852 7
4 I_Data1a 63685 7
.......
LinkIntern "_info", offset + 1 (Sprung zum Makro)
Über einen Link möchte ich zu dem Blatt springen z.B. "I_Data1a", wie im Programm:
Sub LinkIntern(vb As String, i As Integer) '12.11.2017
' Fügt einen Hyperlink auf ein anderes Blatt ein
Sheets(vb).Select
Do While Cells(i, 3) ""
Cells(i, 3).Select 'Zelle, die den Link enthält
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
"Cells(i, 3)" & "!A" & Cells(i, 3).Value 'Sprungadresse (Zelle)
i = i + 1
Loop
End Sub
Der Link wird angelegt, liefert beim Anklicken jedoch die Fehlermeldung:
"Bezug ist ungültig". Was mache ich falsch ? Wenn ich mir den Link anschaue, ist das Fenster "_info" (Blattname des Makros) aktiviert. Ändere ich im Fenster (manuell) den Namen in den meines Zielblattes, geht das Makro; OHNE SICHTBARE ÄNDERUNG.
Nebenbei würde ich gern wissen,was mit 'Bezug' gemeint ist.
Wer hat eine Idee?
Gruß Helmut