VBA macro to split table to rows by semicolon in two columns

Hello everyone,
i have some trouble with inventing a way to solve my problem. I'm relatively new in vba so I want to ask you to help me

I have table and I want to multiply rows and split data from two columns (info separated by semicolon) to rows. Like in the picture below.

table_sample.jpg


Thanks in advance for your help!!

Try this

Please Login or Register  to view this content.

Thanks mrice for your quick answer, for my example it's works great, but if i would have table containing 50 columns and my two columns i would like to split will be somewhere in the middle of that i have to copy this "Cells(Rows.Count, 8).End(xlUp).Offset(1, 0) = Cells(N, 1)" line for 50 times?

You try an additional loop.

Please Login or Register  to view this content.

this is great and does just what i want but with one alteration ( if possible ) could you do the same split it down and keep same data if the text in the cell had no ; or is that just a pipe dream