我的整个A列都得需要组合框，但窗体组合框或控件工具箱组合框只能一个一个的复制，很麻烦，怎样才能快速复制窗体组合框或控件工具箱组合框？
不要提及数据有效性的下拉列表！
在EXCEL中，怎样快速复制窗体组合框或控件工具箱组合框
答案:1 悬赏:40 手机版
解决时间 2021-02-06 23:45
- 提问者网友：十年饮冰
- 2021-02-06 06:47
最佳答案
- 五星知识达人网友：洒脱疯子
- 2021-02-06 07:15
给你一段VBA代码，可以帮你在复制的同时更改链接单元位置，下方代码需根据你的组合框名称及位置进行更改，具体 Hi 中聊。
Sub 复制窗体()
Dim x As Integer: ActiveSheet.Shapes("Drop Down 1").Select: Selection.Copy
For x = 2 To 10: Range("F" & x).Select: ActiveSheet.Paste: Selection.LinkedCell = "E" & x: Next x: Range("G1").Select
End Sub
Sub 复制窗体()
Dim x As Integer: ActiveSheet.Shapes("Drop Down 1").Select: Selection.Copy
For x = 2 To 10: Range("F" & x).Select: ActiveSheet.Paste: Selection.LinkedCell = "E" & x: Next x: Range("G1").Select
End Sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