Advanced Excel - Record PDF
Advanced Excel - Record PDF
Objective
Create, Record and Modify Macro in Excel
Apparatus Required
A working PC with MS Office
Procedure
Record a Macro
1. In the Code group on the Developer tab, click Record Macro.
2. Enter a name for the macro in the Macro name box, enter a shortcut key in the Shortcut
box, and description in the Description box, and then click OK to start recording.
3. Perform the actions that you want to automate.
4. On the Developer tab, click Stop Recording.
Modify a Macro
1. On the Developer tab, in the Code group, click Macros.
2. In the Macro name box, click the macro that you want to edit.
3. Click Edit, The Visual Basic Editor appears.
Result
Successfully completed and output is verified.
Exercise- 2
Objective
A B C D E F G
1
2
J. J BARNEY CATALOG SALES
TAX SALES TOTAL
CAT. NO PRICE ZONE POSTAGE
3 RATE TAX SALE
4 J43256 59.95 1.00
5 J43257 65.49 3.00
6 29.95 2.00
7 43.96 4.00
8 16.89 6.00
9 36.67 6.00
10 89.67 1.00
11 29.95 4.00
12 J43264 43.65 3.00
13
14 POSTAGE AND SALES TAX RATES
15 ZONE 1 2 3 4 5 6
16 POSTAGE 4 4.5 5 5.5 6 6.5
SALES TAX
17 RATE 0.08 0.06 0 0.04 0.05 0.07
1. Create the worksheet shown above.
2. Using HLOOKUP, Find POSTAGE based on ZONE.
3. Find TAX RATE based on ZONE.
4. Find SALES TAX, where SALES TAX=PRICE*TAX RATE.
5. Find TOTAL SALE, where TOTAL SALE=PRICE+POSTAGE+TAX RATE
6. Format all money columns for two-decimal places.
Apparatus Required
A working PC with MS Office
Procedure
1. Open Microsoft Office Excel, type the data in the worksheet.
2. Select cell D4 and type formula =HLOOKUP(C4,$A$15:$G$17,2) to find the POSTAGE based
on ZONE and drag downwards.
3. Select cell E4 and type formula =HLOOKUP(C4,$A$15:$G$17,3) to find the TAX RATE based
on ZONE and drag downwards.
4. Select cell F4 and type formula =B4*E4 to find the SALES TAX and drag downwards.
5. Select cell G4 and type formula =B4+D4+E4 to find the TOTAL SALE and drag downwards.
6. Select the PRICE, SALES TAX, and TOTAL TAX columns and Select Increase decimal or
decrease decimal options to adjust for two-place decimals.
Result
Worksheet is created and output is verified.
Exercise- 3
Objective
A B C D E F G H I J
Procedure
1. Open Microsoft Office Excel, type the data in the worksheet.
2. Select cell A7 and type a single quotes (‘) and then type 001250 and drag downwards.
3. Select cell F7 and type formula =E7*$D$4 to find Commission and drag downwards.
4. Select cell G7 and type formula =IF(C7="D",100,0) to find Car Allowance and drag
downwards.
5. Select cell H7 and type formula =D7*$D$3 to find Social Insurance Cut and drag downwards.
6. Select cell I7 and type formula =D7+F7+G7-H7 to find Monthly Salary and drag downwards.
7. Select cell J7 and type formula =VLOOKUP(C7,$E$22:$F$25,2) to find Position based on
Grade.
8. Select cell D15 and type formula =SUM(D7:D13) to find TOTAL and drag to cell E15.
9. Select cell D16 and type formula =AVERAGE(D7:D13) to find AVERAGE and drag to cell E16.
10. Select cell D17 and type formula =MAX(D7:D13) to find HIGHEST and drag to cell E17.
11. Select cell D18 and type formula =MIN(D7:D13) to find LOWEST and drag to cell E18.
12. Select cell D19 and type formula =COUNT(D7:D13) to find NO. OF EMPLOYEES.
Result
Worksheet is created and output is verified.