- ベストアンサー
エクセルの現在のカーソルの位置の行に色を付けたい
- みんなの回答 (7)
- 専門家の回答
質問者が選んだベストアンサー
シートのSelectionChangeイベントにおいて、Target.Interior.ColorIndex = 8 のようなのを、設定すれば仕舞だが、よくこの課題を十分考えた末の質問か? 応用例や、ニーズなどを質問文章に書いてあれば、使うことの適否が言えるが。 イベントの利用は初心者向けではない。 いつまでもこの効果を発揮させると、都合の悪い段階が現れるはずで、打ち切りをどうするかなどのしくみを、込めておく必要がある。 どういう使い方をするか明確にして質問してない。 エラーが起こった時の処理もむつかしい。 ーー 単発なら Sub test01() Selection.EntireRow.Interior.ColorIndex = 8 End Sub で済むはなしだが。 質問の前に、WEB照会すること
その他の回答 (6)
- kkkkkm
- ベストアンサー率65% (1623/2463)
外野からでm(__)m No1さんの方法でいけますよ。 条件付き書式だけではなく、紹介しているサイトの条件付き書式のあとにある「VBEを起動してコード貼り付け」のマクロが必要です。そのマクロでクリックしたときに再描画させて色を変化させています。
- masnoske
- ベストアンサー率35% (67/190)
No.5 補足です。 条件付き書式に数式を定義していますから、再計算自動にしておかないとダメだと思います。
- masnoske
- ベストアンサー率35% (67/190)
私の環境では [No.1] の方法で問題なく動作します。 データを入れていない真っ白な状態で試しました。 リンク先の説明にあるように、限られた範囲で試した後、全セルに対して条件付き書式を定義しましたが、ストレスなく動作します。 ちなみに、Win10 Pro Ver:1809 OSbuild:17763.437 配下で Excel 2010 を使用してます。 マシンスペックに依存するところは大きいと思います。
- msMike
- ベストアンサー率20% (363/1775)
横槍コメント、お許しください。 [No.1]の sknbsknb2さんへ、 ymrys73さんのご質問を読んだ私の最初の独白は「マクロなしでそんなこと出来る筈がなーいッ」でした。 ご案内の記事の[条件付き書式の設定]を試してみました。 しかし、そこの動画にあるようなスムースな動作をしないのです。 例えば1行目に当該[条件付き書式]を設定した直後は問題なく設定列範囲内の1行目全体が着色されて感動! ところが、例えば3行目内の任意のセルをツンしてもウンともスンとも変化なし、ただし、F9 をパシーッとした途端3行目が着色されます。 その「変化なし」の状態から他のシートに移った後で、元に戻るとチャンと3行目が着色されています。 他行に移動したら即着色行も移動、という具合にはならないのでしょうか? お試しになってなかったのなら、試してみていただけないでしょうか、お願いします。 ちなみに、Win10 Pro Ver:1909 OSbuild:18363.657 配下で Excel 2019 を使用してます。
- kon555
- ベストアンサー率52% (1755/3370)
選択中のセルのある行を塗りつぶすマクロならこんな感じです。 Sub tes() Rows(Selection.Row).Interior.ColorIndex = 34 End Sub
- sknbsknb2
- ベストアンサー率38% (1130/2922)
条件付き書式を使う方法ではダメですか? 参考URLをご参照ください。
関連するQ&A
- SPREADでカーソルの位置を1行目に戻したいなぁ
VB6とSPREADver7.0を使っています。 SPREADのOperationModeプロパティは2(行モード)です。 初期状態で、SPREADカーソルの位置は1行目にあります。 SPREADの2行目以下の行を選択し、ボタン押下で SPREADカーソルの位置を1行目に戻す処理を知りたいのです(泣 RowcountやRecordCountを使うやり方があると聞いたのですが・・・ どなたかわかる方よろしくお願いします。
- ベストアンサー
- Visual Basic
- エクセルでカーソルのある行を見やすくしたい
エクセルで品種別に実績数量を入力しています。 カーソルのある行が常に見やすく色がついていると入力しやすいなぁと思っています。 カーソルの動きに合わせて動いてもらいたいので、行番号をいちいちクリックしてハイライトさせる方法は合わないんです。 検索した結果、 http://okwave.jp/kotaeru.php3?q=1800843 こちらの質問と回答が大変参考になりました。 お恥ずかしい話なのですが、私はVBAを全く扱ったことがなく、思い通りにプログラミングできません。 「VBAって何?」という状態から四苦八苦してようやく、上記質問の#6の方の作ったプログラムを入れるところまでできました。 エクセルからツール→マクロ→VBE VBEから表示→コードを開いて、そこに貼り付けてみました。 そうしたら見事に薄い水色で表示されるようになったのですが、私が希望しているプログラムとは違ったみたいで、一度カーソルを置いて水色になった行と列が色がつきっぱなしです。 このプログラムを「カーソルが現在置いてある行と列のみに色がつく」ようにできないでしょうか。 VBAが全く初めてなので上記の貼り付け方で合っているのかどうかもよくわからない状態です。 エクセルしか使えないような初心者でもわかるように教えて頂ければ嬉しいです。 どうかよろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルのカーソル位置表示色について
エクセルのカーソルの位置を表示するため、 桁(ABC~)と行(123~)のカーソル該当位置に「薄青」の色が出ます。 これって瞬時には見にくく、もっとはっきりわかる色、たとえば赤であるとかに変えたいのですが、 可能でしょうか?
- ベストアンサー
- オフィス系ソフト
- カーソル行の直下にコピペ
毎月録画する番組をExcelで一覧表にしています。 現在、カーソルがある行の下に行を新規に挿入して マウスのある行のA-Eまでの列をコピーして 挿入した行の同じ列にペーストするマクロ(コード)を教えてください。 つまり、カーソルがある行の直下に 同じ内容のセルをコピペしたいのです。
- ベストアンサー
- Excel(エクセル)
- エクセル マクロ 列挿入後のカーソル位置
エクセルで「1列挿入する」だけのマクロを作成した時のことです。 実行させると1列挿入しますが、挿入後のカーソル位置は変わらず、元の列全体が反転表示されてます。ところが、複数シートを選択しマクロ実行すると、列挿入はしますが、カーソルは元の列のひとつ右側の列が反転表示されます。 手作業で1列挿入すると、1シートでも複数シートでも挿入後のカーソルは元の位置です。マクロ作成し複数シートを選択して実行するとカーソル位置が変わるのです。 なぜですか? 特に相対参照でマクロを作る場合、選択するシート数でカーソル位置が変わると困ります。 良い方法はないでしょうか?
- 締切済み
- オフィス系ソフト
- カーソル行の直下にコピペ(2)
質問は、下記の続きとなります。 カーソル行の直下にコピペ https://okwave.jp/qa/q9740662.html ----------- 現在、カーソルがある行の下に行を新規に挿入して マウスのある行のA-Eまでの列をコピーして 挿入した行の同じ列にペーストするまでは、前回で出来るようになりました。 (これを「処理_1」と呼ぶことにします。) 続いて、 カーソルのある行のA列(日付)と挿入した行のA列(日付)の 値(日付)は、同じなのでセル結合したいと思います。 (これを「処理_2」と呼ぶことにします。) 処理_1を続けると、同じ日付が複数発生しますが、 その場合は、処理_2は、同一日付のA列は、セル結合する事にしたいと思います。 以上を満たす、マクロ(コード)を教えてください。
- ベストアンサー
- Excel(エクセル)
- EXCELの区切り位置のコマンドについて
HPから取ってきたデータをEXCELにテキストで貼り付けて、 スペースで区切る処理をするために、データメニューの区切り位置のコマンドで処理しようとしていますが、この区切り位置のコマンドは、1行ごとにしなければならないようですが、100行もあるデータも一回一回、データメニューの区切り位置のコマンドを実行しなければなりませんか? 記録マクロで処理しようと思いましたが、セルを固定してしまうマクロになるのでできませんでした。 よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- エクセルテーブルのカーソルで行を
エクセル2013で作成したテーブル上にカーソルがある時、カーソルがある行の色を変えたいのですがそのようなことができますでしょうか。
- 締切済み
- その他MS Office製品
- Excel VBAのカーソル位置
Excel VBAのユーザフォームにTexboxを複数個配置し、このユーザフォームが表示された時にカーソルの位置をコントロールしたいと考えています。 UserformのInitializeの中に何を書けばカーソル位置を決めることが出来るのでしょうか? やり方があれば教えて下さい。 宜しく。
- ベストアンサー
- その他(プログラミング・開発)
お礼
ものすごく助かりました。 素人ですので言葉数足らずにすいませんでした。 エクセルを使う上でかなり役に立ちます 私は一生使い続ける機能です。 本当にありがとうございます。 新しく自分で2回目入金台帳つくるのに役に立ちました