VBA, Excel

[baranich]

Добрый день.
Помогите, такой вопросик.
Мне надо сделать так что б при нажатие например на любую ячейку из диапозона B2:V2, появлялось диалоговое окно, которое я создам на VBA.
Т.е окно появляется только при нажатие на определенные ячейки а не на любую ячейку листа...Как это сделать? Заранее спасибо.

[$€rg]

для левой кнопки

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

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Range("B2:V2"), Target) Is Nothing Then UserForm1.Show
End Sub

для правой в BeforeDoubleClick cancel поставь, чтоб popup не вылетало

[sergeyvg]

например по двойному клику, правда вход в редактирование для "B2:V2" будет только по <F2>

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

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
  If Not Intersect(Target, Range("B2:V2")) Is Nothing Then
    Call UserForm1.Show
    Cancel = True
  End If
End Sub

[baranich]

спасибо, за помощь.

[baranich]

Помогите...такя проблемка...
у меня есть на форме textbox, value-значение которого например равно 100, как сохранить измененное значение textboxа, например я ввела 150 и надо чтоб при следующем запуске программы в textboxе было уже 150?
Заранее спасибо

[$€rg]

есть несколько способов
один из них реестр сохраняешь SaveSetting, GetSetting получаешь

[baranich]

а как это выгледит программно, мне же надо чтоб это сохранялось в программе?

[GSerg]

Ну лист скрытый заведи, и пиши в него...

[baranich]

спасибо, сделала.

[baranich]

Вопросик такой.
Можно ли в экселе с помощью vba заблокировать кнопки, чтоб пользователей не мог менять значения, но при выполнения кода программы, ячейки бы заполнялись и изменяли бы свое первоначальное значение?

[GSerg]

Чё б не поискать, а? По форуму.
Ну .Protect UserInterfaceOnly:=true.

[baranich]

спасибочки большое

[Слобожанин]

Может кто подскажет как сделать так, чтобы при изменении какой либо ячейки диапазона, автоматически в указанной ячейке появлялось некая запись.

Например:
При изменении ячейки входящей в диапазон А1:А100, в ячейке В2 отображалась...
...например, дата изменения.

С уважением,
Слобожанин.

[GSerg]

Какие у листа есть события?..

[$€rg]

Range("B2") = Date

[Слобожанин]

Уважаемый GSerg, я так понимаю, это события Change и Calculate (при пересчёте результата, сформированного изменяемыми ячейками.
В дальнейшем, надо будет отслеживать и координаты ячеек, в которых были сделаны изменения.

Уважаемый $€rg,
Спасибо.
Я пользовался более универсальной функцией "Now".

С уважением,
Слобожанин.