Как использовать «длинный» тип Color в VBA

Question

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

Как этот "длинный" цвет можно использовать в других ячейках без это должно быть преобразовано в RGB?Или нет другого пути?

temp = "I" & PortsNum 'Number of Cell
sh2.Range(temp).Interior.Color = tempcolors 'Color Value

Answer 1

Вы все еще можете использовать значения RGB в VBA для применения к ячейкам в Excel, я полагаю.Это может помочь

Dim clrBlue As Long

clrBlue = RGB(0, 0, 255)

Application.union(Range("A2"), Range("B3")).Interior.Color = clrBlue

Или вы можете использовать длинное значение:

Dim a As Long    
a = ActiveCell.Interior.Color
ActiveCell.Offset(1, 0).Activate
ActiveCell.Interior.Color = a