Если вы посмотрите комментарии к документации для Win32_NetworkAdapterConfiguration , вы увидите ссылку на Win32_NetworkAdapter при работе с Vista.
'Vista only code???
Set colAdapters = objWMIService.Execquery ("SELECT * FROM Win32_NetworkAdapter WHERE NetEnabled = True")
For Each nic in colAdapters
msg = "nic.DeviceId: " & nic.DeviceId & vbCRLF _
& "nic.Name: " & nic.Name & vbCRLF _
Next
После этого вы сможете получить InterfaceIndex и найти IP-адрес из класса Win32_IP4RouteTable .
Это, конечно, окольный способ получения информации по сравнению с использованием Win32_NetworkAdapterConfiguration .