Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

64864 / 76732

←次へ　｜　前へ→


	【16445】Re:Withステートメント

かんきち - 04/7/28(水) 0:28 -


	引用なし

	パスワード

お返事ありがとうございます。
Setを使用するということで検索したところ某サイトで下記のような例文を
見つけました。
With ActiveSheet
　　Set g_Ball = .Shapes("ball")
　　Set g_Box = .Shapes("box")
End With
上記に習い

Dim A As Variant
With WorkSheets("マクロ")
　　Set A = .Shapes("ball")
End With
と記述したところ
「オブジェクトはこのプロパティまたはメソッドをサポートしていません」
と出て
Dim A As String
では「オブジェクトが必要です」とエラーが出てしまいます。
WorkSheets("マクロ")を代入するのは無理なのでしょうか？

0 hits

▼

【16441】Withステートメント かんきち 04/7/27(火) 23:41