PDA

View Full Version : copy contents of a template sheet to another sheet



tjtsantos
10-03-2008, 04:21 AM
Hello Experts,

I may need your help again.

I am maintaining a single workbook. This workbook has 50 worksheets; each named differently. Within this workbook, the last sheet is named "Template". Now, each sheet in this workbook has a "Refresh" button that should copy all the contents of "Template" sheet to the current sheet where the "Refresh" button is clicked. How can I go about this such that I only have one code for each "Refresh" button on every sheet.

Hope you get the idea. Thanks a lot.

Tony

mdmackillop
10-03-2008, 06:19 AM
Either assign each Forms button to this macro which should be in a standard module
Sub CopyTemplate()
Sheets("Template").Cells.Copy ActiveSheet.Range("A1")
End Sub

or using ActiveX buttons, call it from the button code

Private Sub CommandButton1_Click()
Call CopyTemplate
End Sub

tjtsantos
10-03-2008, 08:17 AM
Wow, I didn't expect it to be just a simple code. It works! Perfect! Thanks a lot!

Case solved! :)

Tony

tjtsantos
10-03-2008, 08:35 AM
Also, how can I flag this this thread SOLVED: ?

mdmackillop
10-05-2008, 12:06 PM
Hi Tony,
Happy to help.
You mark Solved using the Thread Tools dropdown