чё-то я не понял с форматами...

[coshi]

Есть такой кусочек кода:

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

 
            ActiveSheet.Cells(i, j + 2).NumberFormat = "0"
            acc(k) = CStr(ActiveSheet.Cells(i, j + 2).Value)
            k = k + 1

Но почему-то при точке останова на средней строке видно, что
ActiveSheet.Cells(i, j + 2).Value равен такой вот штуке - "4,09118100000005E+19" а не 20 значное число, как должно быть.

p.s.: если в этот момент посмотреть на таблицу, видно, что на этом месте (i, j+2) стоит правильное 20-значное число.

Как быть?Я идиот! Убейте меня, кто-нибудь!???

[vrodo]

Все верно

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

ActiveSheet.Cells(i, j + 2).NumberFormat = "0"
acc(k) = ActiveSheet.Cells(i, j + 2).Text
k = k + 1

Попробуй вот так

[coshi]

ага, сгодилось

[Deja-vu]

А что у тебя за вычисления ведутся, если не секрет? Просто столько цифр после запятой не всегда встретишь.
ПС: насколько я понял, value возвращает данные, учитывая формат ячейки в Excel, а теxт возвращает именно текст, то есть не как число... хотя для Excel это почти не имеет значения, если не использовать особые вычисления... видимо, у тебя неправильно формат задан, либо нет дополнительной опции, какой-то...

Вот кстати, попробуй вот это...

ActiveSheet.Cells(i, j + 2).NumberFormat = "0.0000000000000000000000000000"
acc(k) = CStr(ActiveSheet.Cells(i, j + 2).Value)
k = k + 1

[vrodo]

Формат ячейки влияет ТОЛЬКО на отображение данных
а не на само значение

[Deja-vu]

vrodo Спасибо за поправку.