[[20050202183407]]　『入力規制のかかったもののコピーについて』（Ayu）　ページの最後に飛ぶ

『入力規制のかかったもののコピーについて』（Ayu）

 近頃頻繁に質問させていただいてます。すいません。

 データの入力規制でセルをリストで選ぶようにしてあります。
 その、リストの元データは他のシートの表の一部を指定してあります。
 (表の一部を範囲指定し名前をつけてあります。)

 マクロでシートを２枚(入力規制設定のあるシートと元データのあるシート)
 別のブックにコピーした場合、コピー元のブックを閉じると
 入力規制のリストが表示されなくなってしまいます。

 どうしたら解決できるのでしょうか？
 よろしく願いします。

 シートのコピーはシート丸ごとですか。
 試しにやったら名前の定義は残ったままでした。
 入力規則もで残ってます。
 （川野鮎太郎）

 シートまるごとコピーしました。
 a = ThisWorkbook.Name

 Workbooks.Add
 Workbooks(a).Sheets(1).Copy before:=ActiveWorkbook.Sheets(1)
 Workbooks(a).Sheets(2).Copy before:=ActiveWorkbook.Sheets(1)

 こんな感じで。
 名前の定義とか、入力規則の内容(元データ=AAAとか)はすべて残っているのですが
 コピー元のブックを開いた状態だとドロップダウンリストの内容が表示されるん
 ですけど、閉じた瞬間から、コピー先のドロップダウンリストが表示されなく
 なります(下矢印ボタンだけ表示されてクリックしてもリストがでない)
 リストの元データはコピー元ブックを参照しているということだとは理解できる
 のですが、解決法がわからないのです…
 こうなってしまうのは、私だけなのか･･･？

 (Ayu)

 別々にコピーするのがいけないようですね。
 まとめてコピーしてみてください。
　
a = ThisWorkbook.Name
Workbooks.Add
Workbooks(a).Sheets(Array("Sheet1", "Sheet2")).Copy Before:=ActiveWorkbook.Sheets(1)

 （川野鮎太郎）

 なるほど。。。こうやるとまとめてコピーできるんですね。
 ありがとうございました！
 (Ayu)

コメント返信：

[ 一覧(最新更新順) ]

[[20050202183407]] 『入力規制のかかったもののコピーについて』（Ayu） ページの最後に飛ぶ

[[20050202183407]]　『入力規制のかかったもののコピーについて』（Ayu）　ページの最後に飛ぶ