).UsedRange.Rows.Count - 1
>> Sheets("Report1").Range("e" & i).Activate
>> Application.SendKeys "{f2}"
>> Application.SendKeys "~"
>>
>>
>>
>>
>>
>>
>> Next
>> End Sub
>>
>>
>> --
lication.SendKeys "{f2}"
> Application.SendKeys "~"
>
>
>
>
>
>
> Next
> End Sub
>
>
> ------
> *From:* Rajan sharma
> *To:* "excel-macros@googlegroups.com"
> *Sent:* Tuesday, August 6, 2013 5:41 PM
>
Dear Ashish sir,
Thanks for the prompt reply. the code provided is not affecting the
format. Can you plse elaborate a bit more.
With warm regards,
Rajan Sharma
On Tue, Aug 6, 2013 at 8:23 PM, ashish koul wrote:
> try this
> Sub test()
> Dim cl As Range
>
> For Each cl In ActiveSheet.Us
try this
Sub test()
Dim cl As Range
For Each cl In ActiveSheet.UsedRange
If cl.Value <> "" And (cl.Column = 5 Or cl.Column = 7) Then
cl.Value = cl.Value
End If
Next
End Sub
On Tue, Aug 6, 2013 at 6:02 PM, Rajan sharma wrote:
> experts, can it be possible as per my query ?
>
>
>
>
> With
experts, can it be possible as per my query ?
With warm regards,
Rajan Sharma
On Tue, Aug 6, 2013 at 5:41 PM, Rajan sharma wrote:
> Dear experts,
>
> i have a excel file which is extracted from a application as seen in
> attached sample file. but the problem is that the numbers are in t
Dear experts,
i have a excel file which is extracted from a application as seen in
attached sample file. but the problem is that the numbers are in text
format, i want it to open as number format automatically, can be done like
that.
With warm regards,
Rajan Sharma
--
Are you =EXP(E:RT)