京都ビジネス学院 舞鶴校

Excelワザ_予定表の作成(土日祝日に色を付ける)

★使用する関数

1.=DATE(年,,日)

DATE関数の引数(カッコ内)に、「年」、「月」、「日」を指定すると、その値がシリアル値に変換されます。

エクセルでは、DATE(デイト)関数を使って、日付を求めることができます。

エクセルの日付は「シリアル値」という値で管理されています。シリアル値は、190011日を「1」として、そこから日付が増えるごとにシリアル値も1ずつ増えていきます。

シリアル値の例:

190012日のシリアル値は「2

201841日のシリアル値は「43191」(190011日から4万日以上がたっているということになります。)

エクセルでは、1つのセルに「2018/4/1」と入力すると、それが自動的に日付と認識され、シリアル値に変換されます。ところが、セルを分けて「2018」、「4」、「1」と入力すると、それぞれ単独の数字として認識されてしまいます。

そこで、DATE関数を利用して、各セルに分断されている数字を日付のシリアル値に変更します。

2.=TEXT(値,表示形式)

「値」として指定された数値を、表示形式付けて変換した結果が返されます。

3.=WEEKDAY(シリアル値,種類)

WEEKDAY関数は、シリアル値に対応した「曜日の数字」を、以下の種類のように表示します。種類は13で指定しますが、指定する種類によって、「戻り値の最初の数字や対応する曜日」が違います。

種類の例:

1(省略)

1:日曜日

2:月曜日

3:火曜日

4:水曜日

5:木曜日

6:金曜日

7:土曜日

2の場合

1:月曜日

2:火曜日

3:水曜日

4:木曜日

5:金曜日

6:土曜日

7:日曜日

3の場合

0:月曜日

1:火曜日

2:水曜日

3:木曜日

4:金曜日

5:土曜日

6:日曜日

4.=INDIRECT(参照文字列) 参照文字列をもとにセルを間接参照する

セル参照を表す文字列を利用して、そのセルの参照を求めます。戻り値として返されるのは、参照先のセルの値ではなく、セル参照であることに注意してください。

<手順>

1.以下のように入力しましょう。

b0186959_10563936.jpg

.セルA1データの入力規則→設定→リスト→20182022までカンマで区切って入力。

セルA1

セルA2

.セルA2データの入力規則→設定→リスト→112までカンマで区切って入力。
b0186959_10585437.jpg
 →「年、月」がリストから選択できるようになります。
b0186959_10594491.jpg
.セルD1に式「="祝日"&A1」と入力。 2022年まで対応します。
b0186959_11073269.jpg
5.セルA4にDATE関数を入れます。
  =DATE(A1,A2,1)と入力。
b0186959_11085582.jpg

6.セルの書式設定→ユーザー定義で「d”にします。

  →「1日」と表示される。
b0186959_11093726.jpg

7.セルA5 =A4+1と入力します。

  オートフィルでA34まで式をコピーします。


8.セル
B4TEXT関数

  =TEXT(A4,"aaa")と入力
b0186959_11104165.jpg
  オートフィルでB34まで式をコピーします。
b0186959_11112768.jpg

★土曜日に水色、日曜日に黄色の色をつけましょう。

9.セル範囲A4C34まで選択します。

10.ホームタブ→スタイルグループ→条件付書式→新しいルール→数式を使用して…
 =WEEKDAY($A4,1)=7……セルの塗りつぶしを水色
 =WEEKDAY($A4,1)=1……セルの塗りつぶしを黄色

b0186959_11141981.jpg

例)=WEEKDAY2018/1/1)→月曜日なので「2」。

土曜日は水色、日曜日は黄色で塗りつぶしができます。

b0186959_11183300.jpg

★さらに、祝日にピンクの色を付けましょう。

11.範囲に名前を付けます。
(Web上の祝日一覧の表を利用しました。)

  祝日シートのセルA3A22→選択
  →名前ボックスで「祝日2018」と入力し、Enter2回(名前の1文字目は数字はだめです。)

  同様に、「祝日2019」「祝日2020」「祝日2021」「祝日2022」を名前定義。

b0186959_11194861.jpg
b0186959_11200442.jpg

12.条件付書式を追加します。

  セル範囲A4C34を選択し、

  →条件付き書式

  →ルールの管理
  →新規ルール

  →数式を使用して…

 =COUNTIF(INDIRECT($D$1),$A4)>=1

