IF OLE DB Connection Refresh All Window pop Up VBA Then...

[dversloot1]

Hello,

I've created dynamic Command Text within my OLE DB Connection that loops through row data to refresh table and perform a series of other macros. In instances where there isn't any data to be pulled, a window pops up saying: "The following data range failed to refresh: ..... Continue to refresh all?"

How do I create an if statement around this to skip this particular string and move on to the next?

Thanks,

Dan

 

[dversloot1]

My table refresh code is below. How can I add in the if statement around the alert message?


With ActiveWorkbook.Connections("LIST1").OLEDBConnection
.BackgroundQuery = False
.CommandText = MyStr
.Refresh

End With


Any help would be greatly appreciated!