2017-04-04 18 views
0

所以我有一個空白隨機整列...我需要一個宏只會選擇空白,然後在這些空白單元格粘貼在它上面的單元格的值。選擇部分顯然很容易,但當試圖將公式填入空白時,我總是會遇到「太多延續」的錯誤。我包含一張圖片,第一列是'之前',第二列是我希望列應用宏後的樣子。需要在Excel中創建一個在列中找到空格,然後填充空白單元格上方的值的宏。圖片包括說明

如果宏需要創建第二列或者其他什麼也沒問題,只要最終結果看起來像它在圖片中一樣。謝謝!

Picture to illustrate.

+2

哦,我的天啊,我很密...新欄目,然後= IF(A2 =「」,A1,A2)我怎麼會錯過 – user2333837

回答

2

嘗試,

sub fillblankfromabove() 
    dim blnks as range 
    with worksheets("Sheet1").Columns("E").Cells 
     set blnks = .specialcells(xlcelltypeblanks) 
     if not blnks is nothing then 
      blnks.formular1c1 = "=r[-1]c" 
     end if 
     .value = .value 
    end with 
end sub 
0

另一種方式來做到這一點是選擇要包含在這個過程中的所有單元格,然後按CTRL + G,選擇特殊,然後選擇「空白單元格」 。這將選擇所選範圍內的所有空白單元格。然後輸入=[cell above]並按下CTRL + ENTER,它會將該公式輸入到所有選定的單元格中。

相關問題