Macro Excel. Listar puertos disponibles
Publicado por Obelix (1 intervención) el 20/06/2013 12:02:00
Hola a todos.
Estoy programando una macro en Excel para listar en un combobox los puertos disponibles del pc del modo COM1, COM4, COM 14, etc., o incluso como 1, 4, 14, etc..
Lo he intentado con este código:
Dim TotalPuertos
Application.COMAddIns.Update
TotalPuertos = Application.COMAddIns.Count
ComboBox1.Clear
For i = 1 To TotalPuertos
ComboBox1.AddItem Application.COMAddIns(i)
Next i
Pero no me sale en el comobobox como quiero (1, 4, 14,...).
¿Alguna idea?
Saludos
Estoy programando una macro en Excel para listar en un combobox los puertos disponibles del pc del modo COM1, COM4, COM 14, etc., o incluso como 1, 4, 14, etc..
Lo he intentado con este código:
Dim TotalPuertos
Application.COMAddIns.Update
TotalPuertos = Application.COMAddIns.Count
ComboBox1.Clear
For i = 1 To TotalPuertos
ComboBox1.AddItem Application.COMAddIns(i)
Next i
Pero no me sale en el comobobox como quiero (1, 4, 14,...).
¿Alguna idea?
Saludos
Valora esta pregunta
0