cialCells(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
Hi Noorain
Can u give a macro for this urgently
On Jan 13, 2012, at 9:55 AM, NOORAIN ANSARI 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.
___
> From: NOORAIN ANSARI
> To: excel-macros@googlegroups.com
> Sent: Friday, 13 January 2012 8:25 PM
> Subject: Re: $$Excel-Macros$$ Delete text only
>
>
> Dear Lokesh,
>
> Please try it..
>
> Sub Copy_and_Delete_Text()
> Dim rng, r
Thanx
From: Maries
To: excel-macros@googlegroups.com
Sent: Saturday, 14 January 2012 5:51 PM
Subject: Re: $$Excel-Macros$$ Delete text only
Use below code:
Sub OnlyNumric()
Dim rng As Range
Set rng = Range("Sheet1!A1:A1000")
For i =
legroups.com
> Sent: Friday, 13 January 2012 8:25 PM
> Subject: Re: $$Excel-Macros$$ Delete text only
>
>
> 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"
Dear Noorain,
it, ok
but if i want to remove number/disite?
Regards
LAKSHMAN
From: NOORAIN ANSARI
To: excel-macros@googlegroups.com
Sent: Friday, 13 January 2012 8:25 PM
Subject: Re: $$Excel-Macros$$ Delete text only
Dear Lokesh,
Please try it..
Sub
Hi All,
Thanks to all of you experts, Keep rocking !.
Regards
Lokesh.M
On 1/13/12, NOORAIN ANSARI 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
ize(wksSheet.Range("a2").End(xlDown).Row,
1).SpecialCells(xlCellTypeVisible).EntireRow.Delete
Application.ScreenUpdating = True
End Sub
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of Lokesh Loki
Sent: Jan/Fri/2012 03:44
To: excel-macros@googlegrou
This leaves col a as desired.If you don’t need to keep then delete 1st line and
change D to A
Sub Copycolatod_DeleteTextSAS()
Columns("A").Copy Range("D1")
Columns("D").SpecialCells(xlCellTypeConstants, 2).Delete Shift:=xlUp
End Sub
Don Guillett
SalesAid Software
dguille...@gmail.com
From: Lokes
Use custom filter "is Greater then or equal to " with "a" then delete all
visible rows
Rajan.
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of Lokesh Loki
Sent: Jan/Fri/2012 03:12
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Delete text
No Sir i want macros, because of in my log i have mentioned so many
formulas so the excel sheet is gets very slow hence i want macros.
Please do the needful.
Regards
Lokesh.M
On Fri, Jan 13, 2012 at 3:23 PM, Anjul Porwal wrote:
> hi,
>
> use formula *IF(ISTEXT(A2),"Delete","")*
>
> Regards
> A
11 matches
Mail list logo