Excelの行に、1行おきに色を付けたい、2行おきに色を付けたい、というときの方法です。
まず、色を付ける範囲を指定します。
次に、メニューから「ホーム」→「条件付き書式」→「新しいルール」をクリックします。
「新しい書式ルール」で、「数式を使用して、書式設定するセルを決定」をクリックし、「次の数式を満たす場合に値を書式設定」の欄に、以下のように入力します。
= mod ( row (a2) ,2 ) = 1
その後、「書式」をクリックします。
セルの書式設定画面で、「塗りつぶし」をクリックし、好きな色を選択して「OK」をクリックします。
「新しい書式ルール」に戻るので、「OK」をクリックします。
指定した範囲の行が1行おきに色がつきました。
このほか、3行おきに色を変える場合は、数式を以下のようにします。
= mod ( row (a2) ,3 ) = 1
このように、「= mod ( row (開始セル) , 行数) = 1 」と設定します。
ExcelVBAでシート内のデータを並び替える方法です。 VBAのコード Endrow = Worksheets(SheetName).Range(“A1”).End(xlD…続きを読む
ExcelVBAを使って、フィルタで絞り込んだ内容を解除する方法です。 VBAコード If Worksheets(“シート名”).FilterMode Then Workshe…続きを読む
Excel VBAでメッセージ（質問）を表示して、ユーザに「はい」「いいえ」の選択をさせて、その結果で処理を分岐させる方法です。 if文による条件分岐 条件分岐には以下のようなif文を使います。 If…続きを読む
Excelでデータ管理をしていて、VBAでその全データに対して何らかの処理を行う場合、1行目から最終行までループさせて処理を1行ずつ行う場合には、最終行を取得する必要があります。 今回は、最終行を取得…続きを読む
Microsoft Excel2019で新規に保存をしようとするとOne Driveなどが最初に候補にあがってきてしまい、コンピュータ上に保存したいときに、いちいちデスクトップを指定するのに手間取りま…続きを読む
CreateObject(“WScript.Shell”).Runを使って他のプログラムを実行する場合、デフォルトだと起動したプログラムの処理が終わる前に次の処理に移ってしまい…続きを読む
Excel VBAでフィルタ操作をして、行を絞り込みむ方法です。 コード Sub autoFilter(Retsu, Atai) Worksheets(“シート名”).Rang…続きを読む
Excelでボタンをクリックしたらフォルダを開くようにするVBAです。 Shell EXPLORERPATH & OPENFOLDER , vbNormalFocus EXPLORERPATH…続きを読む
Excel VBAからメールを送信するボタンをつくります。 パスワードロックをかけたブックを利用していて、パスワードがわからなくなったらメールを送信してパスワードを教える機能を付けようと思い、調べまし…続きを読む
Excel VBAで、予め指定した列を非表示にします。 コード hiddenColumn = Array(3, 4, 5, 6) For i = 0 To UBound(hiddenColumn) W…続きを読む