Работа с большими числами

[tae1980]

Имеем в ячейке текст: "3010810500000000000"

Форма1.OptionButton2.Caption = Лист1.Cells(Строка, Колонка)

При выполнении кода получаем: "3,0108105E+18"
Как быть?

[аналитика]

...=format(Лист1.Cells(Строка, Колонка),"0")

[tae1980]

Сообщение от аналитика

...=format(Лист1.Cells(Строка, Колонка),"0")

Спасибо! Помогло.

[tae1980]

Сообщение от аналитика

...=format(Лист1.Cells(Строка, Колонка),"0")

Как всегда, косяк вылез в другом месте... Теперь даты выводятся не правильно, в виде "39974" вместо "10.06.2009"...
Обрабатываю более 120 строк одной строкой в цикле (при этом данный могут быть любого типа):

        ОбъектОбъединение.Controls("OptionButton" & n & "_" & 1).Caption = Format(Договор.Cells(СтрокаОбъект1, n), "0")

Ну уж-то придется вводить дополнительные проверки в такой простой задаче....
Пришлось заменить на строчку:

        If IsNumeric(Договор.Cells(СтрокаОбъект1, n)) Then
            ОбъектОбъединение.Controls("OptionButton" & n & "_" & 1).Caption = Format(Договор.Cells(СтрокаОбъект1, n), "0")
        Else
            ОбъектОбъединение.Controls("OptionButton" & n & "_" & 1).Caption = Договор.Cells(СтрокаОбъект1, n)
        End If