Использование VBA не может включить двойное подчеркивание ячейки

Question

Я написал (мой первый VBA) код, чтобы суммировать столбец чисел и нарисовать одну тонкую границу вокруг него, но я хотел бы поставить двойное подчеркивание ниже общей ячейки. Кажется, все работает, за исключением двойного подчеркивания. Вот как я думал, что это сработает ...

rng.Parent.Cells(iRow, iCol).Borders(xlEdgeBottom).LineStyle = XlLineStyle.xlDouble

Боюсь, что на работе есть большие силы, которые я не понимаю, но я не хочу уходить. Кто-нибудь может помочь, пожалуйста?

Заранее спасибо, Дан

Answer 1

Вы можете записать макрос («Просмотр»> «Макросы») и просмотреть сгенерированный код, чтобы увидеть, что может отсутствовать.

With rng.Worksheet.Cells(iRow, iCol).Borders(xlEdgeBottom)
    .LineStyle = xlDouble
    .ColorIndex = 0
    .TintAndShade = 0
    .Weight = xlThick
End With