Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.91/193: Рейтинг темы: голосов - 193, средняя оценка - 4.91
 Аватар для Sdnss
0 / 0 / 0
Регистрация: 12.04.2016
Сообщений: 15

Вывод массива на лист excel

18.10.2016, 21:06. Показов 35799. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Всем добрый вечер.
Собственно, проблема вот в чем, пользователь вводит количество столбцов и строк массива, после чего сам же вводит значения
Как сделать так, чтобы это выводилось на лист excela?
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub massiv()
Dim A() As Integer
Dim i, j As Integer
Dim n, m As Single
n = InputBox("Введите кол-во столбцов массива")
m = InputBox("Введите кол-во строк массива")
ReDim Preserve A(n, m)
For i = 1 To n
  For j = 1 To m
  A(i, j) = InputBox("Введите значения массива  А ")
Next j
Next i
 
End Sub
Заранее благодарю за помощь

Добавлено через 15 минут
Visual Basic
1
Worksheets("Лист1").Cells(1, 1).Resize(n, m).Value = A
Вроде бы добавил это после next i, выводит на лист, но проблема теперь в другом, почему при вводе первых трех значений - например ввожу подряд 1-2-3-4 с матрицей 2х2, он выдает на лист 0 0 0 и 4-ый элемент 1, не понимаю, к сожалению
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
18.10.2016, 21:06
Ответы с готовыми решениями:

Вывод массива на лист Excel
Всем добрый день, Помогите пожалуйста разобраться: Вывожу одномерный массив на лист Excel (1 строка и 374 колонки) Часть колонок...

Вывод результатов программы на лист Excel
Программа ставит диагноз пациенту.. нужно чтобы результаты выводились на 2 лист в столбик "Диагноз" по нажатию кнопки...

Ввод данных в VBA и их вывод на рабочий лист Excel
Создать программу, которая по введённым данным в соответствующие поля формы автоматизирует ввод данных сотрудников фирмы. После вывода всех...

3
6997 / 2895 / 555
Регистрация: 19.10.2012
Сообщений: 8,803
18.10.2016, 21:13
Лучший ответ Сообщение было отмечено Sdnss как решение

Решение

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Option Base 1
 
Sub massiv()
    Dim A() As Integer
    Dim i As Integer, j As Integer
    Dim n As Single, m As Single
    n = InputBox("Введите кол-во строк массива")
    m = InputBox("Введите кол-во столбцов массива")
    ReDim Preserve A(n, m)
    For i = 1 To n
        For j = 1 To m
            A(i, j) = InputBox("Введите значения массива  А ")
        Next j
    Next i
 
    Cells(1, 1).Resize(n, m).Value = A
 
End Sub
2
 Аватар для Sdnss
0 / 0 / 0
Регистрация: 12.04.2016
Сообщений: 15
18.10.2016, 21:15  [ТС]
Тогда вопрос следующий, если не сложно конечно, что тогда дает Worksheets?
0
6997 / 2895 / 555
Регистрация: 19.10.2012
Сообщений: 8,803
18.10.2016, 21:20
Если хотите выгрузить данные не в активный лист - тогда указываете в какой.
Ну или если код в модуле листа, а выгрузить нужно в другой лист.
А Ваша беда была в размерности массива, и в том, что спутали строки и столбцы.
И Preserve там лишнее в данном случае.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
18.10.2016, 21:20
Помогаю со студенческими работами здесь

Поиск по значению и вывод строк из таблицы на другой лист Excel
Люди, хелп!!! Срочно! Нужно в Excel или дописать модуль или что-то с формулами нахимичить. Есть столбец со значениями (в файле...

Вывод результатов запроса SQL в excel: На лист выводится каждая 256 запись
Есть файл excel, в макросе вызывается запрос SQL. Строки сами по себе большие, количество почти 20к. На лист выводится каждая 256 запись,...

Экспорт массива текстовых файлов в лист excel
Доброго времени суток, подскажите как выполнить следующую задачу. Есть определенное количество текстовых файлов с одинаковой структурой, но...

Вставка элементов строки массива на лист Excel
Добрый день! К примеру, есть массив data(1 To 3, 1 To n). Необходимо вставить на некоторое место листа все элементы от data(2,1) по...

Не хочет записать данные из массива в лист Excel
Тут код програмки . Function Multi(x As Range, y As Range) Debug.Print x.Address Debug.Print...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Генерация OpenQASM из кода Q#
EggHead 10.07.2025
Летом 2024-го я начал эксперименты с библиотекой Q# Bridge, и знаете что? Она оказалась просто находкой для тех, кто работает на стыке разных квантовых экосистем. Основная фишка этой библиотеки -. . .
Изучаем новый шаблон ИИ-чата .NET AI Chat Web App
stackOverflow 10.07.2025
В . NET появилось интересное обновление - новый шаблон ИИ-чата под названием . NET AI Chat Web App. Когда я впервые наткнулся на анонс этого шаблона, то сразу понял, что Microsoft наконец-то. . .
Результаты исследования от команды ARP (июль 2025 г.)
Programma_Boinc 10.07.2025
Результаты исследования от команды ARP (июль 2025 г. ) Африканский проект по дождям (ARP) World Community Grid снова запущен! Мы рады поделиться обновленной информацией о нашем прогрессе с осени. . .
Angular vs Svelte - что лучше?
Reangularity 09.07.2025
Сегодня рынок разделился на несколько четких категорий: тяжеловесы корпоративного уровня (Angular), гибкие универсалы (React), прогрессивные решения (Vue) и новая волна компилируемых фреймворков. . .
Code First и Database First в Entity Framework
UnmanagedCoder 09.07.2025
Entity Framework дает нам свободу выбора, предлагая как Code First, так и Database First подходы. Но эта свобода порождает вечный вопрос — какой подход выбрать? Entity Framework — это. . .
Как использовать Bluetooth-модуль HC-05 с Arduino
Wired 08.07.2025
Bluetooth - это технология, созданная чтобы заменить кабельные соединения. Обычно ее используют для связи небольших устройств: мобильных телефонов, ноутбуков, наушников и т. д. Работает она на частоте. . .
Руководство по структурам данных Python
AI_Generated 08.07.2025
Я отчетливо помню свои первые серьезные проекты на Python - я писал код, он работал, заказчики были относительно довольны. Но однажды мой наставник, взглянув на мою реализацию поиска по огромному. . .
Тестирование энергоэффективности и скорости вычислений видеокарт в BOINC проектах
Programma_Boinc 08.07.2025
Тестирование энергоэффективности и скорости вычислений видеокарт в BOINC проектах Опубликовано: 07. 07. 2025 Рубрика: Uncategorized Автор: AlexA Статья размещается на сайте с разрешения. . .
Раскрываем внутренние механики Android с помощью контекста и манифеста
mobDevWorks 07.07.2025
Каждый Android-разработчик сталкивается с Context и манифестом буквально в первый день работы. Но много ли мы задумываемся о том, что скрывается за этими обыденными элементами? Я, честно говоря,. . .
API на базе FastAPI с Python за пару минут
AI_Generated 07.07.2025
FastAPI - это относительно молодой фреймворк для создания веб-API, который за короткое время заработал бешеную популярность в Python-сообществе. И не зря. Я помню, как впервые запустил приложение на. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru