Type mismatch when selecting filtered cell

[ks100]

What am I doing wrong? I am getting a typemismatch on

dateBeingBalanced = Range("a" & nrow).SpecialCells(xlCellTypeVisible).Value

from the script below:

dim nrow as long
dim datebeingbalanced as string
dim tasktotalhours as double

With ws
.AutoFilterMode = False

.Range("Bs1:Bs" & .Range("Bs" & Rows.Count).End(xlUp).Row).AutoFilter 1, UserForm1.ticketid.Value
TaskTotalHours = Application.WorksheetFunction.Sum(.Range("I2:I" & .Range("I" & Rows.Count).End(xlUp).Row).SpecialCells(xlCellTypeVisible))
End With





nrow = 2

Do Until Range("a" & nrow).Value = ""





dateBeingBalanced = Range("a" & nrow).SpecialCells(xlCellTypeVisible).Value

This is only the beginning of the script which is why you don't see the end with/loop, etc. but it is stopping on the line I listed above. Any idea why that's giving me a type mismatch?

[stnkynts]

Because the variable is the wrong type. i.e. not a string.

Depending on what is going on it is probably either going to be a range (you will have to "set" the variable and remove the ".Value") or the variable type will be variant (if it is variant you can leave it as is). However, either way you do it you should probably have a firm understanding of what each means or else you will probably run into issues when you try to use the variable