ага...  
вот это правильно я написать не мог  
If IsEmpty(iCell) Then iCell = 1  
поэтому и придумывал уже как мог по-другому  
 
Спасибо, очень помогли :)

:)  
Ладно, попробую по-другому объяснить.  
Sub ddd()  
Dim cell As Range  
[R20C5].Select
For Each cell In [R2C:R16C].Cells
cell = 1  
Next cell  
End Sub  
 
Указывая диапазон я не говорю номер столбца - он по умолчанию тот же, где была выбрана ячейка.  
Далее идет заполнение данных значениями (1 - для упрощения).  
Проблема - если ячейка уже заполнена, я хочу заполнить следующую пустую.  
Для этого думал использовать проверку на наличие значения в следующей ячейке (через Если со счетчиком) и корректировать диапазон, если ячейка не пуста.

угу...  
пасиба...  
чета я не полностью суть изложил, думал как проще объяснить  
Вопрос такой т. к. я не знаю номера столбца, только строки. У меня есть диапазон. Я делаю ссылку на первую ячейку R2C (или R5C например)  
Так вот двигать R2 (или R5) как-то можно с помощью переменной?

Добрый вечер.  
 
Есть ячейка [R2C2], например.
Как можно менять ее номер: например, у меня есть переменная i = 2 (с ней потом будут арифметические действия происходить)  
Как правильно написать, чтобы номер строки был равен номеру переменной?  
(ну, типа [RiC2])

пасиба за толковые ссылки, буду пользоваться :)

{quote}{login=Юрий М}{date=09.11.2012 01:14}{thema=}{post}Обрабатывайте пустую строку, как ошибку - можно вывести сообщение, можно принудительный выход из процедуры...{/post}{/quote}  
 
ага...  
ну да, так получилось  
я что-то в значения этих кнопок Ок и Cancel уперся  
все оказалось проще  
 
Спасибо за помощь! Сэкономили мне неделю размышлений :)

{quote}{login=ikki}{date=09.11.2012 01:05}{thema=Re: Форма Inputbox - как определить какую кнопку нажал пользователь}{post}{quote}{login=Desert-Eagle55}{date=09.11.2012 01:00}{thema=Форма Inputbox - как определить какую кнопку нажал пользователь}{post}з.ы. форум читал, неделю искал и пытался - не получается{/post}{/quote}  
в справку по inputbox по пути не заглядывали?  
 
If the user clicks OK or presses ENTER , the InputBox function returns whatever is in the text box. If the user clicks Cancel, the function returns a zero-length string ("").{/post}{/quote}  
 
В справку смотрел. Тут уперся в то, что если пользователь не введет значение и нажмет Ок, то будет найдена первая пустая ячейка и от нее заполнены другие данные. А мне надо заполнить только по тем, где непустые ячейки.

{quote}{login=Desert-Eagle55}{date=09.11.2012 01:00}{thema=Форма Inputbox - как определить какую кнопку нажал пользователь}{post}  
 
Private Sub ОК_Click()  
i = TextBox1.Value  
TextBox1.Value = Empty  
ChoiseResult2 = 0  
ChoiseNum.Hide  
End Sub  
{/post}{/quote}  
 
А, поясню же :)  
Сначала получаю значение в переменную, потом чищу текстовое поле, чтобы следующее значение можно было вводить.  
Дальше ChoiseResult2 получает 0 - по этому значению узнаю, что нажата кнопка ОК (для Cancel = 1), прячу форму. Далее идет повторный запуск для поиска следуюшего значения.

Всем привет.  
Такая проблема - есть форма Inputbox с кнопками Оk и Cancel.  
Пользователь вводит значение в текстовое поле.  
Далее мне надо знать какую кнопку он нажимает - если Ок, то пойдет поиск значения и заполнение ФИО пользователя и даты ввода. Если Cancel - не пойдет соответственно.  
Пробовал через VbOK и VbCancel - не работает.  
Сделал свой UserForm, попробовал - там работает через событие нажатия кнопки Ok или Cancel, но тогда не получается сразу поставить курсор на текстовое поле. Пользователь будет искать подряд много значений, а каждый раз тыкать мышкой в текстовое поле (или табом двигать) - не совсем удобно.  
Вот пример через UserForm  
 
Private Sub ОК_Click()  
i = TextBox1.Value  
TextBox1.Value = Empty  
ChoiseResult2 = 0  
ChoiseNum.Hide  
End Sub  
 
Если добавить фокус на текстовое поле - все равно ничего не получается (скорее всего из-за запуска формы событием Ок_клик)  
Как сделать - не принципиально: или через userform, или inputbox.  
Хелп, плиз...  
 
з.ы. форум читал, неделю искал и пытался - не получается. Первый раз что-то сел писать на VBA, сам разбирался, честно :)