I would like to know how to trigger formatting (text
wrapping)of the visible screen on a worksheet from a mouse
click on the scroll bar or slider in Excel. I did that
using the selectionchange worksheet event in the code that
follows, however it only applies to cell changes and user
sees text unwrapped. I would like the user to avoid seeing
the text in the process of being wrapped. Thanks in
advance, Sam

Public Sub worksheet_selectionchange(ByVal Target As
Excel.Range)
With Application
.ScreenUpdating = False
.EnableEvents = False
Windows(1).VisibleRange.Select
With Selection
.WrapText = True
End With
Target.Select
.EnableEvents = True
.ScreenUpdating = True
End With
End Sub