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