Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Display in cell not dialogue box
Hello All - how do I make the result of the following macro display its result in an excel cell not the dialogue box? Sub GetPhysAddress() Dim oWMIService As Object Dim oColAdapters As Object Dim oObjAdapter As Object Set oWMIService = GetObject("winmgmts:" & "!\\.\root\cimv2") Set oColAdapters = oWMIService.ExecQuery _ ("Select * from Win32_NetworkAdapterConfiguration Where IPEnabled = True") For Each oObjAdapter In oColAdapters MsgBox "Adapter Physical address: " & oObjAdapter.MACAddress Next Set oObjAdapter = Nothing Set oColAdapters = Nothing Set oWMIService = Nothing End Sub -- sparx ------------------------------------------------------------------------ sparx's Profile: http://www.excelforum.com/member.php...o&userid=16787 View this thread: http://www.excelforum.com/showthread...hreadid=524275 |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Display contents of a specific cell even if a group of cells is mo | Excel Worksheet Functions | |||
Urgent date/scheduling calc needed | Excel Worksheet Functions | |||
formatting a cell to display the correct date. | Excel Discussion (Misc queries) | |||
Cell display is 38727.4101273148 Formula Bar is 1/10/2006 9:50 | Excel Discussion (Misc queries) | |||
Display a row if a cell value is greater than zero | Excel Worksheet Functions |