I have searched the board. No one seems to have an answer for this. Any new updates? Sometimes it works, sometimes it doesn't. Is there something in a file that makes it not work?
Thanks for any insight!
Well, before I do that, I still want to make sure that I understand what is going on. I have 39 files that it opens, copies some info and pastes it into another worksheet (if the info is there). Then it closes the .xls file and goes onto the next. On the first 25 of the files the DisplayAlerts = false works. On the remaining 14 it does not. However, even if I switch the order, it still doesn't work on the remaining 14. I can't find a common denominator, yet in those 14 files that is not in the other 25.
Well, I can't find any volatile code, but there are charts in the workbooks. However there are also charts in the workbooks that skip the popup message. Here is my code. Anyway around the message asking me to save it?
Selection.Find(What:="end", After:=ActiveCell, LookIn:=xlValues, _
LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False).Activate
NumberOfFiles = ActiveCell.Row
For I = 1 To NumberOfFiles - 1
Filename = ActiveCell.Value
WorksheetName = ActiveCell.Value
Workbooks.Open Filename:="G:\analysis\MASTER\A\" & Filename
' Error handling if it can't find value
On Error GoTo err_chk
' Find value and copy cell under it
Cells.Find(What:="ROIC", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
' Go to new location and paste
Application.CutCopyMode = False
Application.DisplayAlerts = False
Application.DisplayAlerts = True