Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
|
|
|
DataGrid и VBA
|
|||
|---|---|---|---|
|
#18+
Вопрос в следующем как в VBA у DataGrid определить в какой стороке и столбце находиться курсор. В VB это можно определить через событие DataGrid1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) ci = DataGrid1.ColContaining(X) ri = DataGrid1.RowContaining(Y) а в VBA это событие передает другие координаты: DataGrid1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As stdole.OLE_XPOS_PIXELS, ByVal Y As stdole.OLE_YPOS_PIXELS) Заранее благодарна. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.06.2004, 07:51 |
|
||
|
DataGrid и VBA
|
|||
|---|---|---|---|
|
#18+
А преобразовать X As stdole.OLE_XPOS_PIXELS и Y As stdole.OLE_YPOS_PIXELS не пробовала? И работать, как обычно... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.06.2004, 10:20 |
|
||
|
DataGrid и VBA
|
|||
|---|---|---|---|
|
#18+
Может еще апишек набабахать? x=DatGrid1.Row y=DataGrid1.Col ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.06.2004, 11:46 |
|
||
|
DataGrid и VBA
|
|||
|---|---|---|---|
|
#18+
Может еще подскажите как преобразовать X As stdole.OLE_XPOS_PIXELS и Y As stdole.OLE_YPOS_PIXELS Заранее благодарна ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.06.2004, 14:07 |
|
||
|
DataGrid и VBA
|
|||
|---|---|---|---|
|
#18+
Зачем? И во что? Если в твипы, то скорее всего так: tx = Screen.TwipsPerPixelX * X ty = Screen.TwipsPerPixelY * Y ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 02.06.2004, 10:30 |
|
||
|
DataGrid и VBA
|
|||
|---|---|---|---|
|
#18+
Пардон, это ж VBA, Screen'а нету. Значит и городить нечего, используй Row и Col. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 02.06.2004, 10:38 |
|
||
|
DataGrid и VBA
|
|||
|---|---|---|---|
|
#18+
поставила на событие sub DataGrid1_MouseUp() x = DataGrid1.row y = DataGrid1.col end sub Только вот результат вы дает совсем не соответсвующий действительности ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 02.06.2004, 13:40 |
|
||
|
DataGrid и VBA
|
|||
|---|---|---|---|
|
#18+
Это потому, что событие MouseUp завершается до перехода выделения на кликнутую ячейку. Используй событие RowColChange ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 02.06.2004, 15:41 |
|
||
|
|
start [/forum/topic.php?fid=60&msg=32542405&tid=2169441]: |
0ms |
get settings: |
10ms |
get forum list: |
20ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
54ms |
get topic data: |
14ms |
get forum data: |
4ms |
get page messages: |
63ms |
get tp. blocked users: |
1ms |
| others: | 252ms |
| total: | 426ms |
| 0 / 0 |
