Validation Error- Type Mismatch?

Hello all,

I have a validation button which runs through my spreadsheet and makes sure there is data in each cell. If a cell is missing data, an error message is entered into the last row.

Each row must be a specific type of data (ex. vendor- text, amount-currency, approval date- date) so I have defined each row as such in the class1 module (vendor as string, amount as double, approvedate as date). However, the error message is a string, so when I click the validate button, it only recognizes when data from the vendor row is missing. Any suggestions on how I can check that the data in the amount row is a currency, and the data in the approval date row is a date with my validation button?

I have attached my spreadsheet for reference. My code for the validation button is in Module1 and Class1. Thanks in advance for the help!

Excel Help Validate.xlsm

Thanks alot!

I adapted it a little, and ended up changing how I defined the columns in the class module to all strings, but the final outcome is just as I hoped it would be - that the validate checks if there is data in the cell, and then makes sure the data makes sense.

I have attached my updated spreadsheet for reference.

Excel Help Validate.xlsm

Thank you again!

Excel Help Validate.xlsm

CORRECT FILE!! (I attached the wrong one in my last post- sorry!)