Почему gradient одноцветный (с белым) вместо двуцветного?

Set o = .Shapes.AddShape(9, Xs(i), Ys(i), 8, 10)
o.Fill.Transparency = 0.25
o.Fill.Visible = msoTrue
o.Fill.fillColor.RGB = RGB(255, 0, 0)
o.Fill.ForeColor.RGB = RGB(0, 0, 255)
o.Fill.BackColor.SchemeColor = 2
o.Fill.TwoColorGradient 1, 1
получаются красно-белые, а не красно-синие овальчики.

Примечание:
ой, строки o.Fill.fillColor.RGB = RGB(255, 0, 0) нету на самом деле (это я тут уже просто так-сяк пробую).

Примечание:
2007 никак не записывает в макрос такие изменения, увы, уж пробовал=)

Примечание:
Excel

Примечание:
Увы, все равно кросно белый. Собственно, именно так я и пробовал (вродь на msdn'е так написано было или в хэлпе, не помню уж).

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.