Надеюсь меня поймут

Весь MS Office, программирование на Visual Basic for Applications и MS VB

Модератор: Naeel Maqsudov

Ответить
undead
Сообщения: 3
Зарегистрирован: 12 мар 2006, 20:42

Народ не знаю куда обратиться, поэтому я здесь. :?
Только начал знакомство с VBA Excel, возникли дурацкие вопросы, а спросить не у кого :( Кто подскажет или вышлет справочную информацию о процедурах работы с ячейками
в часности меня интересует такой ворос, для меня это важно:
Как оределить координаты активной ячейки? (Допустим у меня есть переменные как присвоить им координаты Строка\Столбец)

Заранее Спасибо!
Avsha
Сообщения: 665
Зарегистрирован: 08 сен 2005, 13:47
Откуда: KZ

Private Sub CommandButton1_Click()
d = ActiveCell.Address
d1 = ActiveCell.Column
d2 = ActiveCell.Row
Stop

End Sub
Аватара пользователя
Игорь Акопян
Сообщения: 1440
Зарегистрирован: 13 окт 2004, 17:11
Откуда: СПБ
Контактная информация:

Если с английским языком не сильно плохо - курить справку по объекту Range - коий есть любая ячейка или их набор :)
Изображение
undead
Сообщения: 3
Зарегистрирован: 12 мар 2006, 20:42

Спасибо, всё работает.
Еще такой вопрос. Создаю USERFORM, вешаю всякие элементы, задаю им функции. Эта форма необходима для работы с данными на Листе1, вызываю её из модуля Лист1 методом "USERFORM.Show", запускаю программу и вот проблема: полностью блокируется Лист1, да и вообще само приложение, я не могу параллельно работать с формой и ячейками. Обыскал все свойства USERFORM, не нашел, как это можно исправить?
Avsha
Сообщения: 665
Зарегистрирован: 08 сен 2005, 13:47
Откуда: KZ

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

Private Sub CommandButton1_Click()

UserForm1.Show vbModeless

End Sub
Тоже никогда не любил читать книги и пользоваться справкой... :P
undead
Сообщения: 3
Зарегистрирован: 12 мар 2006, 20:42

Спасибо!
У меня есть еще пару вопросов такого же типа :D , но я повременю с ними, может сам до чего додумаюсь, а то я смотрю как бы мне не испортить имидж вашего форума...
Еще раз спасибо.
Avsha
Сообщения: 665
Зарегистрирован: 08 сен 2005, 13:47
Откуда: KZ

undead,
... так вы же спрашиваете "как сделать", а не "сделайте за меня" :wink:
поэтому - чтож не ответить...
Ответить