Excel.XlColorIndexはRGB値ではなく、標準カラーパレットのインデックス値で持っています。インデックス値をRGB値に変換してみました。 Public Function ColorIndexToRGB(ByVal xlColorIndex As Integer) As Integer() Dim ht As New Hashtable ' ↓↓左からR…