VBA初心者です。
文字列を置換しようと思い、マクロを記録したところ下記ソースになりました。
Sub Macro1()
Columns("D:D").Select
Selection.Replace What:="エリア:", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End Sub
このマクロを単体で動かすと問題なく動作するのですが、他シートにおいてあるボタンに登録して一番最初に実行すると「実行時エラー '1004'」が出てしまいます。
ネットで色々調べましたが、解決方法が分かりません。
宜しくお願い致します。
No.3ベストアンサー
- 回答日時:
#2です
#2の回答は間違いです、すいません
書式に関する引数は、EXCEL2002から追加されていました
私は、EXCEL2000を使用しているため#2でうまく行ったのですが
お詫びに、ちょっと調べてみました
下記のように括弧をつけたら、うまく行く可能性があります
自分のところで、テストできないのであくまで可能性があるだけですが
試してみてください
Sub Macro1()
Columns("D:D").Select
Selection.Replace(What:="エリア:", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False)
End Sub
括弧をつけてボタンに登録してみてください
うまく行かない場合は、ボタンに登録したマクロを提示していただければ
解決しやすいと思います
回答ありがとうございます。
>書式に関する引数は、EXCEL2002から追加されていました
こちらは私も把握しておりました。
ご教授頂いたマクロで無事に動作しました。
書式の指定に関して、もう少し調べてみようと思います。
ありがとうございました。
No.2
- 回答日時:
Sub Macro1()
Columns("D:D").Replace What:="エリア:", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
End Sub
に変更してみて
回答ありがとうございます。
無事にマクロが動きました。
なぜ検索・置換に書式に関する引数を入れるとエラーが出るのでしょうか?
宜しければ教えて頂けないでしょうか。
宜しくお願いします。
No.1
- 回答日時:
1)お使いのアプリケーションとバージョンは何でしょうか?
2)「単体で動かすと問題なく動作する」マクロは本当に上記の通りですか?
3)
>ネットで色々調べましたが、解決方法が分かりません。
ネットで調べられたのでしたらご存じでしょうが、「実行時エラー '1004'」と一口に申してもいろいろとあると存じます。
そのエラーに続く
アプリケーション定義またはオブジェクト定義のエラーです
とか
RangeクラスのSelectメソッドが失敗しました
とか。。。どんなメッセージが出ているのでしょうか?
回答ありがとうございます。
>1)お使いのアプリケーションとバージョンは何でしょうか?
エクセル2003 SP3です。
>2)「単体で動かすと問題なく動作する」マクロは本当に上記の通りですか?
はい、動作するソースからコピペしましたので間違いありません。
>ネットで調べられたのでしたらご存じでしょうが、「実行時エラー '1004'」と一口に申してもいろいろとあると存じます。
それが「実行時エラー '1004'」としか表示されなかったのです。
デバッグでどの箇所に問題があるのかは分かりましたが、解決方法が分かりませんでした。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルマクロで教えてください 2 2022/05/04 09:07
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/03/08 09:08
- Visual Basic(VBA) エクセルのマクロについて教えてください。 7 2023/07/04 09:18
- Excel(エクセル) エクセルVBAでオブジェクトが必要です 2 2022/09/10 16:37
- Visual Basic(VBA) マクロで最終行を取得してコピーしたい 3 2022/04/06 19:07
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/10/11 12:55
- Visual Basic(VBA) エクセルのマクロについて教えてください。 5 2023/06/02 08:44
- Excel(エクセル) エクセルのVBAにショートカットキーの割り当て 3 2022/07/13 14:19
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/10/13 08:41
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/06/01 14:45
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
複数のデータ系列の線の太さを...
-
ファイル名を今日の日付、時刻...
-
エクセルでツールバーに「縮小...
-
別ブックからユーザーフォーム...
-
エクセル2007 テキストボ...
-
VBA[Private Sub]のコードをシ...
-
エクセルシートをまとめて印刷...
-
エクセルで「ODBC Microsoft Ac...
-
Excel マクロでグラフの切取り...
-
ピボットグラフの書式の固定に...
-
cellsで特定の離れた範囲を選択...
-
最初の1回のみにボタンクリッ...
-
Pictures.Insertメソッド⇒Shape...
-
VBAでシートの保護をかける際に...
-
EXCELにクリップボードにある画...
-
VBAを使ってエクセルシート...
-
エクセルで日付のマクロをツー...
-
wordのマクロで縮小して貼り付...
-
コマンドプロンプトから操作し...
-
エクセル2010 Shapeをクリップ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
複数のデータ系列の線の太さを...
-
エクセルでツールバーに「縮小...
-
ファイル名を今日の日付、時刻...
-
cellsで特定の離れた範囲を選択...
-
Powerpointでランダムな数字の...
-
VBAに詳しい方教えてください。
-
VBA[Private Sub]のコードをシ...
-
VBAを使ってエクセルシート...
-
【ExcelVBA】クエリの更新とピ...
-
別ブックからユーザーフォーム...
-
ピボットグラフの書式の固定に...
-
Pictures.Insertメソッド⇒Shape...
-
エクセルシートをまとめて印刷...
-
どのドキュメントは暗号化され...
-
最初の1回のみにボタンクリッ...
-
エクセルワークシート上に印刷...
-
エクセル2007 テキストボ...
-
エクセルのマクロでSelection.S...
-
エクセルVBAで、画像の倍率を知...
-
VBAで棒グラフの色を変えたい
おすすめ情報