Вопрос про VBA Excel Вывод значения переменной в ячейку

Без имени, 489 просмотров

Dim str as String
For i = 1 To 3
str = ActiveSheet.Cells(i, 1).Text
Next i
вот собственно переменная, в этих ячейках - некоторые цифры. Вопрос, как теперь вывести эти же цифры ( то бишь значения переменной) в соседний столбец?

Ответы:

Авдруг

Просто добавить внутри цикла всего 1 строчку:

Алексей Матевосов

Вы в цикле записываете в переменную str значения ячеек А1, А2 и А3. После завершения цикла переменная хранит лишь значение А3. Поэтому в ячейки В1 и В2 переносить нечего.
Данную задачу можно решить массивом, сохранив в нем все переменные
Для этого подойдет такой код
Sub Macros()
Dim Arr
Arr = Range("A1:A3")
Range("B1").Resize(UBound(Arr), 1) = Arr
End Sub

11 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.