首先,Office有家庭版(学生、教育版)、专业版、企业版和订阅版。
Sub 插入多列()'快捷键为Ctrl + Shift + TDim i As Integeri = Application.InputBox(prompt:="请输入列数:", Type:=1)'Type = 1的意思是强制要求输入一个数字,如果不是数字则会报错If i = 0 ThenExit Sub'当你改变主意不想插入列数的时候你可以输入数字0End IfSelection.Resize(1, i).EntireColumn.Insert Shift:=xlToRightEnd Sub
本文于2023年10月24日首发于本人同名其他平台,更多文章案例请搜索关注!