[[20050623001046]]　『罫線の入ったセルをカウントするには？』（クッキー）　ページの最後に飛ぶ

『罫線の入ったセルをカウントするには？』（クッキー）
エクセルで出勤簿を作成してます。休日を罫線の斜線であらわしてます。
当月の休みの集計をするのに罫線の入ったセルをカウントするには、
どのようにしたらいいのでしょう？

 おはようございます。
右上がりの斜線でマクロを使ってもいいのなら、こんな感じでしょうか？
範囲を選択してから実行です。
Option Explicit
Sub Macro1()
Dim C As Range
Dim k As Long
    For Each C In Selection
        If C.Borders(xlDiagonalUp).LineStyle <> xlNone Then
            k = k + 1
        End If
    Next
    MsgBox k & "　個です。"
End Sub
（SoulMan）

ありがとうございます。
早速、試してみます！

コメント返信：

[ 一覧(最新更新順) ]

[[20050623001046]] 『罫線の入ったセルをカウントするには？』（クッキー） ページの最後に飛ぶ

[[20050623001046]]　『罫線の入ったセルをカウントするには？』（クッキー）　ページの最後に飛ぶ