Dim m_aLeftHalf( 9 , 4 ) As Double ‘ двумерный массив
Dim i As Integer
Dim j As Integer
I = 1
j = 1
В ячейке находится 116 , 13
Помещаю из этой ячейки в двумерный массив
m_aLeftHalf(i, j) = Val(Cells(row, col).Value)
Почему
MsgBox Str(m_aLeftHalf(i, j)) & _
vbNewLine & Cells(row, col).Value
выводит 116
и 116 , 13
, т.е. дробную часть не выводит выражение
Str(m_aLeftHalf(i, j)) из массива , а
из ячейки показывает дробную часть ?
А собственно почему должно быть по другому.
Для Екселя разделитель дробной части запятая, а для VAL - точка.
Поэтому Val преобразовывает из строки "116,13" в число 116.
Все как надо!
Без проблем :D
Удачи
