VBA Code to Select Worksheet Based on User-Selected Cell Value

[AspiringAutomater]

Hello,
Long-time googler, first time poster here... I am trying to write brief code to allow me to select a cell, and then to select the worksheet whose name is equal to the cell value. Below is my attempted code and I get hung up on the "NewFrozenSheet = Range(c).Value" line. This code works if I hard code "c" to the cell reference (e.g., "A1"...rendering "c" irrelevant), but I would like it to remain a variable in the code. Appreciate whatever help anyone can offer, and thank you in advance!

Sub Monthly()

' Monthly Macro

Sheets("Consolidated Data").Select

Dim c As Range
Set c = Application.InputBox(prompt:="Select Last Sheet Ref to Freeze", Type:=8)

Dim NewFrozenSheet As String
NewFrozenSheet = Range(c).Value
Sheets(NewFrozenSheet).Activate

End Sub

 

[AspiringAutomater]

Nevermind...I found a solution.

Dim c As Range
Set c = Application.InputBox(prompt:="Select Last Sheet Ref to Freeze", Type:=8)

c.Activate

Dim NewFrozenSheet As String
NewFrozenSheet = ActiveCell.Value
Sheets(NewFrozenSheet).Activate

I think the main holdup was that I had to reverse the order of the line of code which was breaking.