タイトル : Re: (お礼)Re^6: VB6.0で作成したEXEから起動したパワーポイント上のレ点を監視したい 投稿日 : 2012/10/15(Mon) 19:20 投稿者 : 魔界の仮面弁士
If TypeOf sh.OLEFormat.Object Is MSForms.CheckBox Then ではなく、 If Not TypeOf sh.OLEFormat.Object Is MSForms.OptionButton _ And TypeOf sh.OLEFormat.Object Is MSForms.CheckBox Then にする必要があるかも知れません。 「TypeOf o Is MSForms.CheckBox」の条件式が、当方では何故か o が OptionButton の時 → False ではなく True o が CheckBox の時 → True となってしまったためです(他の環境はどうだろう?)。ただし、 「TypeOf o Is MSForms.OptionButton」の条件式の場合は o が OptionButton の時 → True o が CheckBox の時 → False となりました。 |