VBA 入力規則のコピー

他のセルに設定されている入力規則を指定セルにコピーできる
VBAプログラムをメモしておく。

1.内容
  下図枠内の処理でコピーできる。

2.参考資料
  下記のWEBページにお世話になりました。ありがとうございます。
 ・【エクセルマクロ】入力規則のリスト内容を取得:3選
 ・【ExcelVBA入門】PasteSpecialメソッドで形式を選択して貼り付ける方法

3.背景
  ツェッペリンの型式変更を行う時に、プレイ中の年月によって選択できる型式が異なる。
  main画面には各行に入力規則を設定してあるので、crew画面から型式変更を行う時に
  それを参照するのが良いと考えた。
  上記1.ではws.cells(k1,1)にmain画面のプレイ中の年月に対応した入力規則が設定されている。
  cells(23,4)がcrew画面の型式変更プルダウンメニューセルである。

<個人的な感想>
プルダウンメニューで選択可能なデータを表示する入力規則は便利なので、
色々と活用したい。