Sub select2()
[a1].CurrentRegion.Select
Dim i As Range
For Each i In Selection
If i = "" Or i = "N" Then
i = "false"
End If
Next
End Sub
Sub select2()
[a1].CurrentRegion.Select
Dim i As Range
For Each i In Selection
If i = "" Or i = "N" Then
i = "false"
End If
Next
End Sub