Hi All,
I hope someone can help me. I have a code that copies and pastes training programs from the planning sheet to the for that specific athlete. I want it to do this but without pulling through the formula in the cells just the numbers/txt/picture in the cells.
The code i'm currently using is below and hoping it can be adapted
I hope this makes sense, and someone can help.
I hope someone can help me. I have a code that copies and pastes training programs from the planning sheet to the for that specific athlete. I want it to do this but without pulling through the formula in the cells just the numbers/txt/picture in the cells.
The code i'm currently using is below and hoping it can be adapted
Code:
[/INDENT]
[INDENT]athname = Range("D1").Text[/INDENT]
[INDENT]Application.Goto reference:="Print_Area"[/INDENT]
[INDENT]
[/INDENT]
[INDENT] Dim wkSht As Worksheet[/INDENT]
[INDENT] For Each wkSht In Sheets[/INDENT]
[INDENT] If ActiveSheet.Range("D1").Value = wkSht.Name Then[/INDENT]
[INDENT] ActiveSheet.Range("Print_Area").Copy Destination:=wkSht.Range("A1")
I hope this makes sense, and someone can help.