I'm wanting to use VBA to change the goal seek function
from a fixed value e.g. 0.3 below to a variable - want to
put in a cell reference instead

Sheets("Calc Sheet").Select
Range("BJ23").Select
Range("BJ23").GoalSeek Goal:=0.3, ChangingCell:=Range
("BJ22")
Sheets("Header").Select

I have done this before so know it works, but for some
reason it's not working for me this time

Any help would be greatly appreciated
Matt