Hyperlink-Spalte nach dem Einfügen eines Makros mithilfe eines Arbeitsblattereignisses

392
iggypop

Sorry, Änderung der Frage, ich konnte den Makrofehler beheben, war ein dummer Anfängerfehler, das Arbeitsblatt war geschützt.

Aktualisieren Sie die Frage. Ich habe das Hyperlink-Makro verwendet, um das Ereignis unter dem Arbeitsblatt zu erstellen, das ausgelöst wird, nachdem eine Reihe von Zeilen (variiert) eingefügt wurden (Werte nur, weil ein anderes Arbeitsblatt Zellreferenzen verwendet) aus einem anderen Arbeitsblatt. Es hat 2 oder 3 mal funktioniert, dann einfach aufgehört, eine Idee warum?

Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim lRow As Long Worksheets("HW Orders").Unprotect If Intersect(Target, Range("S:S")) Is Nothing Then Exit Sub Select Case Target.Address Case "S:S" With ActiveSheet lRow = .Range("s" & .Rows.Count).End(xlUp).Row For Each c In .Range("s2:s" & lRow) ActiveSheet.Hyperlinks.Add anchor:=c, Address:=c.Value Next End With End Select Worksheets("HW Orders").Protect End Sub
0

0 Antworten auf die Frage

Verwandte Probleme