Показать сообщение отдельно
Старый 23.01.2004, 23:13     # 1
PANIC
Guest
 
Сообщения: n/a

Не могу вывести переменную из цикла (vba)

Люди, помогите чайнику, плз!
Никак не могу вывести переменную из цикла для ее дальнейшего использования в другом цикле. Вроде объявил ее как глобальную, но когда ее вытаешься вывести после завершения цикла - ничего не получается.
Public knp As Integer
Public Sub CommandButton1_Click()
Dim i As Long
Dim n As Integer
n = 1
'Определяем количество непустых ячеек в листе
For i = 1 To 50000
If Sheets("Новый прайс").Cells(n, 7) = vbNullString Then
knp = n
Exit Sub
End If
n = n + 1
Next i
otvet2.Caption = knp