Вывод из массива в ячейку

@PuLbKa · Регистрация: 11.01.2013

Как вывести из масива праильно делаю так, не получается

Visual Basic

1	ActiveSheet.Cells(i,j) = MyArray(i).Time1

@~~Апострофф~~ · 25.03.2013, 15:18

PuLbKa, на основании чего можно догадаться, чему равны I и J и что такое MyArray(i).Time1?

@PuLbKa · 25.03.2013, 15:31 **[ТС]**

Visual Basic

ReDim MyArray(1) As String
 
MyArray(1).Time1 = ActiveSheet.Cells(1, 1)
 
ActiveSheet.Cells(1, 2) = MyArray(1).Time1

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

@~~Апострофф~~ · 25.03.2013, 15:36

У переменной типа String нет свойства .Time1
Попробуйте так -

Visual Basic

ReDim MyArray(1) As String
 
MyArray(1) = ActiveSheet.Cells(1, 1)
 
ActiveSheet.Cells(1, 2) = MyArray(1)

@IvanOK · 25.03.2013, 15:39

Visual Basic

Option Base 1
Sub assf()
Dim MyArray()
MyArray = Array(1, 2, 3)
ActiveSheet.[a1].Resize(1, UBound(MyArray)) = MyArray
End Sub

где то так

@~~Апострофф~~ Заблокирован
	25.03.2013, 15:18	2
	PuLbKa, на основании чего можно догадаться, чему равны I и J и что такое MyArray(i).Time1? 0

	25.03.2013, 15:39