add hot keys to keyboard vb or macro

[shrinivasmj]

hi,

i need to add macro or vb to assign text to keyboard ,when i click once ALTand then 1 to 10
need to paste in word or excel this text below .

ATL then 1 =$#AI1. TO 200 need to paste below text in word or excel .

[TABLE="width: 69"]
<tbody>[TR]
[TD]$#AI1.
[/TD]
[/TR]
[TR]
[TD]$#AI2.
[/TD]
[/TR]
[TR]
[TD]$#AI3.
[/TD]
[/TR]
[TR]
[TD]$#AI4.
[/TD]
[/TR]
[TR]
[TD]$#AI5.
[/TD]
[/TR]
[TR]
[TD]$#AI6.
[/TD]
[/TR]
[TR]
[TD]$#AI7.
[/TD]
[/TR]
[TR]
[TD]$#AI8.
[/TD]
[/TR]
[TR]
[TD]
$#AI9.

need to select from a to z

CTRL + a then 1

[TABLE="width: 48"]
<tbody>[TR]
[TD="width: 64, bgcolor: transparent"]$#a1,
[/TD]
[/TR]
[TR]
[TD="bgcolor: transparent"]$#a2,
[/TD]
[/TR]
[TR]
[TD="bgcolor: transparent"]$#a3,
[/TD]
[/TR]
[TR]
[TD="bgcolor: transparent"]$#a4,
[/TD]
[/TR]
[TR]
[TD="bgcolor: transparent"]$#a5,
[/TD]
[/TR]
[TR]
[TD="bgcolor: transparent"]$#a6,
[/TD]
[/TR]
[TR]
[TD="bgcolor: transparent"]$#a7,
[/TD]
[/TR]
[TR]
[TD="bgcolor: transparent"]$#a*8,
[/TD]
[/TR]
[TR]
[TD="class: xl65, bgcolor: transparent"]$#a*9,
[/TD]
[/TR]
[TR]
[TD="class: xl65, bgcolor: transparent"]$#a*10,

regards
srinivas
[/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[/TR]
</tbody>[/TABLE]