0

値の列があり、0 より大きいセルを選択したい:

例

オンラインで調べてみましたが、解決策が見つかりませんでした。できればループを書かずに、VBAスクリプトでこれを行うにはどうすればよいですか?

ありがとうございました!

4

3 に答える 3

2

フィルターを使用します。上に余分な行を追加しA1、フィルターを作成してフィルターで除外し0ます。VBAは必要ありません:)

カスタム フィルタを作成することもできます。

于 2013-05-14T08:50:45.033 に答える
1

または別の列 (ここでは列Bですが、任意の列にすることができます) およびSpecialCells関数

Sub selectCells()

Dim sFormula As String
Dim lLastRow As Long

lLastRow = Rows(ActiveSheet.Rows.Count).End(xlUp).Row

sFormula = "=IF(A:A>0,NA(),"""")"

With Range("B1:B" & lLastRow)
    .Formula = sFormula
    .SpecialCells(xlCellTypeFormulas, xlErrors).Offset(0, -1).Select
    .clear
End With

End Sub

したがって、これはループなしで目的を達成しますが、フィルターに似ています

于 2013-05-14T10:36:39.753 に答える