Типы данных переменной

[Гена]

Вроде бы все правильно, но...
Дело в том что бы сделать ряд операций нужно проверить значение переменной N пустое оно или нет.
Как я уже эту переменную не определял: Long, Single, Double - выдает ошибку на строке N = Cells(k, 31). Если задать тип Variant, то при пустом значении почему-то выполняется [statements].
Буду очень признателен за помощь.


dim N as double
N = Cells(k, 31)
If N <> Empty Then
....
End if

[corgi]

ну так и проверяй тип самой ячейки

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

If VarType(Sheets(1).Cells(2, 2).Value) = vbEmpty Then
   
End If

[GSerg]

Мысль первая. Специальные флаговые значения могут содержать, действительно, только Variant.
Мысль вторая. Если ты присваиваешь что-то в variant, то там со всей определённостью не будет empty. Там может быть nothing, null, vbnullstring, просто ноль в конце концов.
Мысль третья. А почему бы просто не N as string; N=cstr(cell); if len(n) then...

[Vitaly1]

Да вот так проверяй пустую ячейку, Value это позволяет

if Sheets(1).Cells(2, 2).Value = "" then
..
end if

[Гена]

Ничего не получается. Мне нужно переменная N типа Double. Но при пустых значениях выдается ошибка на строке когда я ее определяю
N=cells(k,31). Далее идет большой блок if.
If N <> Empty Then
....
End if

[Vitaly1]

Я не понимаю, зачем вносить значение в переменную, что бы проверить пустая ли ячейка, вот это программа вывела мне все не пустые ячейки с 1-3 строку:

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

Sub nnn()
For i = 1 To 3
If Cells(i, 1).Value <> "" Then
  MsgBox Cells(i, 1).Value
End If
Next i
End Sub

[alibek]

Сравнивать с Empty неправильно.
Должно быть типа этого:

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

If Not (IsEmpty(V) Or IsNull(V)) Then
  ...
End If