投稿時間:2005/10/04(Tue) 11:11 投稿者名:YK
Eメール:
URL :
タイトル:Re: エクセルにて
こんにちは。 > VB6にてEXCELシートを開いた後にEXCEL内に表示されている > オプションボタン、チェックボックスの値の確認とドロップダウンリスト > の値の確認方法がわかりません。
試してみて下さい。
With xlSheet.OLEObjects("ComboBox1").object .AddItem "AAA" .AddItem "BBB" .AddItem "CCC" .AddItem "DDD" .Text = .List(0) End With リストの内容 With xlSheet.OLEObjects("ComboBox1").object For i = 0 To .ListCount - 1 Debug.Print .List(i) Next End With For Each obj In xlSheet.OLEObjects Debug.Print obj.Name & vbTab & obj.object.Value Next MsgBox xlSheet.OLEObjects("CheckBox1").object.Value MsgBox xlSheet.OLEObjects("OptionButton1").object.Value
|