VBA插入一欄不複製格式
在Excel中當插入一欄空白欄,往往會複製到前一欄的格式,那要如何使用VBA插入一欄/多欄空白欄,且不複製到格式呢?
如下圖當插入一欄往往會複製到前一欄的格式(顏色)。
![](https://lazyorangelife.com/wp-content/uploads/2023/07/插入整欄不複製格式-1.png)
輸入巨集
※輸入以下指令※
Sub 插入一欄不複製格式()
Columns(“F”).Insert
Columns(“F”).ClearFormats
End Sub
![](https://lazyorangelife.com/wp-content/uploads/2023/07/插入整欄不複製格式-2.png)
語法說明
Columns(“F”).Insert
‘於F欄插入一欄
Columns(“F”).ClearFormats
‘於F欄清除格式,即不複製格式
執行巨集
點選「開發人員」-「巨集」或按下「Ctrl」+「F8」快捷鍵,並「執行」巨集。
![](https://lazyorangelife.com/wp-content/uploads/2023/07/插入整欄不複製格式-3.png)
執行後即於F欄插入一欄空白欄且不複製格式。
![](https://lazyorangelife.com/wp-content/uploads/2023/07/插入整欄不複製格式-4.png)
VBA插入兩欄不複製格式
輸入巨集
※輸入以下指令※
Sub 插入兩欄不複製格式()
Columns(“F:G”).Insert
Columns(“F:G”).ClearFormats
End Sub
![](https://lazyorangelife.com/wp-content/uploads/2023/07/插入整欄不複製格式-5.png)
語法說明
Columns(“F:G”).Insert
‘於F~G欄插入空白欄,即插入兩欄空白欄
Columns(“F:G”).ClearFormats
‘於F~G欄清除格式,即不複製格式
執行巨集
點選「開發人員」-「巨集」或按下「Ctrl」+「F8」快捷鍵,並「執行」巨集。
![](https://lazyorangelife.com/wp-content/uploads/2023/07/插入整欄不複製格式-6.png)
執行後即於F欄插入兩欄空白欄且不複製格式。
![](https://lazyorangelife.com/wp-content/uploads/2023/07/插入整欄不複製格式-7.png)
如此類推也可插入多欄空白欄且不複製格式。