ExcelTip.Net留存知识帖 ---【注:附件之前被网盘供应商清空后,现已修复-现已修复-现已修复为本地下载!】
现在位置:首页 > 我的酷贴 > VSTO > VSTO中OpenFileDialog示例

VSTO中OpenFileDialog示例

作者:绿色风 分类: 时间:2022-08-18 浏览:143
楼主
amulee
VSTO中的OpenFileDialog和VBA中的FileDialog用法类似。


操作步骤:
1、创建一个Excel程序。([VSTO] 利用VSTO制作一个简单的Excel程序 http://www.exceltip.net/thread-21546-1-1.html

2、添加一个OpenFileDialog控件和Button控件

 
3、在工作表中添加以下代码:
  1. Public Class Sheet1
  2.     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  3.         With Me.OpenFileDialog1
  4.             '默认的扩展名
  5.             .DefaultExt = "xlsx"
  6.             '可选择的扩展名
  7.             .Filter = "Excel工作簿 (*.xlsx)|*.xlsx|Excel 97-2003工作簿 (*.xls)|*.xls"
  8.             '默认的目录
  9.             .InitialDirectory = Me.Parent.path
  10.             '当点击确认时
  11.             If .ShowDialog() = DialogResult.OK Then
  12.                 '在A1单元格输出选择的文件
  13.                 Me.Cells(1, 1) = .FileName
  14.             End If
  15.         End With
  16.     End Sub
  17. End Class


同样用法的还有SaveFileDialog


附件下载:
VSTO中OpenFileDialog示例.rar
2楼
い卋玑┾宝珼
学习学习,学习VSTO

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素, 经与ExcelTip.Net站长Apolloh商议并征得其同意, 现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示, 供有需要的人士查询使用,也慰缅曾经的论坛时代。 所示各个帖子的原作者如对版权有异议, 可与本人沟通提出,或于本站点留言,我们会尽快处理。 在此,感谢ExcelTip.Net站长Apolloh的支持,感谢本站点所有人**绿色风(QQ:79664738)**的支持与奉献,特此鸣谢!
------本人网名**KevinChengCW(QQ:1210618015)**原ExcelTip.Net总版主之一

评论列表
sitemap