|
よろしくお願いします。
明日までにあるファイルの入力部分をマクロで
空白にするマクロを作っております。
これ自体は簡単にマクロ記録で作れましたが
チェックボックスを空白状態にしようとした所
一つのシートだけ・・・のコントロールはまだ作成されておりません
というメッセージが出てきて私には対処できませんでした。
その為いったんチェックボックスを全て破棄して
開発ー挿入ーフォームコントロールでチェックボックスを全部
作り直しました。
ところが今度は
アプリケーション定義またはオブジェクト定義エラー
のメッセージ違反が出てどうしたらいいかわからなくなりました。
使用OSはWIN7 オフィス7を使っております。
が、これは職場の各部署に配るのでXPや2003の環境もあるかもしれません。
使用したコードはネットで拾ったもので
Dim o As Object
For Each o In ActiveSheet.OLEObjects
If TypeOf o.Object Is MSForms.CheckBox Then
o.Object.Value = False
End If
Next o
End Sub
ともうひとつ
ActiveSheet.CheckBoxes.Value = xlOff
を自作クリアマクロに加えています。
なにとぞアドバイスお願いします
|
|