Hello,

Please consider the following vba code:

    Range(Cells(NewRow_TopLeftCorner, 13), Cells(NewRow_BotRightCorner, 13)).Select
    
    Selection.Borders(xlDiagonalDown).LineStyle = xlNone
    Selection.Borders(xlDiagonalUp).LineStyle = xlNone
    Selection.Borders(xlInsideVertical).LineStyle = xlNone
    With Selection.Borders(xlEdgeLeft)
        .LineStyle = xlContinuous
        .ThemeColor = 1                                
        .TintAndShade = -0.499984740745262
        .Weight = xlThick 'xlThin
    End With
The color of the border the above code produces is a dark grey. But I really wanted the color of my borders to be a specific color
such as:

"Olive green Accent 3 Darker 25%"

What is to be assigned to .ThemeColor in order to achieve the desired color?


Thanks all for your help!
rn