I am just getting started with VBA and my need described below has similarities to other posts but adapting other solutions is beyond my current knowledge - I would greatly appreciate anyone who could advance my learning to achieve the following:
In the uploaded minisheet I show the "before and after" of what I need a VBA routine to do.
Specifically, in the Range A1:B9, I need the code to:
- check each row in turn, and where
the value in column A is = "", copy the value in the adjacent cell in Column B on the same row and
Add it (concatenate it) to the existing value (on a new line) in the cell immediately above it and then
Delete the complete row that had the value "" in Column A.
Thanks in advance for your help/coaching.
In the uploaded minisheet I show the "before and after" of what I need a VBA routine to do.
Specifically, in the Range A1:B9, I need the code to:
- check each row in turn, and where
the value in column A is = "", copy the value in the adjacent cell in Column B on the same row and
Add it (concatenate it) to the existing value (on a new line) in the cell immediately above it and then
Delete the complete row that had the value "" in Column A.
Thanks in advance for your help/coaching.
| Concatonate Values on blank condition .xlsm | |||||||||
|---|---|---|---|---|---|---|---|---|---|
| A | B | C | D | E | F | G | |||
| 1 | 01-Nov-21 | Description 1of2 | < BEFORE | AFTER > | 01-Nov-21 | Description 1of2 Description 2of2 | |||
| 2 | Description 2of2 | 02-Nov-21 | Description 1of2 Description 2of2 | ||||||
| 3 | 02-Nov-21 | Description 1of2 | 02-Nov-21 | Description 1 | |||||
| 4 | Description 2of2 | 03-Nov-21 | Description 1 | ||||||
| 5 | 02-Nov-21 | Description 1 | 04-Nov-21 | Description 1of2 Description 2of2 | |||||
| 6 | 03-Nov-21 | Description 1 | 05-Nov-21 | Description 1 | |||||
| 7 | 04-Nov-21 | Description 1of2 | |||||||
| 8 | Description 2of2 | ||||||||
| 9 | 05-Nov-21 | Description 1 | |||||||
Data-before&after | |||||||||
