HI ALL
I have write small macro , i want revmove subtotal if Active sheet
subtotal method is there
Sub Macro1()
If ActiveSheet.SubtotalMethod = True Then
Selection.RemoveSubtotal
End If
End Sub
can any one correct this code
Regards
chandru
chennai
--
FORUM RULES (986+ me
Hi Asa
Found the files see attached.
Charlie in New Zealand
On Mon, Feb 6, 2012 at 7:14 PM, Asa Rossoff wrote:
> Charlie,
>
> Hmm… still not getting it. Maybe an Excel 2010 incompatibility with your
> file?
>
> Can you right-click the userform and select Export File... then send th
Charlie,
Hmm. still not getting it. Maybe an Excel 2010 incompatibility with your
file?
Can you right-click the userform and select Export File... then send the
resulting .frm and .frx files?
Thanks,
Asa
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf
Dear Experts,
I placed two userforms for a worksheet.
txtavgfrom1 of userform2 should carry the next day of the previous 10
months date of txtdor.text of userform 1
eg. if txtdor.text is 30-04-2041 then txtavgfrom1 of userform2 should carry
01-07-2040.
If the dateavgfrom1 of userform2 not starts
Dear experts.
I attached an excel worksheet and want to refresh data of sheet2. Pls
specify the code.
--
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
Many thanks Don Guillett Sir,
You hv done MORE than my requirement.
=mangal ho [ GOD BLESS ]
On 2/5/12, dguillett1 wrote:
> See Attached to make unique list>filter and copy to new sheets in file
>
> Don Guillett
> SalesAid Software
> dguille...@gmail.com
> -Original Message-
> From: S
Hi Charlie,
Can you post your workbook? The original workbook you posted did not seem
to contain your VBA project--just the data.
If I can see your form code I can better tell what might be going on.
Asa
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Beh
Hi Asa
Have changed the two things, but now I get a 1004 error. Unable to get
the vlookup of the worksheet function class.
Note that I have Option Explicit at top of page, do I need to declare
anything ?
Thanks
Charlie
On Sun, Feb 5, 2012 at 8:20 PM, Asa Rossoff wrote:
> Hi Charlie,
>
Hemant, a humble request not to post such links here in this Excel
community. This community is not dedicated to making money from home, but
to help the online community with Excel based queries and solution to
problems. We are happy to receive Excel or related job advertisements, but
none otherwis
Good even...
I have attached a sample file
depending upon colm A I need to split the whole DATA sheets into
multiple sheets in the same/diff. file each sheets be named as per the
COLM 'A', if possible. These entries are from few to many 100 K [ max
distinct cities < 25, however]
=mangal ho
Thanks Don
Chandru
Chennai.
On Sun, Feb 5, 2012 at 8:08 PM, dguillett1 wrote:
> Sub getdataSAS()
> 'Not as fancy but it gets the job done and understandable "KISS"
> Dim lr As Long
> Dim lc As Long
> Range(Range("g8"), Range("g8").End(xlDown).End(xlToRight)).Clear
>
> With Sheets("data")
> lr
Dear Kaushik,
Please consider this one,
Sub InsertNameInReply()
Dim Msg As Outlook.MailItem
Dim MsgReply As Outlook.MailItem
On Error Resume Next
Select Case TypeName(Application.ActiveWindow)
Case "Explorer"
Set Msg = ActiveExplorer.Selection.Item(1)
Case "Inspector"
Set Msg = ActiveInspector.Cu
Dear Kushik,
Please go in VBE of Outlook
Insert module and paste the code
and run macro
Sub InsertNameInReply()
Dim Msg As Outlook.MailItem
Dim MsgReply As Outlook.MailItem
On Error Resume Next
Select Case TypeName(Application.ActiveWindow)
Case "Explorer"
Set Msg = ActiveExplorer.Selection.Item(
Cong... Noorain
On 2/5/12, sheron joseph wrote:
> Mr.Noorain ..Congratulations
>
>
>
>
>
> With Regards
>
> Sheron Joseph
>
>
>
>
> From: Rohan Young
> To: excel-macros@googlegroups.com
> Sent: Sunday, 5 February 2012 11:06 AM
> Subject: Re: $$Excel-Macros$
sorry Krish its not working its not pickup all data from data sheet
chandru
On Sun, Feb 5, 2012 at 6:23 PM, Kris wrote:
> Hi
>
> Replace these lines
>
> Set rngRowData = rngRowData.SpecialCells(**xlCellTypeVisible)
> Set rngRowData = Intersect(rngRowData, rngRowData.Offset(1))
>
> with
>
Congrats Noorain,..
On Wed, Feb 1, 2012 at 10:11 PM, Ayush Jain wrote:
> Hello Everyone,
>
> Noorain Ansari has been selected as 'Most Helpful Member' for the month of
> Jan'12
> He has posted 175 posts in Jan'12 and helped many people through his
> expertise. He has been consistent contributor
You really need to give us details and send a file with a complete
explanation.
Don Guillett
SalesAid Software
dguille...@gmail.com
-Original Message-
From: Somnath Khadilkar
Sent: Saturday, February 04, 2012 9:55 PM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Need a
Hi
Replace these lines
Set rngRowData = rngRowData.SpecialCells(xlCellTypeVisible)
Set rngRowData = Intersect(rngRowData, rngRowData.Offset(1))
with
Set rngRowData = rngRowData.Offset(1).SpecialCells(xlCellTypeVisible)
Kris
--
FORUM RULES (986+ members already BANNED for violation)
1) Use
Mr.Noorain ..Congratulations
With Regards
Sheron Joseph
From: Rohan Young
To: excel-macros@googlegroups.com
Sent: Sunday, 5 February 2012 11:06 AM
Subject: Re: $$Excel-Macros$$ Most Helpful Member Jan'12 - Noorain Ansari
CONGRATULATION NOORAIN B
19 matches
Mail list logo
