software

Hello,

I have been asked to create a worksheet in which there is some sort of
button/condition that can be selected which will then copy all of the
information in the worksheet to another specified worksheet in another
workbook. Basically it needs to be a test worksheet template in which
the user can make some sort of selection to have all the information
logged into the sheet copied over to a subsequent worksheet without
having to go through copying/pasting or resaving by themselves. Is
there any way to do this? Thanks,

Nick--
nickclingan
------------------------------------------------------------------------
nickclingan's Profile: www.excelforum.com/member.php...oamp;userid=28623
View this thread: www.excelforum.com/showthread...hreadid=495680ONe way would be to just save a copy of the file under a new name....then
change whatever data is required......

Vaya con Dios,
Chuck, CABGx3quot;nickclinganquot; gt;
wrote in message
...
gt;
gt; Hello,
gt;
gt; I have been asked to create a worksheet in which there is some sort of
gt; button/condition that can be selected which will then copy all of the
gt; information in the worksheet to another specified worksheet in another
gt; workbook. Basically it needs to be a test worksheet template in which
gt; the user can make some sort of selection to have all the information
gt; logged into the sheet copied over to a subsequent worksheet without
gt; having to go through copying/pasting or resaving by themselves. Is
gt; there any way to do this? Thanks,
gt;
gt; Nick
gt;
gt;
gt; --
gt; nickclingan
gt; ------------------------------------------------------------------------
gt; nickclingan's Profile:
www.excelforum.com/member.php...oamp;userid=28623
gt; View this thread: www.excelforum.com/showthread...hreadid=495680
gt;
Hi

Here is a procedure, which copies values along with sheet formatting to new
workbook. All links and buttons are removed. The archive folder address is
stored in cell H4 on same worksheet.

Public Sub Archive()
ActiveSheet.Select
ActiveSheet.Copy
ActiveSheet.Unprotect Password:=quot;***quot;
ActiveSheet.Buttons.Delete
' deleting links and address of archive folder from sheet header
Range(quot;G2:H4quot;).Select
Selection.ClearContents
Range(quot;A5:P39quot;).Select
Selection.Copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=
_
False, Transpose:=False
Application.CutCopyMode = False
txtFileName = Range(quot;H4quot;).Value amp; Range(quot;A4quot;).Value amp; quot; WorkingTime quot; amp;
Month(Range(quot;A5quot;)) amp; quot; quot; amp; Year(Range(quot;A5quot;)) amp; quot;.xlsquot;
ActiveWorkbook.SaveAs FileName:=txtFileName _
, FileFormat:=xlNormal, Password:=quot;quot;, WriteResPassword:=quot;quot;, _
ReadOnlyRecommended:=False, CreateBackup:=False
ActiveWindow.Close
End Sub--
Arvi Laanemets
( My real mail address: arvi.laanemetslt;atgt;tarkon.ee )
quot;nickclinganquot; gt;
wrote in message
...
gt;
gt; Hello,
gt;
gt; I have been asked to create a worksheet in which there is some sort of
gt; button/condition that can be selected which will then copy all of the
gt; information in the worksheet to another specified worksheet in another
gt; workbook. Basically it needs to be a test worksheet template in which
gt; the user can make some sort of selection to have all the information
gt; logged into the sheet copied over to a subsequent worksheet without
gt; having to go through copying/pasting or resaving by themselves. Is
gt; there any way to do this? Thanks,
gt;
gt; Nick
gt;
gt;
gt; --
gt; nickclingan
gt; ------------------------------------------------------------------------
gt; nickclingan's Profile:
gt; www.excelforum.com/member.php...oamp;userid=28623
gt; View this thread: www.excelforum.com/showthread...hreadid=495680
gt;
Thanks!, That was a big help--
nickclingan
------------------------------------------------------------------------
nickclingan's Profile: www.excelforum.com/member.php...oamp;userid=28623
View this thread: www.excelforum.com/showthread...hreadid=495680