Hi, Im using
If Dir("I:\My Documents\Football Prediction\Soccer Predictions\data
2001\E0.csv") < "" Then
ActiveWorkbook.Worksheets.Add
Workbooks.Open Filename:= _
"I:\My Documents\Football Prediction\Soccer Predictions\data
2001\E0.csv"
Cells.Select
Selection.Copy
ActiveWindow.Close '------------------------
Workbooks("csvimport.xls").Activate
ActiveSheet.Paste
Application.CutCopyMode = False
End If
to open a workbook, copy the sheet and past to another workbook. At the
point of Activewindow.close I get 'large amount of data in clipboard do
you want to keep.....etc'. I choose yes, als ok. Is there a line of
code I can add to skip this.
Regards Robert

Try application.displayalerts = false



RobcPettit wrote:
Hi, Im using
If Dir("I:\My Documents\Football Prediction\Soccer Predictions\data
2001\E0.csv") < "" Then
ActiveWorkbook.Worksheets.Add
Workbooks.Open Filename:= _
"I:\My Documents\Football Prediction\Soccer Predictions\data
2001\E0.csv"
Cells.Select
Selection.Copy
ActiveWindow.Close '------------------------
Workbooks("csvimport.xls").Activate
ActiveSheet.Paste
Application.CutCopyMode = False
End If
to open a workbook, copy the sheet and past to another workbook. At the
point of Activewindow.close I get 'large amount of data in clipboard do
you want to keep.....etc'. I choose yes, als ok. Is there a line of
code I can add to skip this.
Regards Robert

Robert,

If below does not work try this link to Chip Pearson's site:
http://www.cpearson.com/excel/clipboar.htm

Hope one of these helps.

Alan
acampbell wrote:
Try application.displayalerts = false



RobcPettit wrote:
Hi, Im using
If Dir("I:\My Documents\Football Prediction\Soccer Predictions\data
2001\E0.csv") < "" Then
ActiveWorkbook.Worksheets.Add
Workbooks.Open Filename:= _
"I:\My Documents\Football Prediction\Soccer Predictions\data
2001\E0.csv"
Cells.Select
Selection.Copy
ActiveWindow.Close '------------------------
Workbooks("csvimport.xls").Activate
ActiveSheet.Paste
Application.CutCopyMode = False
End If
to open a workbook, copy the sheet and past to another workbook. At the
point of Activewindow.close I get 'large amount of data in clipboard do
you want to keep.....etc'. I choose yes, als ok. Is there a line of
code I can add to skip this.
Regards Robert

Thanks for your reply that has solved the issue.
Regards Robert
acampbell wrote:
Robert,

If below does not work try this link to Chip Pearson's site:
http://www.cpearson.com/excel/clipboar.htm

Hope one of these helps.

Alan
acampbell wrote:
Try application.displayalerts = false



RobcPettit wrote:
Hi, Im using
If Dir("I:\My Documents\Football Prediction\Soccer Predictions\data
2001\E0.csv") < "" Then
ActiveWorkbook.Worksheets.Add
Workbooks.Open Filename:= _
"I:\My Documents\Football Prediction\Soccer Predictions\data
2001\E0.csv"
Cells.Select
Selection.Copy
ActiveWindow.Close '------------------------
Workbooks("csvimport.xls").Activate
ActiveSheet.Paste
Application.CutCopyMode = False
End If
to open a workbook, copy the sheet and past to another workbook. At the
point of Activewindow.close I get 'large amount of data in clipboard do
you want to keep.....etc'. I choose yes, als ok. Is there a line of
code I can add to skip this.
Regards Robert