В конце использования электронной таблицы, когда пользователь желает покинуть файл, я хочу добавить окно сообщения с вопросом, желает ли человек экспортировать данные. Я добавил сообщение в порядке в разделе BeforeClose, однако данные не будут экспортироваться, если выбрано Да. Когда выбрано «Да», я получаю уведомление о том, что «Нижний индекс вне диапазона». Я хотел бы знать, почему это так.
Excel VBA, эта рабочая книга
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim Output As String
Output = MsgBox("Are you ready to export the data?", vbYesNo, "Data Export")
If Output = vbYes Then
Range("AJ" & Cells.Rows.Count).End(xlUp).Copy
Workbooks.Open Filename:="S:\US Div\Accounts\filename.xlsx"
Worksheets("Input P").Range("C7").Paste
End If
End Sub