th, FieldInfo:= _
>> Array(Array(0, 1), Array(30, 1))
>>
>> Columns("b:c").AutoFit
>> Columns("b:c").Replace Chr(32), ""
>> Columns("c").HorizontalAlignment = xlRight
>> End Sub
>>
>> Don Guillett
>> SalesAi
Hi
Here is my take on this
In B2
=TRIM(SUBSTITUTE(SUBSTITUTE(A2,C2,""),CHAR(160),CHAR(32)))
In C2
=TRIM(RIGHT(SUBSTITUTE(TRIM(SUBSTITUTE(A2,CHAR(160),CHAR(32))),CHAR(32),REPT(CHAR(32),100)),100))
Kris
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accura
32), ""
Columns("c").HorizontalAlignment = xlRight
End Sub
Don Guillett
SalesAid Software
dguille...@gmail.com
From: Sam Mathai Chacko
Sent: Thursday, February 09, 2012 11:09 AM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ split the value in two part
The macro s
e("B1"), _
>>> DataType:=xlFixedWidth, FieldInfo:=Array(Array(0, 1), _
>>> Array(5, 1), Array(30, 1))
>>> Columns("C:D").AutoFit
>>> Columns("D").HorizontalAlignment = xlRight
>>> End Sub
>>>
>>> Don Guillett
>
Hi,
Please find the attached samplet which is splited.
In the excel sheet go to DATA tab and in this go to Text colum and
changed it. used fixed.
On 2/9/12, Sanjib Chatterjee wrote:
> Dear Sir / Madam,
>
> Please see the attached excel sheet. I like to split the name in one cell
> (i.e. in B
_
>> Array(5, 1), Array(30, 1))
>> Columns("C:D").AutoFit
>> Columns("D").HorizontalAlignment = xlRight
>> End Sub
>>
>> Don Guillett
>> SalesAid Software
>> dguille...@gmail.com
>>
>> *From:* Shaik Waheed
>> *Sen
t; Columns("C:D").AutoFit
> Columns("D").HorizontalAlignment = xlRight
> End Sub
>
> Don Guillett
> SalesAid Software
> dguille...@gmail.com
>
> *From:* Shaik Waheed
> *Sent:* Thursday, February 09, 2012 1:44 AM
> *To:* excel-macros@googlegroups.co
sAid Software
dguille...@gmail.com
From: Shaik Waheed
Sent: Thursday, February 09, 2012 1:44 AM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ split the value in two part
Hi Sanjib,
In your sample data u can do this by clicking to 'Data' tab in ur excel
sheet--->Te
Dear Sanjib,
Please see attached sheet with Formula
For Name
=LEFT(TRIM(SUBSTITUTE(A2,CHAR(160),CHAR(32))),FIND("AB",TRIM(SUBSTITUTE(A2,CHAR(160),CHAR(32-1)
For Registration no..
=RIGHT(TRIM(SUBSTITUTE(A2,CHAR(160),CHAR(32))),LEN(TRIM(SUBSTITUTE(A2,CHAR(160),CHAR(32-FIND("AB",TRIM(SUBSTIT
Hi Sanjib,
In your sample data u can do this by clicking to 'Data' tab in ur excel
sheet--->Text To Colums---> Fixed width-->Next---> Set the scale line as
per ur requirement---> finish
Do the necessary formatting as per ur requirement.
Find the attached sheet for ur review.
On Thu, Feb 9, 2012
10 matches
Mail list logo