Как заст. кнопку на листе EXCEL не перемещ. при прокр. листа

[lamden]

Извините, еще один ламерский вопрос - можно ли сделать так, чтобы кнопочка, находящаяся на EXCEL'овском листе, оставалась на месте при прокрутке листа (т.е. - как бы "плавала" над ним, оставаясь в одном и том же месте экрана, независимо от перемещений листа прокруткой (особенно - вертикальной).
Будучи совершенным чайником в VBA, приношу заранее извинения, если сочтете вопрос дурацким...

[alibek]

Сделай область, на которой размещена кнопка, закрепленной.

[lamden]

К сожалению - это не совсем то - в этом случае верхушка (или, наоборот, низ или левая или правая сторона становятся неподвижной. а остальная часть движется, причем- без закрепленной... Вроде, как ухудшенный вариант фреймов. А хотелось бы, чтобы кнопка оставалась на месте, а лист прокручивался под ней... Ну и что, помечтать нельзя бедному ламеру?!.

[alibek]

Тогда сделай не кнопку на листе (Control), а панель инструментов и выведи на нее кнопку, это будет то, что тебе надо.

[Calvin]

Интересный вопрос, хотя полноценного ответа на него я тоже не нашел. Хотя если бы у объекта Worksheet было бы событие Scroll (или MouseMove), то все бы разрешилось. Мне все-таки удалось привязать координаты кнопки к экселевскому листу (может я кого-то и не удивлю), но перемещаю эту кнопку только при помощи события Worksheet_SelectionChange (допустим, ну или можно Workbook_SheetSelectionChange)

Код: Выделить всё

If ActiveWindow.VisibleRange.Row = 1 Then 'если видна на экране первая строка
Sheets(2).CommandButton1.Top = 50   
End
end if
rrr=Rows(1 & ":" & ActiveWindow.VisibleRange.Row - 1).Height
Sheets(2).CommandButton1.Top = rrrr + 50   ' опускаем на 50 единиц вниз


Правда кнопка дрожит, как-будто ее раздели на северном полюсе
А как горизонтально перемещать - сами догадаетесь
ЗЫ У меня на последок вопрос, а нельзя ли для листов экселевской книги создать события Scroll и MouseMove
ЗЫ2 Да, забыл пояснить - кнопка то из элементов управления.......