Hi, Shandara.
I've downloaded spreadsheet v87c and found a little bug concerning 'Import' button.
Sheet36, Line 110
list = Worksheets("Gear").Range("W90").value
Sheet36, Line 113
If Not Worksheets(sheet).Range(list).Find(bit, , , xlWhole) Is Nothing Then
First operator assigns value "Set" to variable 'list'.
This value causes error 1004 at line 113.
After following small patch code works correctly.
Sheet36, Line 110
list = Worksheets("Gear").Range("W91").value
list = "GunAmmoList" and no error at Line 113