Вывод данных через одну строку

@empty28 · Регистрация: 14.03.2016

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

Здравствуйте!

В программировании не селен, в vba недавно начал разбираться. Никак не сооброжу как вывести данные их массива через одну строку, например по четным строкам начиная с 2ой.

В данном коде у меня выводится массив с шагом два.

Visual Basic

ReDim Arr(2 To Sheets.Count - 3)
        For i = 2 To Sheets.Count - 3
            Arr(i) = Sheets(i).Name
        Next i
        
        
        For i = 2 To Sheets.Count - 3 Step 2
            Sheets("Лист1").Cells(i, 1).Value = Arr(i)
        Next i

Буду признателен за совет по решению вопроса или наводку на тему с подобным вопросом.

@KoGG · 31.03.2016, 11:09

Visual Basic

1
2
3

        For i = 2 To Sheets.Count - 3
            Sheets("Лист1").Cells(-2 + i * 2, 1).Value = Arr(i)
        Next i

Не по теме:

селен - это круто, а лучше ванадий

@Alex77755 · 31.03.2016, 13:00

Visual Basic

1	Cells(2*i, 1)

	31.03.2016, 13:00