VBA for edit text and remove blank rows

[oguztuna]

I m finding out VBA for merging text with a space from below cells which has blank at the next column , and then remove the row that has blanks, as shown below.

First Form

1		1.500WT - PIPE SSAWL API 5L BE		30	PPXC209620	7.0M
		API-5L-X65M PSL-2 LTD
2		SCH80 - PIPE SSAWL API 5L BE API-5L-X65M		24	PPXC209619	1.2M
		PSL-2 LTD
3		SCH80 - PIPE SSAWL API 5L BE API-5L-X65M		18	PPXC209617	2.3M
		PSL-2 LTD
4		1.500WT - ELL 90 LR WLD MSSSP-75 (PSO)		30	PCHB11545	1
		BE A860 MSS SP75-WPHY-65
5		1.500WT - FLG WN MSS-SP-44 BE/RF CL 900		30	PFWA265709	1
		A707-L5 CL4

<colgroup><col span="2"><col><col><col><col><col></colgroup><tbody>
</tbody>

After Edit

1		1.500WT - PIPE SSAWL API 5L BE API-5L-X65M PSL-2 LTD		30	PPXC209620	7.0M
2		SCH80 - PIPE SSAWL API 5L BE API-5L-X65M PSL-2 LTD		24	PPXC209619	1.2M
3		SCH80 - PIPE SSAWL API 5L BE API-5L-X65M PSL-2 LTD		18	PPXC209617	2.3M
4		1.500WT - ELL 90 LR WLD MSSSP-75 (PSO) BE A860 MSS SP75-WPHY-65		30	PCHB11545	1
5		1.500WT - FLG WN MSS-SP-44 BE/RF CL 900 A707-L5 CL4		30	PFWA265709	1

<colgroup><col span="2"><col><col><col><col><col></colgroup><tbody>
</tbody>

Many Thanks

 

[Peter_SSs]

Duplicate to [url]http://www.mrexcel.com/forum/excel-questions/913125-visual-basic-applications-question-text-isometric-drawings.html[/URL]

Please do not post the same question multiple times. Questions of a duplicate nature will be locked or deleted, per #12 of the Forum Rules.

Any bumps, clarifications, or follow-ups should be posted to the linked thread.