Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


5066 / 13644 ツリー ←次へ | 前へ→

【52763】コントロール名が定義されていません。 れっくす 07/12/2(日) 14:46 質問[未読]
【52764】Re:コントロール名が定義されていません。 かみちゃん 07/12/2(日) 14:51 発言[未読]
【52765】Re:コントロール名が定義されていません。 れっくす 07/12/2(日) 15:03 回答[未読]
【52783】Re:コントロール名が定義されていません。 ichinose 07/12/3(月) 21:23 発言[未読]

【52763】コントロール名が定義されていません。
質問  れっくす  - 07/12/2(日) 14:46 -

引用なし
パスワード
   TextBoxなどのコントロールですがブックを開いている時は普通に認識して動作しています。閉じて終了する時にそのTextBoxが(General)などの変数があるの欄の中からなぜか消えてしまって、VBA本体が未定義の変数としてみなしているかのように「変数が定義されていません」のエラーを表示します。全てのコントロールがそうなるわけではありません。ちなみに Option Explicit を削除して試してみますとエラー内容が「オブジェクトが必要です」に変わってしまいました。開いているときは同じように問題はありません。

【52764】Re:コントロール名が定義されていません。
発言  かみちゃん  - 07/12/2(日) 14:51 -

引用なし
パスワード
   こんにちは。かみちゃん です。

> 「変数が定義されていません」のエラーを表示します。全てのコントロールがそ
> うなるわけではありません。ちなみに Option Explicit を削除して試してみ
> ますとエラー内容が「オブジェクトが必要です」に変わってしまいました。

エラーとなるコードを提示することはできませんか?

【52765】Re:コントロール名が定義されていません。
回答  れっくす  - 07/12/2(日) 15:03 -

引用なし
パスワード
   >エラーとなるコードを提示することはできませんか?

OptionButtonでのエラーを記します。
ダブルクリックしますと普通に_Click()が開きます。繰り返すのですが通常の動作は問題ありません。閉じて終了するときにComboBox_Chartlength_Change のところでOptionButton_chart1が反転してSubのタイトルが黄色にハイライトされます。
それから(General)ある変数の欄を見ますと閉じる前にあったOptionButton_chart1がそから消えてしまっているのです。

Private Sub OptionButton_chart1_Click()
 ThisWorkbook.SetChartParemeter "*****"
 Refresh_Chart "*****"
End Sub

Private Sub ComboBox_Chartlength_Change()
 ....
 If OptionButton_chart1.Value = True Then
  Refresh_Chart "*****"
  Disp_ChartData 2, 1, "******"
 ElseIf OptionButton_chart2.Value = True Then
 ....
End Sub

【52783】Re:コントロール名が定義されていません。
発言  ichinose  - 07/12/3(月) 21:23 -

引用なし
パスワード
   こんばんは。

>>エラーとなるコードを提示することはできませんか?

これは、コードの提示だけでは、全く情報が不十分なんです。


まず、不具合というのはWindowsやExcelのバージョンによっては、
同じことをしても発生しない場合があります。
よって、WindowsやExcelのバージョンを明記してください。

それから、不具合を再現させるための手順書を記述してください。
コード提示は、その一部に過ぎません。


例えば、
>
>OptionButtonでのエラーを記します。

このオプションボタンがどこに配置されているのか記述されていません。
投稿を見ている人のは、

Excelを起動しただけ状態です。そこには新規ブックが表示された状態です。

さて、ここからどんな準備をするのか(どこにどんなコントロールを配置するのか、
コントロールのプロパティに事前設定があるのか等)?

どんなプロシジャーをどこのモジュールに
記述し、入力データとして、何を準備し、どのような手順で操作するのか?

等を克明に記述し、記述したとおり操作すれば、誰でもれっくすさんが仰っている
エラーが発生するような手順書を記述してください。


私が昨日、同じエラーを体験したならば、さすがにピンときます。
が、そうでなければ、上記のような記述があった方が回答率はよっぽどアップすると思います。

さらには、この投稿のナレッジベースとしての完成度も増します。


>Private Sub ComboBox_Chartlength_Change()
> ....
> If OptionButton_chart1.Value = True Then
>  Refresh_Chart "*****"
>  Disp_ChartData 2, 1, "******"
> ElseIf OptionButton_chart2.Value = True Then
> ....
>End Sub

気になったところは・・・、

ComboBox_Chartlengthがシートに配置したコンボボックスだとしたら、
プロパティを何か設定していませんか?

ってことぐらいです、今のところは・・・。

5066 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free