basically based upon a condition i want to select a specific workbook
for a specfic file (which i already have the code for) and paste it
into another file for archived data
is there a code from within a worksheet that will select a workbook cut
it and paste it into another file? or is it not possible to select a
workbook cut it and paste it, the only options available seem to be
activate or open the workbook but not cut and paste

many thanks


--
short_n_curly
------------------------------------------------------------------------
short_n_curly's Profile: http://www.excelforum.com/member.php...o&userid=21576
View this thread: http://www.excelforum.com/showthread...hreadid=384157

Workbooks are files - therefore, you would work with files. Cutting and
pasteing really are not concepts associated with workbooks.

However, you could be using faulty terminology. For instance "a specific
workbook for a specific file" seems ill constructed.

--
Regards,
Tom Ogilvy

"short_n_curly"
wrote in message
news:short_n_curly.1rlbua_1120388702.4908@excelfor um-nospam.com...

basically based upon a condition i want to select a specific workbook
for a specfic file (which i already have the code for) and paste it
into another file for archived data
is there a code from within a worksheet that will select a workbook cut
it and paste it into another file? or is it not possible to select a
workbook cut it and paste it, the only options available seem to be
activate or open the workbook but not cut and paste

many thanks


--
short_n_curly
------------------------------------------------------------------------
short_n_curly's Profile:
http://www.excelforum.com/member.php...o&userid=21576
View this thread: http://www.excelforum.com/showthread...hreadid=384157

You could be meaning to copy a worksheet from one workbook to another
perhaps?

--

HTH

RP
(remove nothere from the email address if mailing direct)


"short_n_curly"
wrote in message
news:short_n_curly.1rlbua_1120388702.4908@excelfor um-nospam.com...

basically based upon a condition i want to select a specific workbook
for a specfic file (which i already have the code for) and paste it
into another file for archived data
is there a code from within a worksheet that will select a workbook cut
it and paste it into another file? or is it not possible to select a
workbook cut it and paste it, the only options available seem to be
activate or open the workbook but not cut and paste

many thanks


--
short_n_curly
------------------------------------------------------------------------
short_n_curly's Profile:
http://www.excelforum.com/member.php...o&userid=21576
View this thread: http://www.excelforum.com/showthread...hreadid=384157

it woks like this if cell c3 = "Archived" then
workbooks(range(d3)).value is cut from file
ChDir "C:\Documents and Settings\Carl\Desktop\Personal Training
Clients"
and is pasted into file
ChDir "C:\Documents and Settings\Carl\Desktop\Archived Files"

can i cut the workbook (i.e this workbook is not open) this code comes
from a seperate workbook, what i am asking is that i have the code to
rename files based upon cell contents and even code to open workbooks
in the same way but there seem to be no option to cut the workbook and
paste it into the desination folder, can this be done

hope this breakdown helps thanks for the replies so far keep them
coming please:)


--
short_n_curly
------------------------------------------------------------------------
short_n_curly's Profile: http://www.excelforum.com/member.php...o&userid=21576
View this thread: http://www.excelforum.com/showthread...hreadid=384157

We use this basic one for file moves. Cant find the better coded macro, but
this will get you by:
--------------------------
Dim fso2
Dim DestPath, SourcePath, CurrentFileName As String

Set fso2 = CreateObject("Scripting.FileSystemObject")
DestPath = Range("$C$2").Value 'Destination File Path
SourcePath = Range("$C$4").Value 'Source File Path
Range("$K$3").Activate 'This would be your C3 cell.
Do 'U may not need this loop as you may only be copying one file
CurrentFileName = ActiveCell.Value
fso2.CopyFile SourcePath & CurrentFileName & ".xls", DestPath
ActiveCell.Offset(1, 0).Activate
If ActiveCell.Value = Empty Then Exit Do
Loop
------------------------------------------------


"short_n_curly" wrote:


it woks like this if cell c3 = "Archived" then
workbooks(range(d3)).value is cut from file
ChDir "C:\Documents and Settings\Carl\Desktop\Personal Training
Clients"
and is pasted into file
ChDir "C:\Documents and Settings\Carl\Desktop\Archived Files"

can i cut the workbook (i.e this workbook is not open) this code comes
from a seperate workbook, what i am asking is that i have the code to
rename files based upon cell contents and even code to open workbooks
in the same way but there seem to be no option to cut the workbook and
paste it into the desination folder, can this be done

hope this breakdown helps thanks for the replies so far keep them
coming please:)


--
short_n_curly
------------------------------------------------------------------------
short_n_curly's Profile: http://www.excelforum.com/member.php...o&userid=21576
View this thread: http://www.excelforum.com/showthread...hreadid=384157