Неправильно копируются данные из одномерного массива в столбец Excel

@Ольга Ветрова · Регистрация: 11.02.2018

Студворк — интернет-сервис помощи студентам

Добрый вечер! Помогите разобраться, пожалуйста!

Пытаюсь скопировать одномерный массив сразу в столбец Excel, но во всем столбце размножается верхняя строка.

Отладкой проверила - сам массив заполнен правильно. Строк у меня больше 65000, пробовала ограничиться тысячей, то же самое.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Type Рабочая_запись_1
 строка As Long
 исх_текст As String
 итог1 As String
End Type
 
Sub Выделяем_область()
'
 
Dim Рабочий_массив() As Рабочая_запись_1
Dim Столбец() As Variant
Dim lLastRow As Long
Dim last As String
Dim i, j, m As Long
 
' здесь формирование рабочего массива
 
      ReDim Столбец(2 To m + 1) As Variant
    For i = 1 To m
        j = Рабочий_массив(i).строка
        If j > 0 Then
            Столбец(j) = Рабочий_массив(i).исх_текст
        End If
    Next i
        Range("W2:W" & m).Value = Столбец

@Hugo121 · 01.02.2019, 23:58

Столбец Экселя - это двумерный вертикальный массив. И это желательно учитывать, чтоб не тратить позже время на преобразование одномерного горизонтального.

@Казанский · 02.02.2019, 00:00

Ольга Ветрова, массив-"столбец" должен быть двумерным

Visual Basic
1
2
3
      ReDim Столбец(2 To m + 1,1 to 1) As Variant
'...
            Столбец(j,1) = Рабочий_массив(i).исх_текст

@Ольга Ветрова · 02.02.2019, 00:17 **[ТС]**

Hugo121, Казанский, Спасибо большое!Всё отработало мгновенно! Для меня это очень важно - ворочаю с боку на бок базу пациентов, я больничный программист. Пока не умела такого, запускала заполнение ячеек в цикле на ночь, и подумывала об апгрейде ((( Бегу учить матчасть - надо же, не знала совсем.

@Hugo121 · 02.02.2019, 00:26

Там наверняка ещё можно ускорить ' здесь формирование рабочего массива
А эти пользовательские типы например у меня на практике не прижились вот совсем. Как-то не видел задач где они приносили бы явную пользу...

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .

@Hugo121 6998 / 2896 / 555 Регистрация: 19.10.2012 Сообщений: 8,804
	01.02.2019, 23:58
	Столбец Экселя - это двумерный вертикальный массив. И это желательно учитывать, чтоб не тратить позже время на преобразование одномерного горизонтального. 1

@Ольга Ветрова 1 / 1 / 0 Регистрация: 11.02.2018 Сообщений: 19
	02.02.2019, 00:17 [ТС]
	Hugo121, Казанский, Спасибо большое!Всё отработало мгновенно! Для меня это очень важно - ворочаю с боку на бок базу пациентов, я больничный программист. Пока не умела такого, запускала заполнение ячеек в цикле на ночь, и подумывала об апгрейде ((( Бегу учить матчасть - надо же, не знала совсем. 0

@Hugo121 6998 / 2896 / 555 Регистрация: 19.10.2012 Сообщений: 8,804
	02.02.2019, 00:26
	Там наверняка ещё можно ускорить ' здесь формирование рабочего массива А эти пользовательские типы например у меня на практике не прижились вот совсем. Как-то не видел задач где они приносили бы явную пользу... 1