Did you try this macro?.
Sub Copycolatod_DeleteTextSAS()
Columns("A").Copy Range("D1")
Columns("D").SpecialCells(xlCellTypeConstants, 2).Delete Shift:=xlUp
End Sub
If you do NOT need to keep col A then simply
Sub DeleteTextinColumnA_SAS()
Columns("A").SpecialCells(xlCellTypeConstants, 2).Delete Shift:=xlUp
End Sub
Don Guillett
SalesAid Software
dguille...@gmail.com
From: Ram
Sent: Sunday, January 15, 2012 4:33 PM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Delete text only
Hi Noorain
Can u give a macro for this urgently
On Jan 13, 2012, at 9:55 AM, NOORAIN ANSARI <noorain.ans...@gmail.com> wrote:
Dear Lokesh,
Please try it..
Sub Copy_and_Delete_Text()
Dim rng, rng1, rng2 As Range
Dim i, j As Long
Set rng = Sheet1.Range("A1:A" & Sheet1.Range("A65536").End(xlUp).Row)
rng.Copy Sheet1.Range("D1")
Set rng1 = Sheet1.Range("D2:D" & Sheet1.Range("D65536").End(xlUp).Row)
For Each rng2 In rng1
If Application.WorksheetFunction.IsText(rng2) Then
rng2.Delete
End If
Next
End Sub
and see attached sheet..
--
Thanks & regards,
Noorain Ansari
http://excelmacroworld.blogspot.com/
www.noorainansari.com
On Fri, Jan 13, 2012 at 3:12 PM, Lokesh Loki <lokeshsmg2...@gmail.com> wrote:
Hi All,
First i need to copy the Cell A and paste it to Cell D and delete the names
(i.e.text) in Cell D through VBA.
Find the attached excel file.
Regards
Lokesh.M
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please
Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will
not get quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security
measure.
4) Acknowledge the responses you receive, good or bad.
5) Cross-promotion of, or links to, forums competitive to this forum in
signatures are prohibited.
NOTE : Don't ever post personal or confidential data in a workbook. Forum
owners and members are not responsible for any loss.
------------------------------------------------------------------------------------------------------
To post to this group, send email to excel-macros@googlegroups.com
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Cross-promotion of, or links to, forums competitive to this forum in
signatures are prohibited.
NOTE : Don't ever post personal or confidential data in a workbook. Forum
owners and members are not responsible for any loss.
------------------------------------------------------------------------------------------------------
To post to this group, send email to excel-macros@googlegroups.com
<delete text.xls>
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Cross-promotion of, or links to, forums competitive to this forum in
signatures are prohibited.
NOTE : Don't ever post personal or confidential data in a workbook. Forum
owners and members are not responsible for any loss.
------------------------------------------------------------------------------------------------------
To post to this group, send email to excel-macros@googlegroups.com
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Cross-promotion of, or links to, forums competitive to this forum in
signatures are prohibited.
NOTE : Don't ever post personal or confidential data in a workbook. Forum
owners and members are not responsible for any loss.
------------------------------------------------------------------------------------------------------
To post to this group, send email to excel-macros@googlegroups.com
