Please how do I WRITE THIS IN VBA

<p class=QMultiChoice><![if !supportLists]><span style='mso-bidi-font-family:


"Times New Roman"'><span style='mso-list:Ignore'>1.<span style='font:7.0pt "Times New Roman"'>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
</span></span></span><![endif]>What does this <!--[if gte vml 1]><v:shapetype
id="_x0000_t75" coordsize="21600,21600" o:spt="75" oreferrelative="t"
path="m@4@5l@4@11@9@11@9@5xe" filled="f" stroked="f">
<v:stroke joinstyle="miter"/>
<v:formulas>
<v:f eqn="if lineDrawn pixelLineWidth 0"/>
<v:f eqn="sum @0 1 0"/>
<v:f eqn="sum 0 0 @1"/>
<v:f eqn="prod @2 1 2"/>
<v:f eqn="prod @3 21600 pixelWidth"/>
<v:f eqn="prod @3 21600 pixelHeight"/>
<v:f eqn="sum @0 0 1"/>
<v:f eqn="prod @6 1 2"/>
<v:f eqn="prod @7 21600 pixelWidth"/>
<v:f eqn="sum @8 21600 0"/>
<v:f eqn="prod @7 21600 pixelHeight"/>
<v:f eqn="sum @10 21600 0"/>
</v:formulas>
<vath o:extrusionok="f" gradientshapeok="t" o:connecttype="rect"/>
<o:lock v:ext="edit" aspectratio="t"/>
</v:shapetype><v:shape id="_x0000_i1029" type="#_x0000_t75" style='width:168pt;
height:168.75pt'>
<v:imagedata src="1_files/image001.jpg" o:title="bank"/>
</v:shape><![endif]--><![if !vml]><img width=224 height=225
src="1_files/image001.jpg" v:shapes="_x0000_i1029"><![endif]>diagram represent?
</p>

<p class=CorrectAnswer><![if !supportLists]><span style='font-family:Wingdings;
mso-fareast-font-family:Wingdings;mso-bidi-font-family:Wingdings;color:green'><span
style='mso-list:Ignore'>þ<span style='font:7.0pt "Times New Roman"'> </span></span></span><![endif]><span
class=SpellE>Abn</span>
</p>

<p class=IncorrectAnswer><![if !supportLists]><span style='font-family:Wingdings;
mso-fareast-font-family:Wingdings;mso-bidi-font-family:Wingdings;color:maroon'><span
style='mso-list:Ignore'>ý<span style='font:7.0pt "Times New Roman"'> </span></span></span><![endif]><span
class=SpellE>Mnu</span>
</p>

<p class=CorrectAnswer><![if !supportLists]><span style='font-family:Wingdings;
mso-fareast-font-family:Wingdings;mso-bidi-font-family:Wingdings;color:green'><span
style='mso-list:Ignore'>þ<span style='font:7.0pt "Times New Roman"'> </span></span></span><![endif]><span
class=SpellE>Klm</span></p>

<p class=QNumerical><![if !supportLists]><span style='mso-bidi-font-family:
"Times New Roman"'><span style='mso-list:Ignore'>2.<span style='font:7.0pt "Times New Roman"'>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
</span></span></span><![endif]><span class=SpellE>mpnInsert</span> Numerical
Question here</p>

<p class=IncorrectAnswer><![if !supportLists]><span style='font-family:Wingdings;
mso-fareast-font-family:Wingdings;mso-bidi-font-family:Wingdings;color:maroon'><span
style='mso-list:Ignore'>ý<span style='font:7.0pt "Times New Roman"'> </span></span></span><![endif]><o>&nbsp;</o></p>