Код ниже дает мне код ошибки 6 overflow. Когда я нажимаю ok на ошибке, файл открывается. Я использую этот же код для открытия других книг в этом макросе, и они в порядке. Я перемещаю файл в свое место, и это сработало. BBut при попытке загрузить его из сетевого шлюза он терпит неудачу. Я обязательно очищу свои переменные, прежде чем повторно их использовать.
ОШИБКА 6 - проблема переполнения
Dim xlWorkbook2 As Excel.Workbook
Dim FILEPATH As String
FILEPATH = "C:\\Daily Remit History Data\dailycashtran.xlsx"
Set xlWorkbook2 = Workbooks.Open(FILEPATH)
Почему двойная косая черта? –
Помимо двойного косая черта в FILEPATH, нет ничего явно неправильного в этом бите, если код. Даже с двойной косой чертой или предположив, что файл Excel, который вы открываете, может быть поврежден, трудно понять, как из этого кода может возникнуть ошибка переполнения. Прошли ли вы с помощью отладчика и можете ли вы проверить, какая строка выдает ошибку? – RBarryYoung
Я прошел через него несколько раз, и его почти так же, как и его поиск, чтобы открыть файл. Как только я щелкнув ok на ошибке, файл откроется. –