A列の1行目から最終行まで処理を繰り返すにはこれで良いかと思うのですが
B列に値が入っていない所から同じ処理をさせるようにするにはどうすればよいのでしょうか?

For wRow = 1 To Range("A" & Rows.Count).End(xlUp).Row
・・・
・・

Next

 A B
1 x x
2 x x
3 x x
4 x    ←この列から処理を始めたい
5 x