Untitled
Greg
plain_text
a year ago
924 B
10
Indexable
' Step 5: Add unmatched transactions to exceptions with all info from columns A-H
If addedToExceptions Then
With exceptionsSheet
lastExceptionRow = .Cells(.Rows.Count, "A").End(xlUp).Row + 1
.Cells(lastExceptionRow, "A").Value = currentTransaction(0) ' Column A
.Cells(lastExceptionRow, "B").Value = currentTransaction(1) ' Column B
.Cells(lastExceptionRow, "C").Value = currentTransaction(2) ' Column C
.Cells(lastExceptionRow, "D").Value = currentTransaction(3) ' Column D (CUSIP)
.Cells(lastExceptionRow, "E").Value = currentTransaction(4) ' Column E
.Cells(lastExceptionRow, "F").Value = currentTransaction(5) ' Column F (Amount)
.Cells(lastExceptionRow, "G").Value = currentTransaction(6) ' Column G
.Cells(lastExceptionRow, "H").Value = currentTransaction(7) ' Column H
' Include other columns if necessary
End With
End IfEditor is loading...
Leave a Comment