Check the two different cells in the same row
Hi all,
Could anyone tell me how to check all cells of the same column by the following conditions: 1) if the cell (D5) is blank and the cell (A5) is not blank, then fill data into D5 2) if the cell (D5) is blank and the cell (A5) is blank, then no need to fill anything Thanks for in advance. Tlee |
Check the two different cells in the same row
It is simplier just to move a into d if a is blank or if a is not blank.
sub CheckColumns RowCount = 1 Do while Range("A" & RowCount) < "" if Range("D" & RowCount) = "" then Range("D" & RowCount) = Range("A" & RowCount) end if RowCount = RowCount + 1 loop end sub "tlee" wrote: Hi all, Could anyone tell me how to check all cells of the same column by the following conditions: 1) if the cell (D5) is blank and the cell (A5) is not blank, then fill data into D5 2) if the cell (D5) is blank and the cell (A5) is blank, then no need to fill anything Thanks for in advance. Tlee |
Check the two different cells in the same row
Hi Joel,
Many thanks for your help!!! Tlee It is simplier just to move a into d if a is blank or if a is not blank. sub CheckColumns RowCount = 1 Do while Range("A" & RowCount) < "" if Range("D" & RowCount) = "" then Range("D" & RowCount) = Range("A" & RowCount) end if RowCount = RowCount + 1 loop end sub "tlee" wrote: Hi all, Could anyone tell me how to check all cells of the same column by the following conditions: 1) if the cell (D5) is blank and the cell (A5) is not blank, then fill data into D5 2) if the cell (D5) is blank and the cell (A5) is blank, then no need to fill anything Thanks for in advance. Tlee |
Check the two different cells in the same row
Hi Joel,
Many thanks for your help!!! Tlee It is simplier just to move a into d if a is blank or if a is not blank. sub CheckColumns RowCount = 1 Do while Range("A" & RowCount) < "" if Range("D" & RowCount) = "" then Range("D" & RowCount) = Range("A" & RowCount) end if RowCount = RowCount + 1 loop end sub "tlee" wrote: Hi all, Could anyone tell me how to check all cells of the same column by the following conditions: 1) if the cell (D5) is blank and the cell (A5) is not blank, then fill data into D5 2) if the cell (D5) is blank and the cell (A5) is blank, then no need to fill anything Thanks for in advance. Tlee |
All times are GMT +1. The time now is 05:12 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com