Re: $$Excel-Macros$$ macro code

2014-01-15 Thread DILIPandey
Hi Boreh, Assuming I = 1, That code is assigning available value in cell B6 to a variable name "AccName" and then on the next cell i.e., Cell C6, it is populating the value of G8 picked up from sheet whose name is there in Cell B6. Cells(5 + I, 2) is B6 Cells(5 + I, 3) is C6 Cells(8, 7) is G8 of

Re: $$Excel-Macros$$ Macro Code??

2014-01-11 Thread Deepak Rawat
Thanks Ravi its working fine! On Fri, Jan 10, 2014 at 3:29 PM, Ravinder wrote: > PFA > > > > *From:* excel-macros@googlegroups.com [mailto: > excel-macros@googlegroups.com] *On Behalf Of *Deepak Rawat > *Sent:* Thursday, January 09, 2014 10:55 AM > *To:* excel-macros > *Subject:* $$Excel-Macros$

RE: $$Excel-Macros$$ Macro Code??

2014-01-10 Thread Ravinder
PFA From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] On Behalf Of Deepak Rawat Sent: Thursday, January 09, 2014 10:55 AM To: excel-macros Subject: $$Excel-Macros$$ Macro Code?? Dear All, I need macro to update multiple sheets from one sheet Ref data is attache

Re: $$Excel-Macros$$ Macro code requirement

2013-10-09 Thread Mukesh Kumar
gt; Sheets(shname).Range("a1").ColumnWidth = 15.4 > > ActiveWindow.DisplayGridlines = False > > Sheets(shname).Range("a7").Validation.Delete > > Sheets(shname).Range("a7") = datash.Cells(i, 1)**** > > > > Next > &

Re: $$Excel-Macros$$ Macro code requirement

2013-10-09 Thread Mukesh Kumar
kesh Kumar > *Sent:* Wednesday, October 09, 2013 4:44 PM > *To:* excel-macros@googlegroups.com > *Subject:* Re: $$Excel-Macros$$ Macro code requirement > > ** ** > > Dear Ravinder Ji, > > I have checked the file, but it is making 50 sheets only. Secondly when I > tri

Re: $$Excel-Macros$$ MACRO CODE REQUIRED

2012-03-30 Thread dguillett1
, 2012 10:00 AM To: excel-macros@googlegroups.com Subject: Re: $$Excel-Macros$$ MACRO CODE REQUIRED Dear Amresh, Please try it.. Sub RenameTabsHandlingNulls() ' Renames all worksheet tabs with each worksheet's cell A1 contents. 'If cell A1 has no content, then the tab is named as &

Re: $$Excel-Macros$$ MACRO CODE REQUIRED

2012-03-30 Thread NOORAIN ANSARI
Dear Amresh, Please check it if this code is not working send a sample sheet On Fri, Mar 30, 2012 at 8:30 PM, NOORAIN ANSARI wrote: > Dear Amresh, > > Please try it.. > > > Sub RenameTabsHandlingNulls() > ' Renames all worksheet tabs with each worksheet's cell A1 contents. > 'If cell A1 has no co

Re: $$Excel-Macros$$ MACRO CODE REQUIRED

2012-03-30 Thread NOORAIN ANSARI
Dear Amresh, Please try it.. Sub RenameTabsHandlingNulls() ' Renames all worksheet tabs with each worksheet's cell A1 contents. 'If cell A1 has no content, then the tab is named as "Default" *Dim sh As String* For i = 1 To Sheets.Count *sh = Left(Worksheets(i).Range("A1").Value, 20)*

Re: $$Excel-Macros$$ *Macro Code Request*

