• ベストアンサー

一太郎マクロ

一太郎マクロにて置換の動作を実行する際 「文書頭から文書末までの検索文字列をすべて置換します。 　よろしいですか？」　【はい】【いいえ】 「〇個置換しました」【確認】 とメッセージウインドウが表示され、キー入力を求められます。 これを非表示にする方法をご教授願います。 VBAでいうところのApplication.DisplayAlerts=False の設定はできませんか？

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

  • ベストアンサー
  • kichi8000
  • ベストアンサー率41% (658/1581)
回答No.2

このコマンドを追加してください。 WarningMode（0） －－－－－－－－－－－ WarningMode（モードn） 機能 組込関数の中での警告メッセージを表示するかしないかを設定します。 引数 モードn 警告メッセージを表示するかしないかを数値で指定。 1 表示する 0 表示しない 説明 組込関数から出される警告メッセージを表示するかしないかのモードを設定します。(初期設定:表示する) －－－－－－－－－－－

shin_kwbt
質問者

お礼

ありがとうございます お陰様で作業が効率よく行えるようになりました 心からお礼を申し上げます

その他の回答 (1)

  • kichi8000
  • ベストアンサー率41% (658/1581)
回答No.1

どのコマンドでしょうか。 マクロバイザーのダイアログで関数タブからコマンド名を入力、ヘルプをクリックすると使い方がでます。

shin_kwbt
質問者

お礼

ご回答ありがとうございました

shin_kwbt
質問者

補足

マクロバイザーの関数 分類：検索の「ReplaceStringAll／文字全置換」 です。 この関数にメッセージウインドウを非表示にするオプションがないのです。

  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. オフィス系ソフト

