![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
いつもお世話になります。
OS Win10 エクセル 2016 です。
下記のvbaの 「置換」 を実行した後、
"J13:AN32"の範囲の画面が黒ずむので実行後その都度
「A11」をクリックして解消しています。
「置換」を実行した後は「A11」に戻るコードを下記のコードに追加したいのですがご指導いただけませんか。
よろしくお願いいたします。
参考
Sub 連続置換()
Range("J13:AN32").Select
With Selection
.Replace What:="n", Replacement:="日", LookAt:=xlWhole
.Replace What:="h", Replacement:="早"
.Replace What:="o", Replacement:="遅"
.Replace What:="y", Replacement:="夜"
.Replace What:="k", Replacement:="公"
.Replace What:="u", Replacement:="有"
.Replace What:="p", Replacement:="パ"
.Replace What:="q", Replacement:="休"
.Replace What:="a", Replacement:=""
End With
End Sub
No.1ベストアンサー
- 回答日時:
「Range("A11").Select」を追加ではダメですか?
早速のご回答をありがとうございます。
うまくできました。
インターネットで調べてどれこれもうまくいきませんでした。
助かりました。
No.2
- 回答日時:
黒ずむ原因は「Select」しちゃうからです。
「A11」に戻すより「Select」を使わない書き方をマスターした方がスマートですね。こんな感じです。Sub 連続置換()
With Range("J13:AN32")
.Replace What:="n", Replacement:="日", LookAt:=xlWhole
.Replace What:="h", Replacement:="早"
・
・
・
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) Excel vba で1と10を正確に判断させる方法を教えてください。 TからU列に1と入力があれば 3 2022/12/26 16:54
- Visual Basic(VBA) エクセルのマクロについて教えてください。 7 2023/07/04 09:18
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/03 09:11
- Visual Basic(VBA) VBAでfunctionを利用しようとしたときに「引数は省略できません」というエラーが出ます 1 2022/10/15 16:30
- Visual Basic(VBA) オブジェクトが見つかりません 1 2023/06/24 19:43
- Access(アクセス) Accessのテキストボックスの入力文字制限 1 2023/01/18 20:43
- Visual Basic(VBA) エクセルVBAのコードで質問です。 下のコードはJ16の文字列をB3を起点とする範囲から探して、見つ 5 2023/04/07 11:07
- Excel(エクセル) マクロで特定日より1日前の日を求めたい 6 2022/05/08 09:23
- Visual Basic(VBA) Excel VBA 教えてください。 VBA初心者です。 詳しい方がいましたら教えてください。 下記 3 2023/04/25 11:22
- Excel(エクセル) マクロで行を追加、削除すると行位置がずれますが、解決方法はありませんか?。 5 2022/05/28 16:03
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
カンマ区切り形式ではなく、セ...
-
アクセスのテーブル上でデータ...
-
ExcelのROUND関数を一括解除し...
-
エクセルでアルファベット5段階...
-
txtファイル内の指定の単語の数...
-
tan(x/2)=tと置く置換積分について
-
Ctrl+Hで置換にならない
-
Wordチェックボックス作り方(...
-
例えば斎藤->齋藤、渡辺->渡邉...
-
エクセルで置換リストを別ブッ...
-
置換での互換(交代多項式・差...
-
exel 置換について
-
WORDで一括置換
-
Wordの「検索と置換」の指定方法
-
テキストエディタで4桁の数字の...
-
アクセスの一部データ置換の方法
-
【Excel2003】ブック間のリンク...
-
ワードでの検索、置換モードの...
-
ホームページの一括リニューアル
-
サクラエディタの正規表現(gre...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
カンマ区切り形式ではなく、セ...
-
文字を一括で置換するソフト・...
-
txtファイル内の指定の単語の数...
-
エクセルで置換リストを別ブッ...
-
エクセルでアルファベット5段階...
-
Wordチェックボックス作り方(...
-
ExcelのROUND関数を一括解除し...
-
秀丸エディタ タブをカンマに...
-
Ctrl+Hで置換にならない
-
WORDで一括置換
-
エクセル 置換中の値の更新
-
置換(検索場所に「ブック」を...
-
入力済みの文字中にある句読点...
-
Wordで一括して改ページする方法
-
マクロで文字列をブック全体に...
-
エクセルで例えば、関数を使っ...
-
パワーポイントの置き換えマクロ
-
大学数学の代数の問題です。 ・...
-
正規表現の置換で一部の文字列...
-
HTMLタグを一括消去する方法
おすすめ情報