Hi

As you have probably guessed by now, I'm pretty much a novice with VBA. I'm
still battling with this particular issue, attempting run the following
function against all sheets that follow a particular naming convention ie;
"Server 1 Server Details", "Server 2 Server Details". The incremental
numbering sequence is not particularly relevant because at some stage a
number might be skipped. What is relevant however is that the first portion
of the sheet name will always be "Server " and the last portion will always
be " Server Details".

This is where I am with my code at the moment (In my uneducated mind, this
should do the trick - but seems to work on the current sheet, irrespective
of the sheet name)

Sub LinkDetail()
Dim wksSheet As Worksheet
Dim strSheet As String
strSheet = "*Server Details"
For Each wksSheet In ThisWorkbook.Worksheets
If wksSheet.Name Like strSheet Then
Range("Y7").Formula = "=$A$6"
Range("Y8").Formula = "=$B$6"
Range("Y9").Formula = "=$Q$6"
Range("Y10").Formula = "=$C$6"
Range("Y11").Formula = "=$D$6"
Range("Y13").Formula = "=$E$6"
Range("U16").Formula = "=CONCATENATE(""Shows CPU / IO / idle time
utilization (in ticks) since ASE was last started. ["",$J$6, "" microseconds
per tick]"")"
Range("W18").Formula = "=$G$6"
Range("AA18").Formula = "=$H$6"
Range("AE18").Formula = "=$I$6"
Range("U23").Formula = "=$K$6"
Range("Y23").Formula = "=$L$6"
Range("AC23").Formula = "=$M$6"
Range("U27").Formula = "=$N$6"
Range("Y27").Formula = "=$O$6"
Range("AC27").Formula = "=$P$6"
Range("AI9").Formula = "=$R$6"
Range("AJ9").Formula = "=$S$6"
End If
Next
End Sub

Hope someone can help. Thanks to those who have responded thus far.

Many Thanks - Grant