The particular issue is that to assign a value to a variable you must put the
variable on the left of the equal sign and the value on the right.

You have

Range(0, 1).Select = freq

This is trying to assign the value of freq to "Range(0, 1).Select"

If you want to assign to freq you need something like

freq= activecell.value

But, I think you have other problems.