Auto-populate receipt numbers from a separate worksheet

Upload a dummy spreadsheet with some information (fake info) of what is being worked with.

It would best if you could upload a sample workbook (non-sensitive, dummy data) so we have idea of what the receipt numbers are like.

However, perhaps this idea will help.

Index match formula to find next item based on last receipt.
=INDEX(Sheet2!D1:D23,MATCH(Sheet1!E2,Sheet2!D1:D23,0)+1)

See if the attached is what you intended.
This code . . .
Checks to see that an entry exists for the "Received From" line, if not it prompt for an entry then exits the macro.

If there is an entry for "Received From", this name is written to the Receipt log adjacent to the current receipt number, then the next receipt number is populated into the cell.

Changes made to the sheet to accommodate the VBA code.
Removed merged cells on sheet1 and sheet2. These cause problems for VBA code.
Deleted the rectangular shape objects and shaded the cells to give the same appearance.

Option code included to print out the receipt and to clear the form for new entries (though I did not clear code to clear entries below the Amount Received. This code is "turned off". See comments in code for how to "turn on" this option.

Please Login or Register  to view this content.