Jeg ved ikke helt om du kan bruge dette her, måske jeg ikke helt har forstået dit spørgsmål?
Denne tæller hvor mange "Columns" der er i "ListView1"
Dim intColCount As Integer
intColCount = Me.ListView1.Columns.Count
Denne ligger alle bredderne sammen
Dim Col As ColumnHeader
Dim intTotalColumns As Integer
intTotalColumns = 0
For Each Col In Me.ListView1.Columns
intTotalColumns = intTotalColumns + Col.Width
Next