C++操作EXCEL，翻译VB宏碰到的 With 的问题

[void_main_void]

With Selection.ShapeRange(1).TextFrame2.TextRange.Characters(1, 9).Font.Fill
        .Visible = msoTrue
        .ForeColor.ObjectThemeColor = msoThemeColorText1
        .ForeColor.TintAndShade = 0
        .ForeColor.Brightness = 0
        .Transparency = 0.6800000072
        .Solid
    End With

碰到上面，我确定拿到正确的 Fill 的指针，然后开始对 Visible设置值的时候。

VARIANT param3;
        param3.vt = VT_BOOL ;
        param3.boolVal = -1; 
        hr = OLEMethod(DISPATCH_PROPERTYGET, NULL, pFill, L"Visible", 1, param3) ;
        if (hr != S_OK)
        {
            goto EXIT ;
        }

在OLEMethod中调用

 hr = pDisp->Invoke(dispID, IID_NULL, LOCALE_SYSTEM_DEFAULT, nType, &dp, pvResult, NULL, NULL) ;

返回的结果却是 “0x80020011 不支持集合”

有了解这是为何的吗

[赵4老师]

https://www.baidu.com/s?wd=0x80020011%20不支持集合

[Guan975]