[算表] 請問用 VBA 抓取網路卡編號
軟體:2010
請問各位，我在網路上找到用 VBA 抓網路卡編號如下：
Sub 網路卡()
Dim IPConfigSet
Set IPConfigSet = _
GetObject("winmgmts:").ExecQuery _
("Select * from Win32_NetworkAdapterConfiguration Where ((IPEnabled =
TRUE) And (MacAddress != NULL) And (SettingID != NULL))")
For Each IPConfig In IPConfigSet
If Not IsNull(IPConfig.IPAddress) Then
MsgBox IPConfig.MACAddress
End If
Next
End Sub
但是若執行當下沒有開網路，不會發生任何事，連警告也不會有，
我想讓它在沒有網路時跳出警告視窗然後自動關閉 Excel，
請問該怎麼修改？
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 210.244.73.250
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1468310095.A.B29.html
※ 編輯: CaoCao (210.244.73.250), 07/12/2016 15:57:45
→
07/12 16:12, , 1F
07/12 16:12, 1F
→
07/12 16:13, , 2F
07/12 16:13, 2F
→
07/12 17:23, , 3F
07/12 17:23, 3F
→
07/12 17:30, , 4F
07/12 17:30, 4F
→
07/12 17:48, , 5F
07/12 17:48, 5F
→
07/12 17:57, , 6F
07/12 17:57, 6F
→
07/12 17:57, , 7F
07/12 17:57, 7F
推
07/12 18:05, , 8F
07/12 18:05, 8F
Office 近期熱門文章
PTT數位生活區 即時熱門文章