• ベストアンサー

エクセルのマクロについてです。

マクロを作ったのですが、実行させようとすると『実行時エラー1004』というのが出て、うまく実行できません。微妙な操作(一つのセルをソートして選択すると実行できます)をすると実行出来ますが、毎回上記のエラーが出てしまいます。これを解消するにはどうすればよいでしょうか?

質問者が選んだベストアンサー

  • ベストアンサー
noname#15459
noname#15459
回答No.3

vba実行時エラー1004で検索して参考にするのもよいかもね 自作のマクロでしたらコードをここにコピーされるとよい回答をいただけるとおもいますよ

その他の回答 (2)

noname#18558
noname#18558
回答No.2

デバッグして、エラー原因を取り除いてください。 と、しか言えません。

  • merlionXX
  • ベストアンサー率48% (1930/4007)
回答No.1

そのマクロのコードを書かずに解消する方法を教えられる人がいるわけないとおもいますが。

関連するQ&A

  • Excel マクロについて

    Excelで、セルを選択して、マクロを実行すると、その選択したセルに赤マル(オートシェイプの)がはいるようなマクロをつくりたいのですが・・・。まだ、マクロは使ったことが無いもので・・・。詳しくお願いします。

  • マクロ(エクセル)を利用しての貼付

    マクロを利用して、既定のセル(例:A1)に貼付は出来るのですが、マクロを実行するときに、貼付したいセルを選択後(毎回違ったセル)に貼付できるマクロはどのようにして作るのでしょうか。  どなたかご存知の方がいらっしゃいましたらご回答をお待ちしております。

  • エクセルのマクロですが

    現在選択しているセルから10行下のセルまでを選択状態にするマクロを知りたいのですが。 (現在A5を選択している時に実行すると、A5からA15までが選択状態になります) よろしくお願いします。

  • EXCELのマクロ。セルが選択されているかどうか。

    Excel2000のVBAでセルが選択されているかどうかチェックしてセル以外の画像などが選択されていればエラーメッセージ、そうでなければマクロを実行させるにはどう書けばいいのでしょうか?

  • エクセル,マクロのTrimの使い方

    エクセル2000を使っているのですが,マクロの使い方がよくわかりません. コピーペーストしてきた大量の文字行列の先頭末尾に余分な空白があって正しくソートされません.そこで,Trimを使おうと思ったのですが,使い方がいまいちよくわからず,エラーが出て実行できません. また,重複した内容のセルを抽出・削除もしたいのです. どうぞ教えてくださいm(_ _)m

  • エクセルのマクロ

    B1をコピー⇒ブラウザの検索窓に貼り付け→エクセルに戻る B2をコピー⇒ブラウザの検索窓に貼り付け→エクセルに戻る B3を・・・という作業を自動化したいです。 B1~B?までを一括で選択してコピーという作業をマクロで自動化する方法はわかるのですが 上記の作業を簡単にする方法がわかりません。 B1→ブラウザ→B2を選択してマクロの表示ボタンをクリックして、右上にあるマクロの表示ボタンからポップアップウィンドウのマクロ画面の実行ボタンを押して~ というのをやっていたら、普通に「Ctrl+C」でコピーしたほうが早いと思います。 同じ操作を複数のセルに別々に実行したい場合、その別々を1個1個実行しているのは アホらしいです。 なにか方法はないでしょうか

  • エクセルマクロ

    やりたいことは、毎回更新されて開くエクセルCSVの画面で、自分仕様にマクロの記録を行い、(枠固定や、セルの幅変更、色を付けておいたり)、そして再度 更新されたエクセルCSV画面がを開かれたときに、前回記録したマクロ設定された状態で開きたい。 現在は、CSVファイルが開かれると、自分の見やすいように操作して見ているのですが、これをいったん閉じて(毎回更新される内容なので保存しないで閉じています) またCSVファイルを開くとき繰り返し自分の見やすいように操作してから見ていますが、この見やすいようにする操作を毎回行わず設定するやり方を教えてください。 パソコンは詳しくないです、プログラムみたいな画面はさっぱりわかりません。 ちなみに、毎回更新されて開くCSVエクセルファイルは、フィルター選択で自分の見たい部分を選択して見ています。 職場で使用しているのでなるべくはやく解決したいです。

  • エクセルマクロでご教授下さい。

    エクセルマクロでご教授下さい。 1.あるマクロをセルを入力(Enter)したら実行するには どのように記述すればいいでしょうか? 例えばG12に文字を入力しEnterした時 に実行したい。 2.あるマクロをシートを選択した時に実行するには どのように記述すればいいでしょうか? 以上宜しくお願い致します。

  • エクセルで特定のセルを選択したい(マクロ)

    以下のようなマクロを組もうとしていますが、出来ません。 sheet1において 1)マクロを実行すると、メッセージボックスが出る。 2)メッセージボックスに入力した文字と同じ文字が入力されているセルを選択する。 3)2)のセルの1行下のセルを選択する。 2)で必ずエラーが出てしまいます。どのような方法が良いのか教えていただけるとありがたいです。よろしくお願いします。

  • 削除のマクロ(エクセル)

    Sub test()  Selection.Delete  Selection.Interior.ColorIndex = xlNone  Selection.Borders(xlDiagonalDown).LineStyle = xlNone  Selection.Borders(xlDiagonalUp).LineStyle = xlNone  Selection.Borders(xlEdgeLeft).LineStyle = xlNone  Selection.Borders(xlEdgeTop).LineStyle = xlNone  Selection.Borders(xlEdgeBottom).LineStyle = xlNone  Selection.Borders(xlEdgeRight).LineStyle = xlNone  Selection.Borders(xlInsideVertical).LineStyle = xlNone  Selection.Borders(xlInsideHorizontal).LineStyle = xlNone  Selection.ClearContents End Sub 上記マクロは、まず図形が選択状態にある時はそれを削除します。 また、セルが選択状態にある時は、選択範囲内の文字を消し、罫線を消し、塗りつぶしの色を消します。 上記マクロを実行すると不具合が生じます。 選択範囲外のデータが消えたり、選択範囲外のセルが移動したりしてしまいます。    c5 d5 e5 f5    c6 d6 e6 f6    c7 d7 e7 f7    c8 d8 e8 f8 上記の全てのセルにデータが入力されている場合、d6:e7を選択してマクロを実行すると、d6:e8のデータが消えてしまいます。 d6:d7を選択してマクロを実行すると、d6:e7のデータが消える上にf6:f7が一セル分左に移動してしまいます。 マクロ内の"Selection.Delete"をコメントにして実行すると不具合は生じることなく、選択範囲内のデータだけに作用させることができます。 ただ、"Selection.Delete"を外すと、「図形が選択されている時は図形を削除する」ができなくなります。 どのようにマクロを修正すれば、セルのデータと図形のそれぞれを不具合なく削除させることができるでしょうか?