Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 2121|回复: 2

EXCEL VBA打开网站后的指定文件名称并打开

[复制链接]
发表于 2015-12-1 14:24 | 显示全部楼层 |阅读模式
如标题:
----------------------------------------------------
  需要在公司用VBA做一个小型的文件打开程序(如附件)
主要作用是:
    VBA打开公司服务器然后打开指定的文件(服务器是公司内部的网上应该打不开)
文件编号来源于VBA的窗体TextBox2
在TextBox2中输入文件编号后点击确认,然后就可以打开文件

下面代码网上找的;可以正常打开文件
Sub test()
    Dim arr
    On Error Resume Next
    With CreateObject("internetexplorer.application")
        .Visible = True
        .Navigate "\\sz1wn004.sz.com.cn\ods\OI\ECN\WBF7798A\WBF7798A.pdf"
        While .ReadyState <> 4 Or .busy
            DoEvents
        Wend

    End With
End Sub
红色字体是获取
TextBox2的内容  这个用VBA 怎么写

另外需要做个提示:若找不到文件则提示"无此文件"
----------------------------------
这个用VBA怎么写
请VBA大神帮帮忙

圖紙.rar

23.27 KB, 下载次数: 9

excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
 楼主| 发表于 2015-12-1 16:52 | 显示全部楼层
回复

使用道具 举报

 楼主| 发表于 2015-12-1 16:53 | 显示全部楼层
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-5-6 20:37 , Processed in 0.419735 second(s), 13 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表