[[20190816144443]]　『Error424オブジェクトが必要です。』（じょこびっち）　ページの最後に飛ぶ

『Error424オブジェクトが必要です。』（じょこびっち）

VBA初心者です。過去にTektoronixが配布していたTekXLToolbar.xlaというエクセルファイルがあり、オシロスコープに繋いでその波形データを取得するマクロなのですが、フィルターモードを立ち上げた時に「Error424オブジェクトが必要です。」とメッセージが出ます。
追ってみるとフォームのfrmMesurementのUserForm_Initialize()の中のmedHourMin.Text = VBA.Format$(Now, "hh:mm AM/PM")の箇所で発生しているようです。Nowで現在の時間は取得出来ているのですがmedHourMin.TextはEmpty値になっていました。

当時の環境を作ってここまで動くようになったのですが、どうしても「Error424オブジェクトが必要です。」が表示されOKで消した後の挙動が少しおかしいです。メーカーが配布していたファイルなのでコードなどはいじらずに動くと考えており何かdllやらofficeで入れなければいけないようなものがあったのではと考えています。原因がわかる方いらっしゃらないでしょうか？VBAがまったくわからないのでどうすればいいのか困っています。
必要な情報があれば載せます。皆様よろしくお願いします。

下記にファイルがあります。
http://www.av.it.pt/medidas/data/Manuais%20&%20Tutoriais/18%20-%20Real%20Time%20Oscilloscope%2020Ghz/CD1/CD1/TekVISA/WinRoot/VXIpnp/WINNT/TekVISA/ExcelToolbar/

＜使用 Excel：Excel2003、使用 OS：WindowsXP ＞

 VBE→ ツール　→　参照設定　の　ダイアログボックスで　参照不可になっている
 ライブラリはありませんか？

 メーカーのサイトは調べましたか？

 frmMesurement　は　アドインプロジェクトのメンバでしょうか？

 アドインが表示用にロックされていないということは、それほど難しいこともやっていないと思いますが

 試しに

 medHourMin.Text = VBA.Format$(Now, "hh:mm AM/PM")

 これをコメントアウトしたらどうなるでしょう？
 現在時刻を表示させているだけのようです。

（渡辺ひかる） 2019/08/16(金) 16:11

アドバイスありがとうございます。確認してみました。
参照設定のダイアログで確認しましたが参照不可のライブラリはありませんでした。

frmMeasurementがアドインプロジェクトメンバかどうかの確認方法がわかりませんでした。

 medHourMin.Text = VBA.Format$(Now, "hh:mm AM/PM")
これをコメントアウトしたらError424も発生せず問題なく動きました。
前回コメントアウトさせた時は延々とデータを取得していたので
これとは別の問題だったようです。
とりあえずこの状態でやってみたいと思います。
ありがとうございました。
（じょこびっち） 2019/08/19(月) 11:18

コメント返信：

[ 一覧(最新更新順) ]

[[20190816144443]] 『Error424オブジェクトが必要です。』（じょこびっち） ページの最後に飛ぶ

[[20190816144443]]　『Error424オブジェクトが必要です。』（じょこびっち）　ページの最後に飛ぶ