Suggestion: count is a property of many objects in vba,
you might want to alter your choice for the variable name to cnt or aCount etc.
for example
lr = Cells(Rows.Count, "A").End(xlUp).Row
this is frequently used to find the last used cell in column A
count is a property of rows (and columns, and others)
hope this helps you on your path, and happy coding
-mark