Include contents of adjacent cell in a formula as the sheet name?

I thought I knew quite a bit on Excel, but you guys keep blowing my mind with what you know.

Here's another one for you then:

On Sheet1, I have a column listing the sheet names (around 30 rows) and want to show, say, cell A1 from each other sheet next to their corresponding sheet name on Sheet1.

Sheet names
AAA =('AAA'!A1)
BBB =('BBB'!A1)
CCC =('CCC'!A1)
DDD =('DDD'!A1)
EEE =('EEE'!A1)
FFF =('FFF'!A1)

Is there an easier way of entering the sheet name into the formula to save me typing each sheet name into it?

Many thanks
David.

hi David. try:
=INDIRECT(A1&"!A1")

if there are spaces in your filename, then:
=INDIRECT("'"&A1&"'!A1")

that's assuming your data is in A1. then drag down the formula