セルが数値なら

| コメント(0) | トラックバック(0)
IsNumericという関数を使います。
Sub セルが数値なら()
    If IsNumeric(Cells(3, 1).Value) = True Then
        Cells(3, 1).Interior.ColorIndex = 6
    End If
End Sub

トラックバック(0)

トラックバックURL: http://winnote.adg7.com/mt/mt-tb.cgi/180

コメントする

このブログ記事について

このページは、たけうちとおるが2009年5月26日 16:32に書いたブログ記事です。

ひとつ前のブログ記事は「セルが空なら」です。

次のブログ記事は「セルフォーマットを文字列に」です。

最近のコンテンツはインデックスページで見られます。過去に書かれたものはアーカイブのページで見られます。

エントリー一覧