sing VBA and Excel Create a table with 6 products and their prices in cells A1:A6 and B1:B6 in a sheet called Catalogue in your Excel file. Use message boxes and input boxes to carry out the following tasks: - Ask the user which item they want to buy. - If the item is not available, give an appropriate error message, Otherwise, ask if they want to buy something else. - Repeat the above until the user does not want to buy any more items. other items. You should keep a running total of the amount spent, the number of items bought and the price of the cheapest item bought. - If there are more than three items in total, discount the final cost by the price of the cheapest item. - If today is a Wednesday, apply a 5% discount and display the final price in a message box entitled "Discount Wednesday", a warning icon and the OK button. Otherwise, display the final price in a box titled "Final Price". (Date() is the VBA equivalent of TODAY().
using VBA and Excel
Create a table with 6 products and their prices in cells A1:A6 and B1:B6 in a sheet called Catalogue in your Excel file. Use message boxes and input boxes to carry out the following tasks:
- Ask the user which item they want to buy.
- If the item is not available, give an appropriate error message,
Otherwise, ask if they want to buy something else.
- Repeat the above until the user does not want to buy any more items.
other items. You should keep a running total of the amount spent, the number of items bought and the price of the cheapest item bought.
- If there are more than three items in total, discount the final cost by the price of the cheapest item.
- If today is a Wednesday, apply a 5% discount and display the final price in a message box entitled "Discount
Wednesday", a warning icon and the OK button. Otherwise, display the final price in a box titled "Final Price". (Date() is the VBA equivalent of TODAY().
![](/static/compass_v2/shared-icons/check-mark.png)
Step by step
Solved in 3 steps
![Blurred answer](/static/compass_v2/solution-images/blurred-answer.jpg)
![Database System Concepts](https://www.bartleby.com/isbn_cover_images/9780078022159/9780078022159_smallCoverImage.jpg)
![Starting Out with Python (4th Edition)](https://www.bartleby.com/isbn_cover_images/9780134444321/9780134444321_smallCoverImage.gif)
![Digital Fundamentals (11th Edition)](https://www.bartleby.com/isbn_cover_images/9780132737968/9780132737968_smallCoverImage.gif)
![Database System Concepts](https://www.bartleby.com/isbn_cover_images/9780078022159/9780078022159_smallCoverImage.jpg)
![Starting Out with Python (4th Edition)](https://www.bartleby.com/isbn_cover_images/9780134444321/9780134444321_smallCoverImage.gif)
![Digital Fundamentals (11th Edition)](https://www.bartleby.com/isbn_cover_images/9780132737968/9780132737968_smallCoverImage.gif)
![C How to Program (8th Edition)](https://www.bartleby.com/isbn_cover_images/9780133976892/9780133976892_smallCoverImage.gif)
![Database Systems: Design, Implementation, & Manag…](https://www.bartleby.com/isbn_cover_images/9781337627900/9781337627900_smallCoverImage.gif)
![Programmable Logic Controllers](https://www.bartleby.com/isbn_cover_images/9780073373843/9780073373843_smallCoverImage.gif)