- ベストアンサー
マクロの作成について
WWolfの回答
こんにちは。 下記コードはシート１の各セルに１～３が点在していると想定し sc1は２と３のフォント書式の色を白にして視覚的に見えなくしています。 sc2は１と３のフォント書式の色を白にして視覚的に見えなくしています。 sc3は１と２のフォント書式の色を白にして視覚的に見えなくしています。 ｑはリセットです。 意味合いが違えばm(__)m Sub sc1() '２と３を白 Worksheets(1).Cells.Select Selection.Font.ColorIndex = 0 Selection.Replace What:="2", Replacement:="2" _ , ReplaceFormat:=True Selection.Replace What:="3", Replacement:="3" _ , ReplaceFormat:=True Worksheets(1).Range("A1").Select End Sub Sub sc2() '１と３を白 ActiveSheet.Cells.Select Selection.Font.ColorIndex = 0 Selection.Replace What:="1", Replacement:="1" _ , ReplaceFormat:=True Selection.Replace What:="3", Replacement:="3" _ , ReplaceFormat:=True Range("A1").Select End Sub Sub sc3() '１と２を白 ActiveSheet.Cells.Select Selection.Font.ColorIndex = 0 Selection.Replace What:="1", Replacement:="1" _ , ReplaceFormat:=True Selection.Replace What:="2", Replacement:="2" _ , ReplaceFormat:=True Range("A1").Select End Sub Sub q() 'リセット ActiveSheet.Cells.Select Selection.Font.ColorIndex = 0 Range("A1").Select End Sub
関連するQ&A
- エクセルのマクロについて
マクロ初心者です。 エクセルであるセルの数値に100掛けた結果を同じセルに表示させたい場合はどういったVBAを使えばいいのでしょう。他のセルに一旦100掛けた数字を入れて、また元のセルに戻すという事は無しで・・ 例えば「0.25」をいうセルにマクロを流して「25.00」(小数点以下の桁数にはこだわりません)に変えたい場合です。
- ベストアンサー
- オフィス系ソフト
- コマンドかマクロをお教えいただけないでしょうか
「セルの結合」、「セルの分割」のショートカットキーを作りたいと思っています。 コマンドがあればと思って、「ファイル→オプション→リボンのユーザー設定→ユーザー設定→分類」と進んだ画面で探したのですが、探し方が悪かったのかもしれませんがそれらしいコマンドが見つかりませんでした。「セルの結合」、「セルの分割」のコマンドは何でしょうか。 もし、コマンドがない場合は、「セルの結合」、「セルの分割」のマクロをお教えいただけないでしょうか。 ショートカットキーの登録方法、マクロの登録方法は、以前にお教えいただいたので分かります。 Word 2013、Windows 7です。
- ベストアンサー
- Word（ワード）
- エクセルのマクロを作成したいです
エクセルのセル「G9～G1508」に1-78までの数字をランダムに表示させるマクロを作成したいです。 一応自分で作成したのですがなんの事やら分からず… どういう記述をすればよろしいのでしょうか？
- 締切済み
- Visual Basic
- 値の入っているセルをカウントするマクロの作成
マクロ初心者です。 アクティブセルから一つ上の列に、値が入っているセルが何個あるのかカウントするマクロを作成したいのですが、うまくいかずに困っております。 すみませんが、よろしくお願いします。 参考用画像の解説 【ActiveCell】セルから上の列を範囲指定。 １、２、３と数字が入っているセルが何個あるのかカウント。
- ベストアンサー
- Visual Basic
- エクセルのマクロの作成について
エクセルのマクロの作成について教えてください！！ 一つのセルの中に3行の文字があるとして・・・・ そのセルの2行目と3行目を隣のセルにうつしたいです。 例えば・・ E列の1行目のセルに あいうえお かきくけこ さしすせそ と文字が入っていて、 それを F列の1行目のセルに かきくけこ さしすせそ のみ移動させたいです。 1行～300行ほどあって、さらにデータは増え続けます、手作業での移行が困難になってきました。 そもそも一つのセルの中身の文字の一部を違うところに移動させるマクロは組めるのでしょうか。 当方初心者です。お手柔らかにお願いします。
- ベストアンサー
- オフィス系ソフト
- EXCELでマクロを初めて実行してみたんですがぁ・・・・
初めてマクロというものをやってみました。 ただ、動作を記憶させただけです。プログラムは全然知りません。 sheet1の株価4本値と日付を１日だけ繰り上げる 単純な動きです。一番最後のセルにその日の 日付と4本値と入れて、マクロを実行させて、1日だけ繰り上げる 作業です。 それを、Sheet2が「=Sheet1!B2」このような形で参照するように してあるのですが、実行させると、 Sheet2B2のセルが#REF!とかなんとか表示されて B3からしか正しく表示されません。 以後同じことを繰り返すと、どんどん１つずつセルがエラーして 正しく表示されるセルが下がりながら、減っていってしまいます？？？ なぜなんでしょうか？？ また回避策というか、正しい方法はありますでしょうか？？ 何卒、初めてなので、わかりやすくお教えいただけると ありがたいです。 よろしくお願いを致します。
- ベストアンサー
- オフィス系ソフト
- EXCEL マクロ
エクセルマクロ初心者です。 エクセル2007で、複数選択したセルの合計値・平均値をコピーできないか悩んでいます。作業によって、選択するセルが変わりますので、セル番地の指定をせずにマクロの書くことができますでしょうか。 イメージとしては、複数のセルを選択をしたときに、ステータスバーにオートカルクで表示される合計値・平均値をクリップボードにコピーし、別のセルに結果をペーストする感じ（ペーストする際に合計値・平均値のどちらを貼り付けるか選択できれば尚、良）です。 個人用マクロブックに登録して、不特定ブックで使用したいマクロです。よい方法があれば教えて下さい。
- 締切済み
- その他MS Office製品
- ボタンを使ったマクロの作成
ボタンを使ったマクロの作成 エクセルでボタンを押すと あるセルの数字に１が加算され そのシートが印刷されるマクロを 恐れ入りますがどなたか教えて（作成して）下さい。 マクロに関しましては まったくわかっておりませんので トンチンカンなことを言い出すかもしれませんが どうぞよろしくお願い致します。
- ベストアンサー
- その他（インターネット・Webサービス）
お礼
ご回答ありがとうございました