⑴ excel vba打开excel文件
dimmypathasstring，svalue’定义变量
mypath="d:excel.xls"'把路径赋值给一个字符串
Workbooks.OpenFilename:=mypath'这句是打开文件
activeworkbook.visible=false'这句是隐藏文件
svalue=activeworkbook.sheets(1).range("a1").value'这句是用变量取得该文件表1中a1单元格的值
activeworkbook.viseble=true’显示文件
activeworkbook.closetrue'/false,这句是关闭文件，close有两个参数，true是关闭保存修改，false是关闭时不保存修改
⑵ VBA 怎样打开一个有用户名和密码的网络共享文件
Sub 在有密码的工作表执行代码()
Sheets("1").Unprotect Password:=123 '假定表名为“1”，密码为“123” 打开工作表
Range("C:C").SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True '隐藏C列空值行
Sheets("1").Protect Password:=123 '重新用密码保护工作表
End Sub
或
Sub 解除全部工作表保护()
Dim n As Integer
For n = 1 To Sheets.Count
Sheets(n).Unprotect
Next n
End Sub
就OK了。
补充：Visual Basic for Applications(VBA)是Visual Basic的一种宏语言，是微软开发出来在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。主要能用来扩展Windows的应用程式功能，特别是Microsoft Office软件。也可说是一种应用程式视觉化的Basic 脚本。该语言于1993年由微软公司开发的的应用程序共享一种通用的自动化语言--------Visual Basic For Application(VBA)，实际上VBA是寄生于VB应用程序的版本。微软在1994年发行的Excel5.0版本中，即具备了VBA的宏功能。
⑶ 我用EXCEL的VBA做了一个具有网络协同共享操作的软件，但……
由于你打开了工作簿共享，所以其他用户更改内容时都会有这样的提示。。
所以，你要想不弹出这个提示，先关闭工作簿共享，彻底断开所有人的连接后，保存一下，再运行宏。宏运行完毕后后再打开工作簿共享
⑷ vba 共享网络excel文件保存很慢 文件变成tmp
将tmp文件另存为excel格式文件。
打开WPS，“首页”，点击“打开”，选择“所有文件类型”。选择损坏的文件。选择Excel打开。打开的tmp文件另存为即可。
⑸ vba打开Excel文件
1）新建一个按钮
2）录制一个宏，按你描述的操作。
3）把你录制的宏指定给你新建的按钮。
另一个文件中也如此执行。
最好能自己分析一下录制的代码，理解各项操作的
⑹ vba 如何实现excel 上传到网络 和打开网络excel 及从网络下载到本地
下载指定网上文件（选中详细地址）到C盘根目录下。
Sub Selectdownloadfile2C_drive()
'download the select file
Dim h, s, fil As String, c As Range, ti, url, i
Set h = CreateObject("microsoft.XMLHTTP")
On Error Resume Next
i = 0
MsgBox "The download file will be saved to c:\!"
For Each c In Selection
url = c.Value
If Len(url) < 20 Then GoTo ne
h.Open "GET", url, True '网络中的文件URL
h.send
ti = Timer
Application.StatusBar = "Waiting! " & i + 1 & "/" & Selection.count & " " & Right(c.Value, 50)
E:
If h.ReadyState <> 4 Then
' MsgBox (Len(H.responsebody)*2+1) / 1024)
Application.StatusBar = "Downloaded " & (Len(h.responsebody) * 2 + 1) / 1024 & "KB"
MsgBox (Len(h.responsebody) * 2 + 1) / 1024 & "KB"
If h.ReadyState = 3 And Timer - ti > 180 Then
MsgBox "Time out"
GoTo ne
End If
DoEvents
GoTo E:
Else
' MsgBox H.StatusText
Set s = CreateObject("ADODB.Stream")
s.Type = 1
s.Open
s.Write h.responsebody
fil = Replace(Mid(url, InStrRev(url, "/") + 1), "?", "-")
s.SaveToFile "C:" & "\" & fil, 2 '本地保存文件名
s.Close
i = i + 1
Application.StatusBar = c.Value & " downloaded OK " & i & "/" & Selection.count
End If
ne:
Next c
Application.StatusBar = False
End Sub
⑺ 两台电脑用局域网连接，如何实现共同操作一个excel含有vba的表格
SOSO兄弟：
你想得到的效果是：A电脑录入基础数据，B电脑所对应的一系列表格也跟着A录入的基础数据表发生变化。
要达到这样效果的前提需：电脑A
数据保存了；B电脑才可更新数据.
反之:A电脑数据没保存;那么B电脑数据等于A电脑数据之前没保存的数据.
本人建议：
达到此效果:还不如用远程桌面控制程序.即用B电脑可查看A电脑操作界面;也可以控制A电脑程序.
如果A电脑输出了什么;你可以随时可以观看;如录像.
⑻ 两台电脑用局域网连接，如何实现共同操作一个excel含有vba的表格
Excel完成多人协同录入工作，该教程图文并茂。详见：为了提高速度，可能需要多人同时处理一张Excel表格。Excel2007为了满足这种需求，为我们提供了“共享工作簿”的功能。通过这个功能，我们可以通过网络将一个Excel文件共享的同时供多人同时编辑这个工作薄。而且在编辑的同时，Excel会自动保持信息不断更新。在一个共享工作簿中，用户可以输入数据、插入行和列以及更改公式等，甚至还可以筛选出自己关心的数据，保留自己的视窗。而且在多人同时编辑一个单元格时还可以进行冲突处理。下面我举个例子来说明如何通过Excel2007来共享工作簿。一、设置共享工作簿首先让我们来启动Excel2007。启动后，在其中输入一个“产品销售”表，如图1所示。图1 产品销售表选择“审阅”菜单(在老版本的Excel中对应的是“工具”菜单)，然后点击菜单下方的“共享工作簿”按钮，弹出用于设置共享工作簿的对话框。运行结果如图2所示。图2 共享工作簿对话框在共享工作簿对话框中将“允许多用户同时编辑，同时允许工作簿合并”复选框选中。然后可以更据自己的需要进行高级设置。高级设置的界面如图3所示。图3 高级设置从这个界面可以看出，Excel可以管理共享工作薄的历史记录，而且还可以自动更新其它用户的变化。在默认情况下，当前用户在保存文件时更新其它用户的修改，但是我们也可以设置在一定时间间隔内自动更新工作薄的变化。在第3部分“用户间的修订冲突”设置区内最后设置第一项“询问保存哪些修订信息”，否则可能产生不确定的结果。在设置完后，点击“确定”按钮后，如果当前文档未保存，系统会提示你保存该文档。你可以将这个文档保存在一个其它人都可以访问到的地方，如一个共享文件夹。共享工作薄后的界面如图4所示。图4 共享工作薄在工作薄共享后，Excel上方的标题栏出现了“[共享]”提示。二、使用共享工作薄在设置完共享后，就可以使用多个Excel打开这个Excel文件了。让我们使用一个Excel编辑一下这个“产品销售”表。然后保存。再切换到另外一个打开这个文件的Excel，按Ctrl+S保存，你会看到在这个Excel中表格内容被更新。如图5所示。图5 被更新的界面在更新后，会出现一个如图5所对话框，提示该文档已经被更新。如果两个Excel同时修改同一个单元格，而且都进行保存，将会发生内容冲突。如一个用户将0001号产品的销售数据改为18，而另一个用户将0001号产品的销售数量改为20。在他们保存后，将出现如图6的的提示对话框。图6 冲突处理对话框然后由用户决定是按用户1还是用户2来修改表格中的内容。Excel不仅能处理当前的修改冲突，而且还可以查询冲突历史，并按冲突历史进行修改。点击“审阅”菜单中的“修改”按钮菜单中的“突出显示修订”项，将显示如图7所示的对话框。图7可以根据这个对话框对来选择查看修订历史。在选择完后，在每一个单元格的左上角会显示一个“小黑角”，将鼠标放在这个单元格上，将显示这个单元格的修改历史。再点击“接收/拒绝修订”菜单项，将显示如图8所示的界面。图8这个对话框显示了从某个单元格从最初的值到历次所修改的值(按时间从小到大排序)。你可以点中其中某一项以恢复到相应的历史值。也可以通过“全部接受”和“全部拒绝”按钮恢复到最后和最初的值。Excel2007还可以为工作薄设置密码，以防止其它用户关闭修订。还有就是在工作薄进行共享时不能进行一些高级的操作，如图形，图表等。 看不见图片就来这里：http://user.qzone.qq.com/8157744/blog/1280285596
⑼ VBA 打开和关闭局域网计算机共享文件夹 代码
建议：
先用Shell运行cmd命令行(cmd命令行使用net
use
X:
\\192.168.1.1\d
123
/user:RR)来实现网络连接至远程计算机共享文件夹，实现把网络位置映射为本机硬盘X盘
VBA代码示例
Sub
test()
Shell
"cmd.exe
/c
net
use
X:
\\192.168.1.1\d
123
/user:RR"
End
Sub
在VBA中利用Shell中运行net
use命令行来删除关于该映射
代码示例
sub
test2()
shell
"cmd.exe
/c
net
use
X:
/delete"
end
sub
⑽ Excel使用VBA读写有用户名及密码的网络文件夹中的文档
Sub 访问共享文件()
IPName = "192.168.0.10"
UserName = "user"
Passwd = "password"
Shell "net use * /delete /y", vbHide
Shell "net use \\" & IPName & " " & Passwd & " /user:" & UserName, vbHide
Shell "C:\WINDOWS\explorer.exe \\" & IPName & "\", vbMaximizedFocus
End Sub