SW API: BOM column width autofit method

Hello wise people, 

How do I  adjust column width to text  using VBA?
As you may know, I can quickly adjust column width and height manually by selecting the entire table and double-clicking the line between the columns + Shift: 
 

I want to create a macro for this. What is the easiest way to do it?

I can't find it here: IBomTableAnnotation Interface Members  or here: ITableAnnotation Interface Members

 

Thanks!