INDIRECT関数で返されるセル参照範囲(祝日&2018~2022)の中で、A列に入力されている数字が

1」以上だったら、書式の色を付ける。

b0186959_11260716.jpg
b0186959_11282893.jpg
すると、土日、祝日にそれぞれ色が付きました。
b0186959_11283523.jpg

[PR]

ハイパーリンクの一括削除

ハイパーリンクを一括で削除したい場合、
文章なら
b0186959_11161767.jpg
Ctrl+Aで文章を全選択し
「Shift+F9」でフィールドコードを出して、
b0186959_11162347.jpg
さらに、
「Ctrl+Shift+F9」で、一度に削除できます。
b0186959_11163131.jpg
ところが、画像は複数のハイパーリンクは
一括で削除はできないみたいですね。
b0186959_11204563.jpg
ググると、…やはりマクロでするしかないようです。
b0186959_11274438.jpg



こんなマクロがありました。
で、浮動配置のマクロで、
見事、一括削除できました。

b0186959_11205304.jpg




[PR]

サンプル文の挿入(英語バージョン) 

画像を入れた後の文字列の折り返しを
説明する時等にサンプル文が欲しい時があります。
以前のバージョンから
「=rand()」(半角英字)
と入力すると、サンプル文が出てきます。
(ダミーテキストともいうらしい)
b0186959_16180606.jpg
b0186959_16181258.jpg
WORD2013バージョンはこんな文章。
b0186959_16231883.jpg
で、ダミーテキストの英語版も出るのね。
 「=lorem()」
と入力すると、出てきます。
b0186959_16182227.jpg
b0186959_16182957.jpg
へぇ~~
あまり使わないか…(^-^;


[PR]

138タワー、犬山城

愛知県一宮
138ツインアーチ
b0186959_16375988.jpg
犬山城
b0186959_16381676.jpg
二度目のラコリーナ
またもや行列でバウムクーヘンは買えず(^-^;
でも、芝生はだいぶ青くなっていました。
b0186959_16382466.jpg



[PR]

6月度合格者

おめでとう!
6月度合格証書が届きました。
表計算部門(EXCEL)
2級 1名
3級 3名
おめでとうございます!
さらに上を目指してほしいです。
頑張れ !(^^)!
b0186959_09093057.jpg

[PR]

生野銀山

生野銀山、なかなか面白かった
涼しいし、お手軽な観光地。
b0186959_12312982.jpg
b0186959_12314757.jpg
b0186959_12313939.jpg


[PR]

Excelワザ_セル内改行の削除→都道府県と市町村に分ける

住所が都道府県と市町村以下が
2行になっている住所録。
最終的に別セルに分けたいので,
まずセル内改行を取りたい。
b0186959_12211496.jpg
1.置換を使います。
「clean関数」でもできるけど、簡単な方法で。
 Ctrl+H→置換ダイアログボックス
 「Ctrl+J」と入力。(何も表示されない(^-^;)
 が、無視して、OK
b0186959_12392971.jpg
すると、
b0186959_12395951.jpg
置換されて、住所が1行になりました。

次に、都道府県と市区町村以下を
それぞれD列とE列に分けて表示したい。
と、ここで、2013からついた新機能の
「フラッシュフィル」を使ってみた。
「東京都」と以下の住所を別々に入力し、
データ→フラッシュフィル
b0186959_16564966.jpg
すると、
b0186959_16581539.jpg

あ~~~、やっぱり規則性がないか(;^_^A
神奈川県、鹿児島県、和歌山県、この3県だけは、
4文字、それ以外は3文字
で取り出さないと、ダメね(^^;
やっぱり、関数か…(^^;

D列に「=IF(MID(C3,4,1)="県",LEFT(C3,4),LEFT(C3,3))」
もし、4文字目が「県」だったら、左から4文字分を取り出す、
そうでなければ、3文字分を取り出す。

E列に「=SUBSTITUTE(C3,D3,"")」
C列の文字列を、D列の文字を検索し、
空白に置き換える。
すると、都道府県以下の文字だけが表示される。

b0186959_17182255.jpg

同じ数の都道府県なら、フラッシュフィルでできるけど、
全国のはダメね、フラッシュフィルの弱点でした(^^;





[PR]