Need to fill a column if the column next to it is not blank
On 15 May, 22:32, "Spicelon" wrote:
Try something like this:
Dim rng as Range, c as Range
Set rng = Range("A1:A10") * * 'adjust as needed for your own needs
For Each c in rng.Cells
* * if c.Value = "" then c.Offset(0, 1).Value = 1
Next c
HTH
Thanks, that is great!
|