VBNet - Форум - VBA&Excel: быстрый перенос массива в диапазон

Вопрос: VBA&Excel: быстрый перенос массива в диапазон Добавлено: 19.12.06 17:41

Автор вопроса: crash

Привет!

Не получается решить свою задачу по subj'у.

Есть тип:

Private Type DATA_type
    var1 As String
    var2 As Integer
    var3 As Integer
    var4 As Boolean

End Type

Dim data() As DATA_type

Private Sub CommandButton1_Click()
DIM TheRange as Range

[I]<заполняю масиив>[/I]

[I]хочу быстро перенести данные на рабочий лист[/I]
Set TheRange = ActiveCell.Range (Cells(1,1), Cells (10,10))

TheRange.Value = data()

При отработке сваливается с такой ошибкой:
Compile error

Only user-defined types defined in public object can be coerced to or from a variant or passed to late-bound functions

Как победить ситуацию - не знаю :(.
Ковырял разные способы - рабочего не нашел.
Заполнять каждую ячейку данными - в моем случае - очень долго.

Помогите, pls, в какую сторону копать.

Был бы признателен примерам.
Ответить

Ответы Всего ответов: 3

Номер ответа: 1 Автор ответа: -АлександР- Вопросов: 55 Ответов: 1008	Web-сайт: sham.clan.su Профиль \| \| #1	Добавлено: 19.12.06 19:20
	TheRange.Value = data() а так вы что хотите сделать? Ответить

Номер ответа: 2 Автор ответа: crash Вопросов: 2 Ответов: 1	Профиль \| \| #2	Добавлено: 19.12.06 21:05
	Хотел заполнить область данными data(). Область равна области data. Ответить

Номер ответа: 3 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #3	Добавлено: 19.12.06 21:13
	Быстро только коты по тревоге подрываются... здесь всё нужно, медленно, ручками, циклом, по очереди... Ответить

Страница: 1 |