Runtime Error '1004' Application-defined or object-defined error

Hello,

I'm currently getting this run time error whenever I try to run these lines of code when the user form is initialized. It's breaking at the if statement. (my spread sheet is only called read only, there are no restrictions on it.)

With Worksheets("READ ONLY")
If Not IsEmpty(.Range("F")) Then
locationcb1.List = .Range("F", .Range("F" & Rows.Count).End(xlUp)).Value
End If
End With


Please Help

You can't have Range("F"), if you want the whole column it needs to be Range("F:F")

Edit: although I don't think isempty will work on more than one cell...

I got the code from the following thread : http://www.excelforum.com/excel-prog...-combobox.html

why would it be any different?
Sorry, I'm very new to vba

Nvm, I understand now. Thank you!

On that thread they have used

If Not IsEmpty(.Range("A2")) then

Which gives you a single cell, the value of which is "empty"

If you use a Range of more than one cell, this will give you an array, with the value of each item in the array being "empty" but the value of the array itself is not "empty". So when you use isempty on a range with more than one cell it will return false.

It should be simple to change it to do what you want, but just to check: where do you want it look to see if the cells are empty?