Как я могу организовать набор окон ping.exe на экране (Excel VBA) - PullRequest
0 голосов
/ 10 июля 2019

Я создал кнопку в Excel, которая выполняет пинг для заранее определенного количества IP-адресов.

Я хотел бы аккуратно расположить их на экране с заголовками в строке меню, если это возможно.

ping.exe, автоматическая компоновка

пример того, что хотел бы видеть

Sub Cont_Ping()

cellrow = Worksheets("ping Asset").Cells(5, 1).Value
cellcol = 6

Shell ("ping.exe -t " & Range("f" & cellrow).Value), vbNormalFocus
Shell ("ping.exe -t " & Range("h" & cellrow).Value), vbNormalFocus
Shell ("ping.exe -t " & Range("i" & cellrow).Value), vbNormalFocus
Shell ("ping.exe -t " & Range("j" & cellrow).Value), vbNormalFocus

End Sub
...