Combine cell data based on adjacent cells?

Sasha2016
Sasha2016 used Ask the Experts™
on
Combine cell data based on values in adjacent cells. Sample screenshot attached.

Is there a formula or VBA that can achieve this?
It's OK to have helper columns if needed.
screenshot
Comment
Watch Question

Do more with

Expert Office
EXPERT OFFICE® is a registered trademark of EXPERTS EXCHANGE®
Martin LissOlder than dirt
Most Valuable Expert 2017
Distinguished Expert 2018

Commented:
If you can, please attach a sample workbook.

Author

Commented:
Spreadsheet attached....thanks
sample.xlsm

Author

Commented:
Would it be easier if there are blank rows separating cells?

I've been trying (without success) to find a VBA code that would do following:
If AB is NOT blank, concatenate values from AD until blank row reached
Ensure you’re charging the right price for your IT

Do you wonder if your IT business is truly profitable or if you should raise your prices? Learn how to calculate your overhead burden using our free interactive tool and use it to determine the right price for your IT services. Start calculating Now!

Author

Commented:
Will revise and re-post....added blank rows (hopefully it will be easier for VBA code)
Martin LissOlder than dirt
Most Valuable Expert 2017
Distinguished Expert 2018

Commented:
It's not necessary. I'll have your solution in a few minutes.

Author

Commented:
Sound like solution is coming soon :)

Author

Commented:
Hi Martin,
See attached sample, if it's easier to achieve this with blank rows, that would work too....which ever version of the file works for you.
Thanks!
Book1.xlsx
Older than dirt
Most Valuable Expert 2017
Distinguished Expert 2018
Commented:
This works with no blank lines.
29126114.xlsm

Author

Commented:
Hi Martin,
Thanks for this...It's huge help!
Only thing I noticed that needs a tweak is the last row with info...it adds a bunch of semi-colons    ;;;;;;;;;;
Any way to correct that?

Author

Commented:
Never mind...I found a work-around. I'll have it delete rows after last one with info prior to running your code.
Just tested it...works great!

Thanks again!
Sasha
Martin LissOlder than dirt
Most Valuable Expert 2017
Distinguished Expert 2018

Commented:
Sorry I didn't notice that. There was some formatting below row 91 that caused VBA to miscalculate the last row with data. That's been corrected in the attached workbook.
29126114a.xlsm

Author

Commented:
Thanks again...I was really stuck on this :)
Martin LissOlder than dirt
Most Valuable Expert 2017
Distinguished Expert 2018

Commented:
You’re welcome and I’m glad I was able to help.

If you expand the “Full Biography” section of my profile you’ll find links to some articles I’ve written that may interest you.

Marty - Microsoft MVP 2009 to 2017
              Experts Exchange Most Valuable Expert (MVE) 2015, 2017
              Experts Exchange Top Expert Visual Basic Classic 2012 to 2017
              Experts Exchange Top Expert VBA (current)

Do more with

Expert Office
Submit tech questions to Ask the Experts™ at any time to receive solutions, advice, and new ideas from leading industry professionals.

Start 7-Day Free Trial