Установить ширину колонки Excel из VB

Формулировка задачи:

Здравствуйте,
подскажите примерчик, который бы позволял из VB
изменять ширину столбца в Excel?

Решение задачи: «Установить ширину колонки Excel из VB»

textual
                            Листинг программы 
                        

                            Sub Макрос1()
<br><font color="green">'
<br>'</font> Макрос1 Макрос
<br><font color="green">' Макрос записан 05.04.2004 (1)
<br>'</font>
<br>'
<br>    Columns(<b><font color="green">"A:A"</font></b>).ColumnWidth = <b><font color="darkblue">40</font></b>.<b><font color="darkblue">14</font></b>
<br>    Columns(<b><font color="green">"B:B"</font></b>).ColumnWidth = <b><font color="darkblue">28</font></b>.<b><font color="darkblue">43</font></b>
<br>    Columns(<b><font color="green">"C:C"</font></b>).ColumnWidth = <b><font color="darkblue">20</font></b>
<br>    Columns(<b><font color="green">"A:A"</font></b>).ColumnWidth = <b><font color="darkblue">26</font></b>.<b><font color="darkblue">43</font></b>
<br><font color="blue">End</font> Sub
                        