UNTESTED
Another Option would be to add each line you wish to delete to a range then zap the range at the same time....
Dim MyRange As Range
Dim AnyRangeFound As Boolean
AnyRangeFound = False
For r = 1 To 6500
If Len(Cells(r, 8)) = "FAIL" Then
Exit For ' gets out...
I used to use this Excel VBA code to open the ODBC Administrator
ConnectionId = SQLOpen("", ThisWorkbook.Sheets("CNString").Range("A1"), 2)
My problem is that SQLOpen is part of XLODBC which is getting old. The things I read suggest using something within ADO but...
I used to use XLODBC's SQLOpen to cause the ODBC Adminstrator window to open. Everything I read tells me to use ADO.
I need VBA code that opens the ODBC Adminstrator so I can build the Connect String.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.