Gizport
1 回答
0
Share (facebook)
238
view
全般

条件付き書式を設定したセルの中でピンク色に塗りつぶしたセルのみをカウ...

条件付き書式を設定したセルの中でピンク色に塗りつぶしたセルのみをカウントするにはどうしたらよいのでしょう?どなたかご教授ください。下記のようなコードではうまくマクロが動きません。↓Dim Ra As Ranne For E&ch Rg I: R`nge(tquot+A1gA11&quo&;) Iv R:.Interior.ColorIndex = 7 Then If Rg.Address = Rg.MergeArea.Cells(1).Address Then ct = ct + 1 End If End If Next Range("A11").Value = ct
Yahoo!知恵袋 4951日前
コメントする
お気に入り
1
質問者が選んだベストソリューション
「条件付き書式」の背景色はInterior.ColorIndexで値取得はできません。条件付き書式の値取得について、下のサイトでやりとりされています。http://okwave.jp/qa/q1455002.html①条件付き書式が設定されているかを調べるVBAまるまるコピーで使える。②その情報を元に背景色を判断するVBA手直しして使う。参考にしてください。
Yahoo!知恵袋 4937日前
シェア
 
コメントする
 

参考になったと評価
  このQ&Aは参考になりましたか?

Share (facebook)
その他の解決方法を知っていますか?
回答する
全般
108
Views
質問者が納得「条件付き書式」の背景色はInterior.ColorIndexで値取得はできません。条件付き書式の値取得について、下のサイトでやりとりされています。http://okwave.jp/qa/q1455002.html①条件付き書式が設定されているかを調べるVBAまるまるコピーで使える。②その情報を元に背景色を判断するVBA手直しして使う。参考にしてください。
4951日前view108
全般
93
Views
質問者が納得まずい箇所は2点あり、まず Cells(文数ct, 1).Value では時間はシリアル値になるので : は含まれません(^^;Cells(文数ct, 1).Text にすればいけると思います。次に Like ":" では 完全一致 なので 部分一致の Like "*:*"にすれば抜き出せると思います。
5047日前view93

取扱説明書・マニュアル

516view
http://www.phase-tech.com/.../CT-1manual.pdf
23 ページ0.37 MB
もっと見る