関連するQ&A

  • マクロ実行中に警告やメッセージを表示しなくない。

    Excel2007を使用しています。 マクロ実行中に警告やメッセージを表示しなくないと思っております。 インターネットで調べましたところ、 マクロでは、 Application.DisplayAlerts = False と書けば良いと書かれておりまして、 実行したところメッセージが表示されなくなりました。 同じようなことをマクロを使用しなくても設定できると思い、 調べてみたのですが、うまく見つけれられませんでした。 どこで設定したら良いのでしょうか？ もし宜しければ、教えて頂けませんか？ 宜しくお願い致します。

  • Excel マクロ実行で急に砂時計マークで固まってしまいます。

    Excel マクロ実行で急に砂時計マークで固まってしまいます。 ●昨日までは問題なく動作してましたが、 　「下記マクロ実行」で「 ★部分 」で急に砂時計マークで固まってしまいます。 Windows XP　Home Edition SP3 Office XP Personal 2002 Excel 2002 ＰＣのＣドライブに対してでしたら、全く問題なく動作しますが、 外付けHD （ BUFFALO HD-HU2 ） に対してだけ●となってしまします。 E123.xls にマクロでなにも編集を加えない場合は、きちんと動作しますが、 E123.xls にマクロで編集した直後に実行しますと、必ず●となります。 マクロでなく、簡単な手作業で編集を加えた場合は、きちんと動作します。 どのようにすれば、問題なく動作するようになりますでしょうか？ 何卒、ご教示のほどをお願い致します。 '------------------------- Sub 変更せず閉じて開く_外付けHD() Application.ScreenUpdating = False Application.CutCopyMode = False 'コピモードを非表示にしておく Application.DisplayAlerts = False '確認メッセージを非表示にする Windows("E123.xls").Close Application.DisplayAlerts = True Workbooks.Open Filename:= _ "G:\A-HD-HU\Ex\あいう\2009\09\E123.xls"　'←★ここで固まってしまいます Windows.Arrange ArrangeStyle:=xlCascade Application.ScreenUpdating = True End Sub

  • 一太郎のマクロの書き方を教えてください

    一太郎のマクロを作ろうとしています（マクロの記録を手直しするぐらいしかできないズブ素人です）。いま作ろうとしているのは作ったテキストデータをゲラ刷りして校正する時にどこに改行マークが入っているか、改頁マークが入っているかをチェックできるように改行のところは△を挿入し、改頁のところには◎を挿入しようというものです。 改行を置換する作業をマクロの記録で分析したところ、改行は正規表現の\nで表しているので、改頁は正規表現の\fでいいのだろうと思って次のようなソースで作ってみたのですが、改行の方はうまく作動するのですが、改頁の方はエラーが起きてしまいます。どのように書いたら改頁マークを検索文字列としてとらえることができるのか教えてもらえると助かります。 ----- 文字全置換(.検索文字列="\n",.置換文字列="△"&"\n",.検索方向=3,.あいまい検索=0,.確認=0) 文字全置換(.検索文字列="\f",.置換文字列="◎"&"\f",.検索方向=3,.あいまい検索=0,.確認=0) -----

  • EXCELブックを保存しないで終了

    EXCEL2000で"A"というブックから"B"というブックを マクロのVBAから開きます。 両方のシートが開いた状態から,"B"のマクロより 両方のブック共に保存しないで、EXCEL自体終了するマクロ を"B"側に下のような感じで作成しました。 -------- EXCEL終了処理 ------------------ Application.DisplayAlerts = False ThisWorkbook.Saved = False Application.Quit ---------------------------------------- これで終了しようとすると、「"B"のブックを保存しますか？」というメッセージが表示されてしまいます。終了前のマクロ処理の中で"B"ブックを変更しているので、このようなメッセージが表示されると思うのですが、 Application.DisplayAlerts = False 命令は利かないのですか？ どなたか教えて下さい。宜しくお願い致します。

  • マクロ（VBA）を中断中は、検索と置換は機能しない

    エクセル２０１０です。 マクロ（VBA）を中断中は、検索と置換は機能しないのでしょうか？ VBAを中断させつつ、シート内を検索したいのですが、 うんともすんとも言いません。 マクロを実行してない時なら シート上に、ないならないとメッセージが表示されるはずなのですが、 マクロ中断中は表示されないのでしょうか？

  • Ｅｘｃｅｌマクロについての質問です。

    Ｅｘｃｅｌのマクロについての質問です。 マクロについての質問です。 以下のようなマクロを作成しました。 このマクロを動作させているのはこのマクロを作成したファイル上です。 Sub Macro9() Dim WBA As Workbook Dim WBB As Workbook Dim WSA As Worksheet Dim WSB As Worksheet Set WBA = Workbooks("Ａ") Set WBB = Workbooks("Ｂ") Set WSB = WBB.Worksheets("1") For i = 100 To 3000 Step 20 Worksheets.Add Before:=Worksheets("Sheet1") Dim k As String k = i ActiveSheet.Name = (k / 100) Set WSA = WBA.Worksheets(k / 100) WSB.Range("A1:AY30").Copy Destination:=WSA.Range("A1") WSA.Range("D4:I30").Clear WSA.Range("Q4:V30").Clear WSA.Range("AD4:AI30").Clear WSA.Range("AQ4:AV30").Clear Next i Application.DisplayAlerts = False Sheets("Sheet1").Delete Application.DisplayAlerts = True Application.DisplayAlerts = False Sheets("Sheet2").Delete Application.DisplayAlerts = True Application.DisplayAlerts = False Sheets("Sheet3").Delete Application.DisplayAlerts = True End Sub そこで質問ですが、このマクロを作動させると何のエラーの表示もなく最後まで動作は完了します。 ですが、シートの作成は30まで作成できてもその後のセルのコピー＆ペーストはなぜかシート6.8までしかできていません(7～30までのシートはシート作成はできているのですがコピペのみが実行されず空白のままになっています。) シートもコピペも両方ともシート30まで完了するにはどの点を改善すればいいのでしょうか？ 知恵が足りずどうしても直す事が出来ません。 長文申し訳ございませんが是非皆さまのお知恵をお貸しください。 宜しくお願い致します。

  • EXCEL　ブック単位の置換をマクロで実行したい

    EXCEL 2010を使用しています。 置換で以下の＞＞内の動作をマクロで作成しました。 ＞＞ 検索文字列　'C:\Program Files (x86)\Okasan Online Securities Co.,Ltd\岡三RSS\岡三RSS.xla'! 置換後の文字列　（上記の文字を削除したいので空白） 検索場所　ブック ＞＞ これですべて置換をすると２０００件ほどが置換されます。 この動作をマクロの登録時には普通に実行できたのですが、その後に作成したマクロを実行して同じ動作をやると、検索場所がブックにならずシートでしか置換できません。 以下の＞＞内がマクロの内容です。 どのようにすれば、検索場所がブックになるのでしょうか。 ＞＞ Sub すべて置換アドインパス名なし() ' ' すべて置換アドインパス名なし Macro ' ' Range("A55").Select Cells.Replace What:= _ "'C:\Program Files (x86)\Okasan Online Securities Co.,Ltd\岡三RSS\岡三RSS.xla'!", _ Replacement:="", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:= _ False, SearchFormat:=False, ReplaceFormat:=False ＞＞

  • WORDで書式などを利用して置換するマクロをつくりたいです

    　WORD2000で書式などをキーにして置換するマクロをつくりたいです。 　例）太字の文字列すべてを『♂』『♀』で囲む 　これをVBAで表記するにはどう書いたらよいでしょうか？

  • データの置換 エクセルの操作とVBAマクロ…???

    A列に 17:00 と表示されているセルを 16:45 に 置換したいです。 普通にエクセルの操作（編集からダイアログボックスを表示して）行うと普通に実行されるのですが、その操作を記録したマクロを実行しても何も起こらないのです。（エラーも出ません） VBAには↓のとおり記録されました。 Columns("A:A").Select Selection.Replace What:="17:00", Replacement:="16:45", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False 実は、17:00 と表示されているセルに入力されているデータは、17:00:00 であり、ユーザー定義の書式設定で h:mm の形式で表示されています。 元データの書式設定を 17:00:00 （時刻）に変えてもやはり同様で、エクセル操作ではうまくいきますがマクロだと何も起こりません。 試しに元データの書式設定を標準（シリアル値）に変えてやってみるとマクロでも置換されましたが、実際の業務では大変不便そうです。 マクロを実行する時にはユーザー定義や時刻の書式は認識されないのでしょうか？ それとも書式に原因を求めるのが間違ってるのでしょうか？

  • セレクションマクロでマクロ

    A列の４行目を選択した時に Sub マクロオフ() Application.EnableEvents = False End Sub B列の４行目を選択した時に Sub マクロオン() Application.EnableEvents = True End Sub が動作するようにお願いします 以降交互にC列がOFF・D列がON、E列がOFF・F列がON………と最終列までお願いします ※このマクロが実行するのは、すべて４行目だけに限定です

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する