VBA Required to split cells & calcuate

**amb2301** · 09-03-2020, 12:57 PM

Hi Friends,
For long i m doing this manual task, were i need to split cells/Delimit cells which is in C7:C15 (Combined range), Here i need to
split cells with some standards applied over it,

** If (combined range) it starts with Numeric, then it should split the combined range for 2 times as shown in attached sample
file, one with P & the other with N in the Route Column.
** If (combined range) it starts with Alphabets, it should get splitted for 1 time as shown in samples

then need to put start & End number in sequence manner, only for the P & X (Route Column).

Samples with clearly explain better then me, so please refer the attached excel file (sheet1 & 2)

I hope someone could help me to do this Task using VBA.

Thanks in Advance.

**Bernie Deitrick** · 09-03-2020, 02:22 PM

You don't need VBA - here's a file with formulas and some slight rearrangement of your results...

**amb2301** · 09-03-2020, 02:30 PM

Originally Posted by Bernie Deitrick

You don't need VBA - here's a file with formulas and some slight rearrangement of your results...

Thank you so much Bernie

its working perfectly

**amb2301** · 11-27-2020, 03:04 PM

Hi Bernie, from the above provided solution, you have saved lot of my time in my work.
Thank you so much for that work.

Here i got a small change/Amend in my work, so i m here again seeking your help.
its better to understand my request with the attached sample file, as my english is poor.
in the attached sample file, i have shown the difference of existing formula & Required once,
Actually before the semicolon(":") if the letter D comes, then the exisiting formula is Okay for me, but if the Letter is other than D, then i need the formula to be worked as per the numerical values like in the sample.

Please help me on this & it would be a great help for me.
Thanks in Advance.

**Bernie Deitrick** · 11-27-2020, 03:30 PM

I think this will work. In D6, use

=IFERROR(VALUE(LEFT(C6,FIND(":",C6)-1)),IF(MID(C6,FIND(":",C6)-1,2)<>"D:",LEFT(C6,FIND(":",C6)-1),""))

and then copy down.

**amb2301** · 11-28-2020, 09:56 AM

Originally Posted by Bernie Deitrick

I think this will work. In D6, use

=IFERROR(VALUE(LEFT(C6,FIND(":",C6)-1)),IF(MID(C6,FIND(":",C6)-1,2)<>"D:",LEFT(C6,FIND(":",C6)-1),""))

and then copy down.

Thatz a perfect one

worked fine .
Thank you so much for your Help Bernie

VBA Required to split cells & calcuate

LinkBack

Thread Tools

Rate This Thread

Display

VBA Required to split cells & calcuate

Re: VBA Required to split cells & calcuate

Re: VBA Required to split cells & calcuate

Re: VBA Required to split cells & calcuate

Re: VBA Required to split cells & calcuate

Re: VBA Required to split cells & calcuate

Thread Information

Users Browsing this Thread

Similar Threads

[SOLVED] VBA required to split some specific end word to another column

VBA Required to split addresses

[SOLVED] Edit vba to split values over 10 columns and required rows

[SOLVED] Needs to calcuate a Dymamic value relative to 2 cells

[SOLVED] Formula required to split uneven data into different columns

[SOLVED] Fucntion Required for Split data

Macro required to split in to Multiple files

Tags for this Thread

Bookmarks

Bookmarks

Posting Permissions