Someone provided me with a code that almost works (problem is that it copies and pastes randomly):

" requires that you copied all 80+ files you want to extract data from in one folder (you need to provide the path name for the constant SOURCE_FOLDER). The macro opens each of the workbooks in that folder, extract the data from cell B1 and copy it to the next empty cell in column A of the active worksheet in the workbook you are running the macro from."

Option Explicit
Const SOURCE_FOLDER = "C:\..."
Sub AggregateDataFromFiles()
Dim fs As Object
Dim objFolder As Object
Dim objFolderName As String
objFolderName = SOURCE_FOLDER
Dim filePath As String
Dim objFile As Object

Dim targetWb As Workbook
Dim lastrow As Long
lastrow = 1
Set fs = CreateObject("Scripting.FileSystemObject")
Set objFolder = fs.GetFolder(objFolderName)
For Each objFile In objFolder.Files
filePath = objFolderName & "\" & objFile.Name
Set targetWb = GetObject(filePath)
targetWb.Worksheets(1).Range("B1").Copy Destination:=ActiveSheet.Range("A" & lastrow)
lastrow = lastrow + 1
targetWb.Close (False)
Next
End Sub
However, the copying and pasting is happening randomly into the summary sheet. But, I'd like that it grab the cell and paste it in the same order every time (from the first file in the folder, follower by the second etc.). Right now it's picking a random file in the folder that's specified and moving it into the column that's specified. Is there a way for it to copy first from the first file in the folder (the one at the very top of the folder window) followed by those below?