[[20020608210457]] 『実行時エラー1004 WorksheetクラスのSelect』(サクラ) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『実行時エラー1004 WorksheetクラスのSelect』(サクラ)

こんばんわサクラです。  またお世話になります。 

マクロ記録後マクロを実行させると 実行時エラー’1004’WorksheetクラスのSelect

メソッドが失敗しました。 とでました。 マクロは数式で引出した表の数値のみを取出し

貼り付けるだけです。 原因はそのシートが非表示のためと思いますが、

この非表示のものを貼り付ける(扱う)ことは可能でしょうか?


 こちら事務局です、もしできたら[記録したマクロ]のエラーの前後2−3行提示して

 いただけると、皆さんが答えやすいと思いますが(kazu)


実際にエラーになったマクロです。

シートの集計データを非表示にしています。最終的には両シートともに非表示して使いたいのです。  6/9、サクラ

Sub 貼り付け()

'

' 貼り付け Macro

' マクロ記録日 : 2002/5/30 ユーザー名 : xxxxx

'

'

    Sheets("集計データ").Select

    Range("B6:Z17").Select

    Selection.Copy

    Sheets("データリスト").Select

    Range("B6").Select

    Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _

        False, Transpose:=False

    Sheets("6ヶ月").Select

End Sub


 サクラさんが推測したとおり、確かにシートの非表示が問題のようです。

 Sheets("集計データ").Select の前に

 Sheets("集計データ").Visible = True を追加して、

 Sheets("6ヶ月").Select の後ろに

 Sheets("集計データ").Visible = false を追加してみてください。

半角カナが含まれていたので、表記を少しかえました。

 (kazu)


kazuさん     (サクラ)

 有難うございました。ご指摘の方法で解決できました。

次々と問題が出てきます。 これってきりがあるのでしょうか? そんな今日この頃です。


 解決できてよかったです。

 これってきりはありません。際限なく、落とし穴を用意して待ち構えています。

 当分[サクラ]さんの睡眠不足は続くでしょう。がんばってください。

 (kazu)

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.