0

Добрый день. Подскажите пожалуйста, как в VBA считывать данные из ячеек одного листа, а вставлять их в ячейки другого листа? Варианты с формулами не предлагать, поскольку требуется именно через VBA

0

2 ответа 2

1
Sub switch()
    Dim wb As Workbook
    Dim ws1, ws2 As Worksheet

    Set wb = Application.ActiveWorkbook
    Set ws1 = wb.Worksheets("Лист1")
    Set ws2 = wb.Worksheets("Лист2")

    ' индексация ячеек начинается с 1 в формате (номер строки, номер столбца)
    ' скопирует данные с первого листа ячейки A1 на второй лист в ячейку A1
    ws2.Cells(1, 1) = ws1.Cells(1, 1)
End Sub
0
Sheets("Sheet2").Range("A1").Value = Sheets("Sheet1").Range("A1").Value
2
  • Постарайтесь писать более развернутые ответы. Поясните, на чем основано ваше утверждение? 9 авг 2016 в 4:33
  • Уточните, пожалуйста: по какому событию считывать? Достаточно кнопки для запуска макроса? Копировать диапазон или ячейку? Если большими диапазонами, с перестановкой или выборкой, лучше использовать массивы: считать исходные данные в память, обработать, выгрузить на лист. 28 авг 2016 в 23:06

Ваш ответ

Нажимая на кнопку «Отправить ответ», вы соглашаетесь с нашими пользовательским соглашением, политикой конфиденциальности и политикой о куки

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.