vbaword分栏

① VBA中如何word文档中某一段落分栏数

首字2字1要复制的内容的地方插入分隔符 - 分节符 - 连续，然后复制WORD1。字2，如果它被插在中间，它是建议的插入位置之前和之后插入“分节

② 如何用VBA在WORD中创建命令栏（即菜单项）并在每个菜单项上加上图标

你的代码是正确来的,但是如果你要显示自图标,你需要把所有ctrl1.style = msoButtonCaption 这一句改为 ctrl1.Style = msoButtonIconAndCaption,这样就能够一起显示图标和文字了,我试过是可以的,希望能帮到你

③ 在Word中vba怎样才能让数据呈现两列输出

在Word中VBA让数据呈现两列，这意思是指将文本进行分栏，而分为两栏吧！

可以通过“开发工具”回选项卡答--“录制宏”进行录制该操作，录制完成后进行编辑，而分栏的代码如下：

Sub TextC()

Selection.PageSetup.TextColumns.SetCount NumColumns:=2

End Sub

最终效果图