Функция разделения в будние дни дает 1 или 0

Question

У меня есть простая электронная таблица с именами собраний, организатором, днями недели, временем начала и продолжительностью собраний компании. Я использую функцию разделения, чтобы поместить дни недели в массив. Я уверен, что столбец c является правильным столбцом для списка дней. Но я не могу понять, почему функция разделения не работает правильно. Я помещу код объекта класса внизу. Как всегда, любая помощь будет принята с благодарностью. Код ниже.

Sub ExportToPPT()

'creates a new object for each BRE day/time combination
count = 0
For Each i In BREitems
    BREdaysString = Split(Cells(i.Row, "c").value, ",")          'This is where the split happens
    For j = 1 To UBound(BREdaysString)

        count = count + 1
        ReDim Preserve BREobjects(count)
        Set BREobjects(count) = New BREpptObjects

        With BREobjects(count)
            .BREname = Cells(i.Row, "a").value
            .BREcategory = Cells(i.Row, "b").value
            .BREdays = BREdaysString(j)                        'this is where the day is assigned to the object's property. This is a 1 or 0 currently. IDK why.
            .BREstartTime = Cells(i.Row, "d").value
            .BRElength = Cells(i.Row, "e").value
            .BREtimeRight = Right(Cells(i.Row, "d").value, 2)
        End With
    Next j
    Erase BREdaysString
Next i

for i = 1 to UBound(BREobjects)
    debug.print BREObjects(i).BREID
next i
.
.
.
'more code that does stuff....