Option Explicit Dim cn As New ADODB.Connection Dim i, j, LastRow, vbox As Integer Dim SQL_command, a, b, c, var1, var2, vpo, var3, var4, var5, var6, id As String Dim ws As Worksheet Sub ...
Some results have been hidden because they may be inaccessible to you
Show inaccessible results