Задать вопрос
@MinasM
visual-basic

Как вывести данные в excel?

Дана таблица в excel следующего вида.

| A | B |
|-----------------|---|
| Иванов И.И. | A |
|______________ | B |
| Петров П.П. | A |
|______________ | B |
|_______________ | C |
| Сидоров С.С. | A |
|_______________| B |
| Петрова А.В. | A |
|_______________ | B |
|_______________ | C |

нужно преобразовать путем макроса к такому виду

| A | B |
|-----------------|---|
| Иванов И.И. | A |
| Иванов И.И. | B |
| Петров П.П. | A |
| Петров П.П. | B |
| Петров П.П. | C |
| Сидоров С.С. | A |
| Сидоров С.С. | B |
| Петрова А.В. | A |
| Петрова А.В. | B |
| Петрова А.В. | C |
  • Вопрос задан
  • 143 просмотра
Комментировать
Подписаться 1 Оценить Комментировать
Ответ пользователя Xander017 К ответам на вопрос (2)
@Xander017 
Sub Макрос1()
    Selection.SpecialCells(xlCellTypeBlanks).Select
    Selection.FormulaR1C1 = "=R[-1]C"
End Sub
Ответ написан
Комментировать
Комментировать