|
▼Asaki さん:
早速のレスありがとうございます。
>マクロの記録をしながら手作業で設定してみて、
>その結果と比べてみては如何でしょうか?
そんなテストの仕方もあるんですね!
勉強になりました。
で、やってみたところ、なにも変わらないのです。
ためしにコードの中で、記録したマクロを呼び出してもダメなのです。
これはおかしいですよね。
なのでその前のコードを検証した結果、
リストを作る前にシートの保護をしていたことが原因とわかりました。
-----------------------------------------------------------------------
Range(Cells(5, 8), Cells(10, 13)).Locked = False
ActiveSheet.Protect
With Range(Cells(5, 8), Cells(10, 12)).Validation
.Add xlValidateList, , , "Y,SC,LC,FC"
.InCellDropdown = True
End With
------------------------------------------------------------------------
上記のコードでも(リストは除いて)指定した範囲の保護はされていなかったし、
カンマ区切りではなくシート上のリストを指定した場合はできていたので、
見落としていました。
(しかしなぜシート上のリストを指定した場合はできるのでしょうか・・・)
下記のように修正したらうまくいきました。
-----------------------------------------------------------------------
With Range(Cells(5, 8), Cells(10, 12)).Validation
.Add xlValidateList, , , "Y,SC,LC,FC"
.InCellDropdown = True
End With
ActiveSheet.Protect
Range(Cells(5, 8), Cells(10, 13)).Locked = False
------------------------------------------------------------------------
自分でよーく検証すればわかったことでした。
すみません。
Asakiさんのおかげで、解決の糸口がつかめました。
本当にありがとうございました。
|
|