I have column A containing the names of all worksheets in the workbook.

I can enter a formula e.g  ="Sheet1"!D1   which gives me the contents of
cell D1 on Sheet1

How do I enter a formula that substitutes the sheet name from another cell?

e.g  =A1!D1   where A1 on the current worksheet contains the text "Sheet1"

Thanks