我不明白如何將單元格上的公式自動填充到左側添加的新列。讓我們舉個例子： [示例](https://i.stack.imgur.com/ufCvH.png) 我在單元格“B2”上有一個日期是“B1 180”，當我在“B2”左邊，新的“B2”不包含公式。在左側添加新列時如何自動填充公式？
謝謝。
我期望當我在“B2”左側添加一個新列時，新的 B2 將自動填充公式“B1 180”。
uj5u.com熱心網友回復：
正如 aclayden 的回答中所評論的，您可以使用 VBA 執行此操作
使用作業表更改事件，我們可以觀察單元格是否有任何更改，如果有更改，則添加公式。
右鍵單擊“作業表”選項卡，然后單擊“查看代碼”。
在 VBAproject 框中，您應該會看到要查看的作業表，如果它不是正確的作業表，請雙擊您想要的作業表名稱。
您現在應該擁有可以粘貼以下代碼的區域：
Private Sub Worksheet_Change(ByVal Target As Range)
Dim ws As Worksheet
Set ws = Worksheets("Sheet1") ' set the target worksheet name here
If Not Application.Intersect(ws.Range("B1"), Range(Target.Address)) Is Nothing Then ' set the cell to be watched
ws.Range("B2").FormulaR1C1 = "=R[-1]C 180" ' set the cell where you want the formula - The formula will need changing if you want to refrence another cell.
End If
End Sub
確保更改代碼中的作業表名稱和單元格參考以匹配您的重新裝備，如果更改單元格參考，則您將需要更改公式。
您現在可以回傳作業表并添加一個新列，現在應該會自動添加公式。
uj5u.com熱心網友回復：
您可以復制并插入現有的列嗎？只要您的參考是靜態的（例如 $A$1，而不是 A1），就會用它復制/粘貼公式。如果您需要將公式下拉到行上，您可以使用 $A1，但如果列參考是動態的，您最終會查找錯誤的單元格或創建 #REF 錯誤。
通過將范圍格式化為表格，可以使用插入的行更輕松地實作這一點，但插入應該如上所述。
uj5u.com熱心網友回復：
我不認為 Excel 自動填充在創建新列時會自動作業。您可以做的是更好地使用對 B1 的絕對或半絕對參考（$B1、B$1 或 $B$1）撰寫公式，創建新列，然后使用“黑色加號”通過自動填充擴展您的公式。另一種方法是將整個 B 列復制并粘貼到它自己的左側：如果您的公式寫得很好，它也會出現。
轉載請註明出處，本文鏈接：https://www.uj5u.com/qukuanlian/536353.html
標籤：擅长
上一篇：過濾和分組重復名稱串列
下一篇：計算篩選作業表中的可見行數