人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

【再質問】下記のマクロを実行した所

http://q.hatena.ne.jp/1215222879

r As Long で“コンパイルエラー”同じ適用範囲内で宣言が重複しています。
というエラーが出てしまいました。

ここを削除してみた所、デバックエラーになり

endRow = DataSheet. Range("B9").End(xlDwon).Row

が“アプリケーション定義またはオブジェクト定義エラー”になってしまいます。

これを解決する方法を教えて下さい。



●質問者: mokachan
●カテゴリ:コンピュータ 学習・教育
✍キーワード:as アプリケーション エラー オブジェクト クエ
○ 状態 :終了
└ 回答数 : 2/2件

▽最新の回答へ

1 ● きゃづみぃ
●65ポイント

最初の質問のほうで

Set PrintSheet = Worksheets("A")

Set PrintSheet = Worksheets("B")


とやってますね。

もしかしたら DataSheetの Setが なかったりしませんか?

Mookさんの回答では

Set DataSheet = Worksheets("A") '★★★ どっちかはデータシート?:とりあえずAを変更

とやってますが、これを修正して

Set PrintSheet = Worksheets("A") '★★★ どっちかはデータシート?:とりあえずAを変更

とかにしていませんか?

◎質問者からの返答

ありがとうございます。

確かめたら、最初の質問の入力が間違っていて、マクロ上ではきちんと”B”はDataSheetに定義してあるんです。

その他の原因は何だか分からないんです・・・


2 ● falcon2
●5ポイント

書いた人に1ポイント送信でメールをすると気づくと思います。

◎質問者からの返答

意味が分かりません

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