标题:VBnet 如何打开excel 文件, 并自己输入excel 的密码。
只看楼主
mrkkk
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2014-3-9
结帖率:0
已结贴  问题点数:20 回复次数:3 
VBnet 如何打开excel 文件, 并自己输入excel 的密码。
请各位大神帮忙。
想用vbnet 打开excel 的文件, excel 文件有密码。
曾经用vb6.0 打开excel 文件,并自行输入密码。 但是现在新的vbnet 不知道如何操作。
我用了 process start(C:/user/desktop/a.xlsm) 打开了, 不过不知道怎么输入其excel 附属的密码.  
试过了process start( , , , ) 里面的 password栏目, 不过总显示我的密码不符合 security string.
不知道有没有什么方式可以帮忙解决.

急~~~ 希望好心人可以给个方法~~最好附上详细的code(跪求)
我要打开的文件是(C:/user/desktop/a.xlsm),excel 文件的密码是123456
搜索更多相关主题的帖子: password security process 输入密码 excel 
2014-03-09 02:10
mrkkk
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2014-3-9
得分:0 
没人呢~~~

没人帮忙么~~~
2014-03-09 14:23
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
得分:20 
没弄过
2014-03-09 18:38
cnwangb
Rank: 2
等 级:论坛游民
帖 子:2
专家分:20
注 册:2014-3-22
得分:0 
首先在  项目-添加引用- 添加上  Microsoft.Office.Interop.Excel

以下代码在VS VB2013 +OFFICE 2010通过:


Imports Microsoft.Office.Interop.Excel
Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim xlApp As Microsoft.Office.Interop.Excel.Application
        Dim xlBook As Microsoft.Office.Interop.Excel.Workbook
        Dim sfile As String
        sfile = "z:\123.xlsx"

        xlApp = New Microsoft.Office.Interop.Excel.Application
        xlApp.DisplayAlerts = False               'EXCEL运行中不显示对话框,直接运行
        xlBook = xlApp.Workbooks.Open(sfile, Password:=123456)  'excel打开密码为123456
        xlApp.Rows("1:1").RowHeight = 23.25          '设置第一行行高23.25
        xlApp.Cells(2, 1) = "你好,这是一个测试"
        xlApp.Range("A3:F3").Interior.ColorIndex = 37 ' 浅蓝色填充

        xlBook.Save()
        xlBook.Close()
        xlApp.Quit()
        MsgBox("ok!")
    End Sub
End Class
2014-03-22 15:40



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




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

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