大神们好：
我想用VB6.0+VSFlexgrid编一个出入库程序，遇到(“树形菜单”)单击不能注册的问题，望赐教。
附件中的Excel文件是目标效果。

谢谢，谢谢。虽然基础薄弱听得有些云里雾里，但我知道按上述步骤排除，一定是可行的。

我的问题应该在答案“4”中，我套用的Excel工作簿的代码
With .Controls.Add(Type:=msoControlButton)
    ..OnAction="'写入活动单元格 """.... """'"
end with
sub 写入活动单元格（s$）
    ....
end sub
然后，菜单能出来，点击后就提示宏不可用

斑竹，我说的“树形菜单”可能表述不当，实际上是三级箭头弹出菜单。控件引用的是“Microsoft Forms 2.0 Object Library”。
请问：如果我希望得到上述控件的弹出展开效果。
1、不换控件，怎么达到点击响应。
2、若确实要换，换啥引用合适。
再麻烦一下，谢谢！

因为表述不当，好像求助出现偏差，能不能帮忙指点指点，谢谢！