none
Excel2013无法加载ComDlg Control RRS feed

  • 问题

  • OS为Windows 7 64bit, Office版本升级至Office2013,启用Excel2013运行之前Excel2010下编写的Macro(内含CommonDialog控件),“Reference”里已经引用了syswow64下的comdlg32.ocx (MS Common Dialog Control 6.0 (SP3)) 这个应该是系统自带,仍然出现CommonDialog控件丢失导致程序无法使用的情况。

    附上对应的代码:

    Private Sub CommandButton1_Click()
         CommonDialog1.Filter = "All Excel files(*.xls;*.xlsx)|*.xls;*.xlsx"
         CommonDialog1.ShowOpen
         
         If CommonDialog1.Filename <> "" Then
            TextBox1.Text = CommonDialog1.Filename
         End If
         
    End Sub

    2014年3月21日 10:34

答案