2011-09-20 Thread dguillett1
If you want a macro just use this Sub FillDownSAS() With Range("c2") .Formula = "=a2+b2" .AutoFill Destination:=Range("C2:c" & Cells(Rows.Count, "a").End(xlUp).Row) End With End Sub if you already have the formula in c2 Sub FillDownSAS() range(“c2”).AutoFill Destination:=Range("C2:

Re: $$Excel-Macros$$ *Macro Code Request*

2011-09-20 Thread dguillett1
A very easy way is to put your formula in cell c2 and then DOUBLE click the fill handle (lower right corner) From: Prabhu Sent: Tuesday, September 20, 2011 12:26 PM To: excel-macros@googlegroups.com Subject: $$Excel-Macros$$ *Macro Code Request* Hi Friends, Column A & B contains some values

Re: $$Excel-Macros$$ *Macro Code Request*

2011-09-20 Thread NOORAIN ANSARI
Dear Prabhu, Please see attached sheet if it help to u.. -- Thanks & regards, Noorain Ansari *http://excelmacroworld.blogspot.com/* *http://noorain-ansari.blogspot.com/* On Tue, Sep 20, 2011 Dat 10:56 PM, Prabhu wrote:

Re: $$Excel-Macros$$ ***Macro Code Required to delete Zero value cell and its row***

2011-08-11 Thread dguillett1
: excel-macros@googlegroups.com Subject: Re: $$Excel-Macros$$ ***Macro Code Required to delete Zero value cell and its row*** Hi Prabhu Try Sub Mtest() Dim LR As Long, i As Long LR = ActiveSheet.UsedRange.Row + ActiveSheet.UsedRange.Rows.Count 'LR = Range("P" & Rows.C

Re: $$Excel-Macros$$ ***Macro Code Required to delete Zero value cell and its row***

2011-08-11 Thread Mahesh parab
Hi Prabhu Try Sub Mtest() Dim LR As Long, i As Long LR = ActiveSheet.UsedRange.Row + ActiveSheet.UsedRange.Rows.Count 'LR = Range("P" & Rows.Count).End(xlUp).Row Application.ScreenUpdating = False For i = LR To 1 Step -1 If Cells(i, 16).Value = 0 Then Cells(i, 16).EntireRow.Delete Next i Applicat

RE: $$Excel-Macros$$ ***Macro Code Required to delete Zero value cell and its row***

2011-08-11 Thread Chidurala, Shrinivas
glegroups.com] On Behalf Of Prabhu Sent: Thursday, August 11, 2011 9:45 PM To: excel-macros@googlegroups.com Subject: Re: $$Excel-Macros$$ ***Macro Code Required to delete Zero value cell and its row*** Hi Mahesh, It is deleting entire row wherever zero appearing. But i required in a partiucl

Re: $$Excel-Macros$$ ***Macro Code Required to delete Zero value cell and its row***

2011-08-11 Thread Prabhu
Hi Mahesh, It is deleting entire row wherever zero appearing. But i required in a partiuclar column if Zero value found we need to delete entire row. Ex. If we use base as "P" column, In 13th row of "P" column contains "0" value it has to delete entire 13th Row. It should not search other colu

Re: $$Excel-Macros$$ ***Macro Code Required to delete Zero value cell and its row***

2011-07-28 Thread Mahesh parab
Hi Try Sub Mtest() Dim LR As Long, r As Long LR = ActiveSheet.UsedRange.Row + ActiveSheet.UsedRange.Rows.Count Application.ScreenUpdating = False For r = LR To 1 Step -1 If Application.WorksheetFunction.CountIf(Rows(r), "=0") = 1 Then Rows(r).Delete Next r Application.ScreenUpdating = True End Sub

Re: $$Excel-Macros$$ ***Macro Code Required to delete Zero value cell and its row***

2011-07-28 Thread GoldenLance
XLS S, I would tend to believe that progressing from small to large indices for a row will not solve the problem. A more conservative approach would be the classic reverse look that looks like this Sub DelRowWithZeroes() Dim lngLoop As Long With Worksheets("Sheet1").Range("P3:P13")

Re: $$Excel-Macros$$ ***Macro Code Required to delete Zero value cell and its row***

2011-07-28 Thread XLS S
Sub Delete() On Error Resume Next With Range("A1:A5") .EntireRow.Hidden = False For i = 1 To .Rows.Count If WorksheetFunction.Sum(.Rows(i)) = 0 Then .Rows(i).EntireRow.Delete = True End If Next i End With End Sub On Thu, Jul 28, 2011 at 9:54 PM, Prabhu wrote: > Hi Friends, > > > I Required Mac