"Headers" til Multicolumn comboboxes i VBA

Hej Eksperter,
jeg har nogle comboboxe i excel som jeg loader med nogle værdier fra en access db. Det gør jeg ved at at indlæse tabellerne i nogle 2.dimensionelle arrays. Nu er databasen blevet udvidet og jeg skal have flere kolonner i mine comboboxes og skal derfor indsætte kolonne overskrifter. Så hvordan gør man det ?
Min kode er ca. sådan.

  Do While Not rsSelect.EOF
            If j > 0 Then: ReDim Preserve myArray(0 To 3, 0 To j)
            myArray(0, j) = rsSelect.fields("protocolVersionID")
            myArray(1, j) = rsSelect.fields("protocolVersion")
            myArray(2, j) = rsSelect.fields("calcdataunit")
            myArray(3, j) = rsSelect.fields("rawdataunit")
            j = j + 1
            rsSelect.MoveNext
  Loop

  Me.ComboProtocolVersion.column() = myArray