Thanks, Sam. That is correct. I USUALLY do use option explicit.
Don Guillett
SalesAid Software
dguille...@gmail.com
From: Sam Mathai Chacko
Sent: Monday, January 23, 2012 9:21 AM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Paste Special Data with 2 decimals (Permanently)
>From what Don intended, I believe it is....
Dim i as long, lr as long, lc as long, mf as range
Regards,
Sam Mathai Chacko
On Mon, Jan 23, 2012 at 8:47 PM, Zafar Iqbal <ziqba...@gmail.com> wrote:
Sir, Thanks for it. Just please guide me about i, lr, lc and mf. I
think that first three are to be defined as integer. What will be mf?
macro will run when we define these items.
Regards,
Zafar Iqbal
On Jan 23, 6:07 pm, Sam Mathai Chacko <samde...@gmail.com> wrote:
> Zafar, your numbers are all coming correct. For the date format, all you
> need to do is format the series to "d-mmm"
>
> Why do you need a macro for that? Keep the custom format, and it will
> always remain.
>
> Sam Mathai Chacko
>
>
>
>
>
> On Mon, Jan 23, 2012 at 8:15 PM, Zafar Iqbal <ziqba...@gmail.com> wrote:
> > We have to define i, lr, lc and mf. I tried with Dim i as integer, Dim
> > lr as Inetger, Dim lc as Integer. But what is mf? I do not know.
> > Please help. Thanks
>
> > On Jan 23, 5:26 pm, "dguillett1" <dguille...@gmail.com> wrote:
> > > Finds last row and last column and formats range and copies sheet1 to
new
> > > book without formulas.
> > > Sub CopyShtwithTWOdecimals()
> > > For i = 1 To Sheets.Count
> > > With Sheets(i)
> > > lr = .Cells.Find("*", Cells(Rows.Count, Columns.Count) _
> > > , , , xlByRows, xlPrevious).Row
> > > lc = .Cells.Find("*", Cells(Rows.Count, Columns.Count) _
> > > , , , xlByColumns, xlPrevious).Column
> > > Set mf = .Cells.Find(What:="Activity", LookIn:=xlValues, _
> > > LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
_
> > > MatchCase:=False)
> > > If Not mf Is Nothing Then
> > > .Range(.Cells(mf.Row, 1), .Cells(lr, lc)).NumberFormat = "0.00"
> > > End If
> > > End With
> > > Next
> > > Sheets("Sheet1").Copy
> > > End Sub
>
> > > Don Guillett
> > > SalesAid Software
> > > dguille...@gmail.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
--
Sam Mathai Chacko
--
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
