Record a macro which will ask the user for the department of an employee (through inputbox function) and then calculate percentage of employees from that department who are earning above $45,000 among all employees in the database? Set up criteria on Queries worksheet, and answer should be on Queries sheet in the cell indicated. Create macro button on Queries sheet. Macro should be self-sufficient including first clearing the criteria range. Create macro button Query worksheet.

Queries Worksheet:

Database Worksheet:  

Transcribed Image Text:

A D E F H K L M P Q R S T U V W I. Create Macro buttons for Question 1 and Question Z Below in Gray Area. Labei the macro button as Questoni ana Questionz. 2 Macro Questions Criteria 4 Q1 Put your answer in this cel 7 8 Years In n 9 Last Name New Salary 1 Emp ID First Name Department Division Salary Hire Date Birth Date Age Service New Salary 2 Birth Month 10 11 12 13 14 15 16 17 18 Q2 Put your answer in this cell 19 20 Years In 21 Emp ID Last Name First Name Department Salary Hire Date Birth Date Age New Salary 1 Division Service New Salary 2 Birth Month 22 23 24 25 26 27 28 Create Macro button for each question in "Database" worksheet. 29 A D E F H K L M P Q R S T U V W I. Create Macro buttons for Question 1 and Question Z Below in Gray Area. Labei the macro button as Questoni ana Questionz. 2 Macro Questions Criteria 4 Q1 Put your answer in this cel 7 8 Years In n 9 Last Name New Salary 1 Emp ID First Name Department Division Salary Hire Date Birth Date Age Service New Salary 2 Birth Month 10 11 12 13 14 15 16 17 18 Q2 Put your answer in this cell 19 20 Years In 21 Emp ID Last Name First Name Department Salary Hire Date Birth Date Age New Salary 1 Division Service New Salary 2 Birth Month 22 23 24 25 26 27 28 Create Macro button for each question in "Database" worksheet. 29

Answer rating: 100% (QA)

Option Explicit Sub viscell Dim VisibleCells As Range ... View the full answer