⑴ 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