Ｐａｇｅ 196 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼条件付き書式の状況の所得 ぴかる 02/10/12(土) 21:48 ┗Re:条件付き書式の状況の所得 ichinose 02/10/12(土) 22:32 ┗Re:条件付き書式の状況の所得 ぴかる 02/10/12(土) 22:52 ─────────────────────────────────────── ■題名 ： 条件付き書式の状況の所得 ■名前 ： ぴかる ■日付 ： 02/10/12(土) 21:48 -------------------------------------------------------------------------
| みさなん、こんばんは。 マクロにてセルに条件付き書式を設定しようと考えています。しかし、そのセルが既に設定されているかどうか調べる方法が分かりません。 未使用、１ヶ使用、２ヶ使用、３ヶ使用のいずれかを所得したいと思っています。 今回のも「ピカつーる」に使わせて頂きたいと思っています。可能でありましたらご協力よろしくお願いいたします。確認は月曜日になってしまいます。すみません。 |
| ▼ぴかる さん： こんばんは。 > >マクロにてセルに条件付き書式を設定しようと考えています。しかし、そのセルが既に設定されているかどうか調べる方法が分かりません。 >未使用、１ヶ使用、２ヶ使用、３ヶ使用のいずれかを所得したいと思っています。 > >今回のも「ピカつーる」に使わせて頂きたいと思っています。可能でありましたらご協力よろしくお願いいたします。確認は月曜日になってしまいます。すみません。 数だけなら、例えばセルＡ１〜Ａ４を調べた場合､ '================================ Sub test() Dim rng As Range Dim fmc As FormatConditions For Each rng In Range("a1:a4") MsgBox rng.FormatConditions.Count Next End Sub こういう意味ですよね？ |
| ichinoseさん、こんばんは。 >Sub test() > Dim rng As Range > Dim fmc As FormatConditions > For Each rng In Range("a1:a4") > MsgBox rng.FormatConditions.Count > Next >End Sub >こういう意味ですよね？ ありがとうございました。できました。 １セルごとにチェックしてこうと思ってますので、こんな感じでいくつもりです。 MsgBox Range("a1").FormatConditions.Count ichinoseさんご指摘のピカつーるバグの修正は完了しています。ただ修正するだけでは芸がないのでちょっとした新機能を作成中です。公開となったら、また試して下さいね。 一輪車もがんばって！。ファイトぉ！。気持ちだけではとは思いますが・・・。 おやすみなさいです。よく寝て下さいね。 |