Refresh failure ODBC error

December 11, 2013 at 00:30:48
Specs: Windows 7
Hi,

I have a macro enabled file on my laptop, copied the same on to a Desktop; both of them have ODBC installed.
When I refresh the workbook on my Laptop it works, however, it fails on the Desktop giving me a ODBC error 1004.

Any help would be greatly appreciated.

Below is the code I used:

Sub RESFRESH2()
Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False
Dim mCOUNTER As String
mCOUNTER = 0
If mCOUNTER > 0 Then
Exit Sub
Else
Call RefreshNOW
mCOUNTER = 1
Application.OnTime Now + TimeValue("00:00:05"), "TexttocolumnChat"

' Application.OnTime Now + TimeValue("00:00:14"), "agentdata"


End If
Sheets("Sched").Select
Range("R2").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.FillDown
Sheets("SkillsandQueues").Select
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True

End Sub

message edited by Mohannew


See More: Refresh failure ODBC error

Report •

#1
December 12, 2013 at 01:12:12
Do you get any other text with this error? 1004 is very generic so cannot really help unless you give us the exact error message.


Report •
Related Solutions


Ask Question