![]() |
clipbourd
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 |
clipbourd
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 |
clipbourd
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 |
clipbourd
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 |
All times are GMT +1. The time now is 06:57 PM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com