Record a macro that runs Solver solving A1.

Then use the Worksheet_Change event to call the macro whenever B1 is
changed.

Hth,
Merjet