View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Sam K Sam K is offline
external usenet poster
 
Posts: 5
Default Run Time Error '1004'

Greetings All,

I am getting a run time error '1004' (select method of range class failed)
only when I click on
a hyperlink in the sheet. Thanks in advance. --Sam K.


Public Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
With Application
.ScreenUpdating = False
.EnableEvents = False
ActiveSheet.unprotect
Windows(1).VisibleRange.WrapText = True ' wrapping text only in the
visible range window
Target.Select
.EnableEvents = True
.ScreenUpdating = True
ActiveSheet.protect
End With
End Sub