毎月決まったシートに同じようなデータを入力し、それを月毎に集計するといったことがある。集計欄をまとめて表示できると、毎月の変化を比較しやすい。ここに取り上げたのはとても、簡単なシートである。各シートには２つのデータしか入っていないが、それは合計欄の数字であったり、あることを示した文字列であったりする。非常に簡単なエクセルのシートとデータを利用して、他のシートを参照するしかたをまとめてみる。

シート２からシート４には次のようにデータが入っている。

シート２から４に入っているデータをシート１にまとめて表示する。

セルに入力されている関数式は次のようになっている。

使っているスマートフォンのLYNXで、最近、本体容量が不足しています、との表示がよくではじめた。
いろんなアプリを入れたことも原因してるのだろうが、ブログへの記事アップをスマートフォンから写真付きで行なっているから、送信フォルダにもデータが残り本体容量を圧迫しているようだ。
そんなことでメールデータを削除したり、アプリケーションの管理画面から使わなくなったものを削除しているときに、電話帳データを削除してしまった。アプリは別だからいいかなと思って削除した。確認のために電話帳アプリを起動してみると、
電話データが、ない！
全て消えてしまってる！
電話帳データは一つで、いろんな電話帳アプリは共通のデータを見に行ってるということなのか？

ドコモショップに電話で訪ねてみると、

1.スマートフォンのホーム画面からアプリ一覧を表示する。
2.そのアプリの中から、電話帳コピーツールを探す。
3.コピーツールのインポートのタブを表示する。
4.そこに表示されている年月日が新しいものをクリック。
5.追加インポートする。

これで、スマートフォンに移行した時、あるいはその後不具合などでデータを移行した時に保存されていたデータまでは復元することができる。
私の場合、昨年の7月までの約800件のデータまでは無事復元することができた。
大変安堵することができた。

毎月作るエクセルのシート。
いちいちシート名を変えるのは面倒なこと。
そんなときに、セルの値を利用して自動的にシート名をつけることができれば、同じシートをコピーして増やしていっても、楽である。

シート名のタブの所で、右クリックして表示されるメニューから「コードの表示」をクリック。
表示されるファイル名sheet（番号）（コード）という白紙の窓の中に以下の記述をコピーして貼り付ける。

D2には月を示す数字を入力している。D2はセルの書式設定で、ユーザー定義＞「G/標準"月"」、として「６」と数字を入れるだけだが、「6月」と表示されることになる。

シート名は「○月」という表示にするために、D2の値に「月」をプラスしている。下のコードの「&"月"」の部分である。
 

///////////

Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo ERR_HANDLER
If Target.Address(False, False) = "D2" Then
ActiveSheet.Name = Range("D2").Value & "月"
End If
Exit Sub
ERR_HANDLER:
MsgBox "現在のD2セルの値はシート名にできません。"
End Sub

///////////////

実際に、D2の値あるいは文字を変更すると、シートの名前が変わっていくことを確認することができる。

この和顔愛語パート２のブログについては、ブログの登録サイトに登録していなかったことに気づく。 今回、ページ最下部にアイコンを設置したように、「にほんブログ村」と「人気ブログランキング」の２か所に登録してみた。 この時点での、カウンタは４７８０となっている。

エクセルのある行や列の値を入力規則のリストに設定することができる。

そのリストを、名前を定義しておくと設定の時に楽である。

エクセル２００７で、次のようにたどる。

数式タブ　＞　名前の管理　＞　選択範囲から作成　＞　

この中に、「上端行」　「左端列」　「最下行」　「右端列」　の４つが選択できる。

したがって、範囲にふさわしい名前を、上端とか左端において、範囲を選択して、チェックを入れるとその値が範囲の名前として定義されることになる。

データタブ　＞　データの入力規則　＞　リスト　＞　定義した名前

とすれば、ある範囲に入力できる値を設定することができる。