Compile Error: Variable Not Defined?

[dbdev]

Hi,

I can't seem to get the functionality to work. I get a Compile Error: Variable not defined and "Sub GetSQLData2()" is highlighted whereas SQL2 is selected, can someone please help me. Thank you

Sub GetSQLData2()


Dim sql As String
Dim r As Range

OTW45.AutoFilterMode = False

OTW45.Range("DataDrop2").Offset(1, 0).Resize(65000, 200).ClearContents

sql = SQL2.TextBoxes("SQLTextBox2").Text
Set r = OTW45.Range("DataDrop2").Offset(1, 0)
LoadWorkSheet r, sql

OTW45.Range("OTW45Filt").AutoFilter


End Sub

 

[Dryver14]

What is OTW45 ?

dim OTW45 as worksheet

set OTW45 = worksheets("OTW45")

assuming it is a worksheet

 

[dbdev]

What is OTW45 ?

dim OTW45 as worksheet

set OTW45 = worksheets("OTW45")

assuming it is a worksheet

it is a worksheet

 

[Dryver14]

then you ned to add the 2 lines the dim and set statements below the dim r as range line in your code