엑셀
엑셀 vba 링크만들기_없애기
아스C#
2018. 11. 27. 00:30
반응형
Sub 링크만들기_없애기()
olines = Last_Lines_입력자동화("A")
totalCols_입력자동화 = 8
Dim arrGrd()
arrGrd = Range("A6").Resize(olines, totalCols_입력자동화)
Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False
For i = 1 To olines
Range("A5").Offset(i, 0).Hyperlinks.Delete
Range("A5").Offset(i, 0).Font.Size = 9
Next
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
End Sub
.
반응형