Create and save a macro$-$enabled workbook.

Consider a simply fixed$-$fixed beam of length $L$ with uniformly distributed load $($UDL$)w.$ The beam is of rectangular section of $b,$ height $h$ and modulus $E.$

Setup a worksheet with highlighted $($yellow$)$ cells for the user to enter values for $L,b.h,$ and $w,$ and shaded $($light grey$)$ cells for calculated values for each of the following:

$2A$

Add an active $x$ drop down combo box populated with $mm,cm$ and $m.$ This box sets the units for $h,b$ and $L.$

Add a class module to your project named PayloadCalc

Add public properties to the class for $h,b,L,E$ and $w$ using appropriate data types.

Add methods to your class to calculate $A(m^2),s(m^3)I_x(m^4),M(Nm),V(kN),$ def $(mm),S_b($KPa$)$and $S_n($KPa$)$ which must be returned with a result based on the meters unit.

Add an Active$-$X or form button with caption "Calculate" to your worksheet which executes code work with the PayLoadCalc, object. When clicked the code will create a new instance of the PayLoadCalc, object and assign values to the new object properties for $h,b,L,E$ and $w$ from the spreadsheet, then using methods, populate cells containing $A(m^2),s(m^3)I_x(m^4),M(Nm),V(kN),$ def $(mm),S_b(KPa)$ and $S(KPa).$

Be sure to perform appropriate SI unit conversions, it is best to do this when you are either reading or writing values to the spreadsheet $($see Assessment guide for mm to m conversion example$).$

Your code must use functions to perform each of the calculations. See the assessment guide for some steps that can be useful solving the problem.

Lastly your code should perform a check to confirm the deflection is below a maximum which is determined to be L$/200,$ then put $"$OK$"$ or "Not OK$"$ into an adjacent cell to indicate this.

Check your calculations with the following values: