| |
▼まゆ さん：
おはようございます
kanabunさんからもアドバイスがありますが、落ち着いて状況を
整理されたらいいと思います。
・オブジェクトとは具体的に何？
・エラー発生するコードは？
・エラーメッセージは報告されたものと同じ？
等々
おそらくはシート上に貼り付けた図形（ボタン等も含む）のことだろうと想像します。
その図形を、どのように指定して参照しておられるのか不明ですが、たとえば
Rectangle 1 という四角形があって、その参照を Shapes("Rectangle 1") とする場合
ＶＢＡの基本としては、シートオブジェクト.Shapes("Rectangle 1") というように
必ずシート修飾をしてやる必要があります。
これがないと、エラー。（ただし、メッセージは報告されたものとは違うと思いますが）
【例外】として、シートモジュールでは、シート修飾せず Shapes("Rectangle 1") でも
参照可能ですが、私の場合は、シートモジュールであっても Me.Shapes("Rectangle 1")
というようにシートを明示しています。
エラーメッセージから推測するに、シート修飾はしておられるような気もします。
ただ、もしかして ActiveSheet.Shapes("Rectangle 1") といった記述かな？
そうであれば、実行時に、たまたまアクティブになっていおるシートにShapes("Rectangle 1")
がなければエラーになりますね。（でも、この場合もメッセージは微妙に異なると思いますが）
|
|
UO3
- 11/3/29(火) 10:43 -
