1枚のシートにあれこれ詰め込みすぎるのもスマートさに欠けるので，ここではシートをいくつかに分けていきたいと思います。

具体的には，3枚のシートを利用します。各シートの名称と役割については，以下の通りです。

「INPUT」シートです。

ここでは画面キャプチャの都合上，1日の予定の上限を10個の予定(以下「ユニット」)と定めます。実際には運用上想定されるユニット数の上限をカバーできる範囲で，余裕を持たせたシートの設計をしておくことが肝要です。

ということでこのシートには，2部屋とも上限いっぱいの10個のダミーのユニットを，次のような構成で空行を開けずに※並べた状態から作図を進めたいと思います。

※意図せぬ作図ミスを防ぐため，運用も同様のルールでおこないます。

なお上図にいう「番号」は一意の数字で作成し，これ以後のプロセスでは，この数字をそのままプロット上のX座標として利用します。

「COODINATES」シートです。

下図のような見出しを用意しておきます(これは2部屋分の場合の見出しです)。直下の表をコピペすると簡単です。

scrollable

部屋の名称，および部屋ごとのユニットの数を「INPUT」シートより引用，ないしは数えます。

具体的な計算式は次のとおりです。

scrollable

タイムテーブルでは“未占有” “埋まってない”時間帯がハッキリと区別可能なことが望まれるので，ベース部分に会議室の開室時間帯(この例では8:00―20:00とします)をあらわす線を描いておこうと思います。まずはこの座標をつくります。

この系列の呼称を以下「All_Day」とし，下図の彩色セルに次の計算式を入れておきます。なお2部屋分のベースを描くにあたって，下図の空白行を隔てた2つのブロック(セルA4:B8)を使用しています。

scrollable

つづいて部屋名の表示位置に関する座標を作成します。

scrollable

部屋名を転記します。

scrollable

1部屋目の諸要素についての座標をつくります。

まずは同値を3回繰り返すかたちで連番を作成します。終端はStep 2で決めたユニットの数です。

scrollable

“占有された” “埋まっている” 時間帯をあらわす棒，以下「In_Use」と呼ぶ系列のX座標を求めます。

またこれを直下に1つコピーします。

scrollable

「In_Use」系列のY座標を求めます。

scrollable

下図強調範囲を表の最下行までコピーします。

scrollable

これ以後の座標は会議の名称や利用者等の文字列を表示するための，データラベルを目的としたものです。以下この系列を「In_Use_Labels」と呼びます。

Step 2で決めた終端まで，通常の連続番号をつくります。

scrollable

X・Y座標を用意し，データラベルの内容を「INPUT」シートより引用します。

scrollable

下図強調範囲を選択し，グラフ散布図(直線)を挿入します。

scrollable

「All_Day」系列を描画したこの時点で，グラフは下のとおりの状態です。

先のグラフに下図強調範囲の赤をX，青をYとして「X-Axis_Labels」系列を描画(＝追加)したうえで，この系列にデータラベルを加えます。このとき，データラベルの内容として緑範囲を指定します。

scrollable

「X-Axis_Labels」系列を描画したこの時点で，グラフは下のとおりの状態です。

先のグラフにあたらしい系列「In_Use」を追加します。

このとき，系列のXには下図の赤い強調部分を同時に，同じくYには下図の青い強調部分を同時に指定します。左右の表で選択範囲が非対称となる点に注意です。

scrollable

「In_Use」系列を追加したこの時点で，グラフは下のとおりの状態です(下図では青い線の上にグレーの線があたらしく引かれています)。

先のグラフにあたらしい系列「In_Use_Labels」を追加します。

このとき，系列のXには下図の赤い強調部分を同時に，同じくYには下図の青い強調部分を同時に指定します。

さらに重ねて，この系列にデータラベルを追加します。データラベルの内容には，下図の緑の強調部分を同時に指定します。

すべて左右の表で選択範囲が非対称となる点に注意です。

scrollable

「In_Use_Labels」系列を追加したこの時点で，グラフは下のとおりの状態です。

系列「All_Day」および「In_Use」について，線色線幅線の先端の設定をおこないます。

このとき，線の先端については，フラット以外の選択肢は厳禁です。

この時点で，グラフは下のとおりの状態です。

グラフ縦軸の書式設定にて，開室時間帯の先端(＝最小値)と終端(＝最大値)をシリアル値で指定します。

あわせて任意の時間ごとの仕切り線(＝主；下図では1時間)もシリアル値で指定します。

上の設定を終えたら，軸を反転してグラフの天地を入れ替えます。

表示形式を時刻表記に変換します。

この時点で，グラフは下のとおりの状態です。

系列「X-Axis_Labels」ラベルの表示位置を上に指定しなおして，これを項目軸ライクに利用します。

系列「X-Axis_Labels」「In_Use_Labels」の線をなしに設定します(不可視化)。

横軸の表示範囲がアンバランスなので，適当な範囲を指定してこれを修正し(下図では 0.5－2.5)，

不要となった軸のラベルを不可視化，つまりラベルの位置をなしにします。

作成したグラフを，あたらしいグラフシート「OUTPUT」に移動させます。

細部に任意の設定を加え，Excelグラフによるタイムテーブルの完成です。

「INPUT」シートの内容を書き換えると「COORDINATES」シートが再計算され，原則として「OUTPUT」シートのグラフも追従し変化します。つまり予定の変更などに伴っていちいちグラフ側に調整を加える必要を回避できます。

参考までに「INPUT」シートの「ROOM1」の予定を午後，同じく「ROOM2」の予定を午前に関してすべて削除してみると，グラフは下のようなかたちに自動的に変化することが確認できます。

系列「In_Use」にデータラベルを追加すると，ユニットごとに開始・終了時刻を表示させることも可能です。下図はラベルを中央位置に配した例です。

またこの「In_Use」系列に任意のマーカーを適用することで，仕切り線としての役割を与えることができます。ユニット間に“間がない”シチュエーションがデフォな場合などには便利です。たとえば下図では，組み込みのマーカーでなく，線幅とほぼ同幅の図形「直線」を適用しています(cf. 層別散布図)。

頁頭の作例のように，これらの設定は両立させることができます。

この作例はExcelのバージョン1902(ビルド11328.20222)を利用したものですが，Step 16での説明に「原則として」と加えたとおり，筆者周辺の環境ではデータを削除・追加した場合などにグラフ側の修正が必要な場面があります。

たとえばStep 16の状態でExcelを終了してから再度起動し，あらためて当初のダミーデータで予定をフルに埋めようとしても，下図のように追加された部分にはデータラベルが表示されていません。個人的には，Excelを再度起動した段階で発生するトラブルのように見ています。

この現象はそもそも仕様なのか，はてはバグなのか不明ですが，対処としては「In_Use_Labels」のデータラベルの書式設定から，セルの値チェックボックスをいったんOFFにしてから再度ONにし，さらにラベルテキストのリセットを掛けることで回復させることができます。

もっともマクロが利用できる環境なら，たとえば次のようなコードを組んで，「OUTPUT」グラフシートをアクティブにしたタイミングで上記の一連の動作が自動的に掛かるしくみを加えたほうが解決はシンプルです。

Private Sub Chart_Activate()
' DataLabels BugFix
Dim timeTable As Chart
Set timeTable = Application.Charts("OUTPUT")
With timeTable.SeriesCollection("In_Use_Labels").DataLabels
    .ShowRange = False
    .ShowRange = True
    .AutoText = True
End With
End Sub