Столбец гиперссылки после вставки макроса с использованием события листа

264
iggypop

Извините, смена вопроса, мне удалось исправить ошибку макроса, была глупая ошибка новичка, рабочий лист был защищен.

Обновление в вопросе, я использовал макрос гиперссылки для создания нижеприведенного события рабочего листа, которое запускается после вставки ряда строк (значений) (значения только потому, что другой лист использует ссылки на ячейки) из другого листа. Это работало 2 или 3 раза, а затем просто прекратилось, есть идеи, почему?

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 ответов на вопрос

Похожие вопросы