Here is my one-liner to get an idea:
# ЭКСЕЛ -- ГАД И
+ ОКРУГЛЯЕТ 

+62;ВЕТ!!!!!!!!!!!!!!!!
perl -MOLE -we "e->Selection->{Interior}->{Color}=245*256*256+255*256+
+255;print e->Selection->{Interior}->{Color}"
Unreadable comment is my untranslatable from Russian comments on how excel rounds color numbers.
Helper OLE.pm module is trivial:
#simple helper for oneliner to get active word, excel
#package OLE;
use Win32::OLE qw(CP_UTF8);
Win32::OLE->Option(CP=>CP_UTF8);
sub e {
return Win32::OLE->GetActiveObject('Excel.Application');
}
sub w {
return Win32::OLE->GetActiveObject('Word.Application');
}
sub ao {
return Win32::OLE->GetActiveObject(shift);
}
1;
Best regards,
Courage, the Cowardly Dog