Hi All

My code puts an address string into a cell (DZ1) when certain criteria are met.
 If HEATS = 5 And HC_REG = "Regular" And TeamRaces > 6 < 13 Then
ThisWorkbook.Sheets("Race Meeting Information").Range("DZ1") = Sheets("Race Meeting Information").Range("DZ1")
When running the code initially it failed to show anything in cell DZ1 so I added in the " & " to make it a text string (??)
 If HEATS = 5 And HC_REG = "Regular" And TeamRaces > 6 < 13 Then
ThisWorkbook.Sheets("Race Meeting Information").Range("DZ1") = "Sheets(" & " C2 - 5 Heat Team Sheet " & ").Range(" & " B2:AL61,B67:AL126"  & ")"
This did put the string into DZ1 but there are no " " around the sheet and range addresses, so the address doesn't work. -
 Sheets( C2 - 5 Heat Team Sheet ).Range( B2:AL61,B67:AL126)
I then put double "" into the string
 If HEATS = 5 And HC_REG = "Regular" And TeamRaces > 6 < 13 Then
ThisWorkbook.Sheets("Race Meeting Information").Range("DZ1") = "Sheets(" & " "C2 - 5 Heat Team Sheet" " & ").Range(" & " "B2:AL61,B67:AL126" " & ")"
However, this is rejected outright by VBA because as soon as it sees the second lot of "" I get "Compile Error. Expected end of statement".

What do I need to do to get the code to write
Sheets("Race Meeting Information").Range("DZ1")
in to cell DZ1 with all the correct " " marks in place??

Many thanks

Frankie