Range.Width (Excel)

Devuelve un valor de tipo Double que representa el ancho de un intervalo en puntos.

Para establecer el ancho, use la propiedad ColumnWidth .

Dim dblWidth As Double
dblWidth = ActiveCell.Width