2014-02-17 2 views
0

У меня есть электронная таблица, которую я чищу и использую макросы, чтобы помочь. В моей колонке «C» есть данные о температуре. Как и во всех данных, некоторые из них отсутствуют. Как написать макрос, который автоматически заполнил бы пропавшее место предыдущими данными?excel macro column автозаполнение

Например:

C          C 

1 37         1 37 
2 35         2 35 
3     -------->   3 35 
4 37         4 37 
5 36         5 36 

Пятно С3 была заполнена данными C2 в.

Благодарим за помощь.

+0

возможно иметь две пустые ячейки в смежных рядах (скажем, '35, , , 36')? –

ответ

2

Дайте этому попытку:

+0

+ 1 Для решения vba. –

0

Как бы я пишу, что макрос:
Это содержит только фрагменты.

цикл по всем ячейкам в колонке:
for each cell in ActiveSheet.Columns(1).Cells

, если значение ячейки не является пустым -> сохранить значение переменной
If cell.value <> Empty then lastCellValue = cell.value

, если значение ячейки пусто -> запись сохраненное значение ячейки в ячейку
Else cell.value = lastCellValue

также:
если более чем х (например, 20) ячейки в строке были пустыми, разрыв от петли

3

Вам действительно нужен VBA для этого?

ли это

  1. Выберите Col C
  2. Нажмите Ctrl + G
  3. Нажмите на Special
  4. Следующая Нажмите на Blanks
  5. нажмите кнопку ОК
  6. Все пустые ячейки теперь sel ected. Нажмите кнопку =, а затем Up клавишу со стрелкой
  7. Наконец нажмите Ctrl + Tab + Введите и вы сделали.

ScreenShot

enter image description here

+0

+1!Я думал об использовании в формуле VBA из вашего другого ответа '[C2: C10] = [INDEX (IF (C2: C10 =" ", C1: C9, C2: C10),)]', но он работает только в том случае, если нет двух пустых ячеек в смежных рядах, и моя совесть будет виновата :) –

+1

@simoco: 'моя совесть была бы виновата :) - simoco 49 секунд назад' Не о моем сообщении, но если вы используете любое другое сообщение в качестве ссылки , вы всегда должны давать этому лицу кредит на свой пост. Затем вы заметите, что никогда больше не будете чувствовать себя виноватым;) Для [ПРИМЕР] (http://stackoverflow.com/questions/21769948/excel-vba-capitalizing-all-selected-cells-in-column-on-double- нажмите/21773083 # 21773083) –