Я наложил прозрачную рамку с меткой active-x на форму листа, чтобы при наведении курсора мыши сделать видимым пояснительное, скрытое текстовое поле. Код следует.
Что я хочу знать, так это то, что при выходе из состояния наведения мыши есть возможность, что текстовое поле снова может быть автоматически скрыто.
Идеи? * * 1005
Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
ActiveSheet.Shapes.Range(Array("IndexTBSection1")).Visible = True
End Sub