Excel 的內建功能僅允許在選定列的左側新增列,如果您想在選定列的右側新增一列,提供了一段 VBA 程式碼來處理此任務。
步驟 1:選擇您想在其右側插入列的單元格
步驟 2:按下 Alt 和 F11 鍵啟用 Microsoft Visual Basic for Applications 窗口,然後點擊 插入 > 模組 以創建一個新的空白模組
步驟 3:複製以下 VBA 程式碼並將其粘貼到新模組中,然後點擊 運行 按鈕 或按下 F5 鍵運行程式碼。Sub InsertToRight()
'Extendoffice20230303
Dim xRg, xRg2 As Range
Dim xC As Long
Set xRg = Application.Selection
xC = xRg.Columns.Count
Set xRg2 = xRg.Columns.Item(xC)
Set xRg2 = xRg2.Offset(0, 1).EntireColumn
xRg2.Insert Shift:=xlToRight
End Sub
結果:
注意:新增的列將格式化為與所選列相同的格式。