I know you gave up a little information, but can you provide some more
information please? Before and after? The better the description of the
problem, the better the description of the solution.
Thanks,
Ryan--

--
Ryan---
If this information was helpful, please indicate this by clicking ''Yes''.


"J.W. Aldridge" wrote:


Any ideas? Tried putting this together but not working....

Sub Paste_to()
Sheets("Ind Templates").Select
Range("A1:F13").Select
Selection.Copy


x = Sheets("Ind Templates").Index
For Each Sh In ThisWorkbook.Sheets
If Sh.Index x Then
'Do something
Range("A1").Select
ActiveSheet.Paste

End If
Next

End Sub