Disable clipboard warning

[tombrown]

I use a macro to copy & paste data from one file to the other (code below). How do I disable the warning "There is a large amount of information in the clipbopard ..." when the macro closes the file I have copied from?

    Workbooks.Open Filename:= "C:\A_Work\Aug.xls"
    Sheets("Data").Select
    Range("A1:L999").Select
    Selection.Copy
    Windows("Current Version.xls").Activate
    Sheets("Aug Data").Select
    Range("A1").Select
    ActiveSheet.Paste
    Windows("Aug.xls").Activate
    ActiveWindow.Close (False)

 

[Norie]

Try this.

Dim wbThis As Workbook
Dim wbOpen As Workbook

    Application.DisplayAlerts = False
    Set wbThis = ThisWorkbook
    Set wbOpen = Workbooks.Open(Filename:="C:\A_Work\Aug.xls")
    
    wbOpen.Sheets("Data").Range("A1:L999").Copy wbThis.Sheets("Aug Data").Range("A1")
    wbOpen.Close (False)
    Application.DisplayAlerts = True

 

[tombrown]

thanks - perfect