标题:控件代码求助
只看楼主
atwoods
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2020-3-9
结帖率:0
 问题点数:0 回复次数:2 
控件代码求助
设置一个控件按键,点击按键,选择桌面上的excel,然后打开选中的excel,复制粘贴里面的数据到指定的sheet中。这个应该怎么写,请大神们赐教,非常感谢!
搜索更多相关主题的帖子: 代码 复制 excel 按键 控件 
2020-04-15 12:33
rhloo
Rank: 2
等 级:论坛游民
帖 子:6
专家分:20
注 册:2020-5-22
得分:0 
以下是打开文件的代码,放在按键点击事件中,复制粘贴操作按自己的需求
程序代码:
With Application.FileDialog(msoFileDialogFilePicker)
    .InitialFileName = ThisWorkbook.Path & "\"
    .AllowMultiSelect = True
    .Filters.Clear
    .Filters.Add "Excel Files", "*.xls*"
    .Show
End With
2020-05-22 11:00
atwoods
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2020-3-9
得分:0 
哥们,太感谢了,搞定了,大神啊
2020-06-08 21:41



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-501055-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.056090 second(s), 7 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved