Thanks Ashish Sir, For such nice solution & time
Sorry for late reply On Tue, Feb 8, 2011 at 8:23 PM, ashish koul <koul.ash...@gmail.com> wrote: > try this > > > On Mon, Feb 7, 2011 at 9:10 PM, maulik desai <mauliksde...@gmail.com>wrote: > >> Hello sir >> >> please provide me the correction in your macro actully i just want to >> chang the column no as per my database in macro,i have tried but not >> get the proper out that is why i want u to just change the column no >> based on attached file in my prev mail in macro and send it back that >> it >> >> thanks >> >> >> >> >> On 2/5/11, maulik desai <mauliksde...@gmail.com> wrote: >> > hello Sir, >> > >> > Sorry for delay replay please find the dummy my database sheet with the >> > same >> > column no which is apper in database >> > >> > i want the same macro or formula as a output for attached file. >> > >> > Once again Congrates Ashish sir. >> > >> > On Thu, Feb 3, 2011 at 2:16 PM, ashish koul <koul.ash...@gmail.com> >> wrote: >> > >> >> >> >> yo have sent me the same file >> >> >> >> sent me this one >> >> >> >> header - column no. >> >> Name - 4 >> >> process doj -63 >> >> process - 61 >> >> ref type -87 >> >> process doj 1 -92 >> >> process1 -90 >> >> ref type 1-116 >> >> process doj 2-123 >> >> process 2 - 121 >> >> ref type 2 -147 >> >> process doj 3-154 >> >> process 3- 152 >> >> ref type 3-178 >> >> final status-236 >> >> >> >> >> >> >> >> On Wed, Feb 2, 2011 at 9:09 PM, maulik desai >> >> <mauliksde...@gmail.com>wrote: >> >> >> >>> Hello sir please find the file as requested >> >>> >> >>> ---------- Forwarded message ---------- >> >>> From: ashish koul <koul.ash...@gmail.com> >> >>> Date: Wed, 2 Feb 2011 12:35:27 +0530 >> >>> Subject: Re: $$Excel-Macros$$ How to Pull out Ref type Value base on >> >>> process DOJ & Process Name >> >>> To: excel-macros@googlegroups.com >> >>> >> >>> see if it helps >> >>> >> >>> Sub add_data() >> >>> Application.ScreenUpdating = False >> >>> Application.DisplayAlerts = False >> >>> Dim i, j, k, s As Long >> >>> s = 2 >> >>> Sheets(2).Range("a2:d" & Sheets(2).Range("a1").End(xlDown).Row).Clear >> >>> For i = 2 To Sheets(1).Range("A2").End(xlDown).Row >> >>> For j = 2 To Sheets(1).Range("A1").End(xlToRight).Column >> >>> If UCase(Application.WorksheetFunction.Trim(Left(Sheets(1).Cells(1, >> >>> j).Value, 11))) = UCase("Process DOJ") Then >> >>> >> >>> Sheets(2).Cells(s, 1).Value = Sheets(1).Cells(i, 1).Value >> >>> Sheets(2).Cells(s, 2).Value = Sheets(1).Cells(i, j).Value >> >>> Sheets(2).Cells(s, 3).Value = Sheets(1).Cells(i, j + 1).Value >> >>> Sheets(2).Cells(s, 4).Value = Sheets(1).Cells(i, j + 2).Value >> >>> >> >>> If UCase(Application.WorksheetFunction.Trim(Sheets(1).Cells(1, j + >> >>> 3).Value)) = UCase("Final Status") Then >> >>> Sheets(2).Cells(s, 4).Value = Sheets(1).Cells(i, j + 3).Value >> >>> End If >> >>> >> >>> s = s + 1 >> >>> End If >> >>> Next j >> >>> s = s + 1 >> >>> Next i >> >>> Application.ScreenUpdating = True >> >>> Application.DisplayAlerts = True >> >>> End Sub >> >>> >> >>> >> >>> >> >>> On Tue, Feb 1, 2011 at 10:20 AM, maulik desai <mauliksde...@gmail.com >> >>> >wrote: >> >>> >> >>> > >> >>> > Hi Guru, >> >>> > >> >>> > Kindly Provide the solution for attached file >> >>> > >> >>> > My problem is: >> >>> > >> >>> > I am having 2 workbook , in 1st Excel Workbook (Database) I m having >> >>> data >> >>> > with multipul Process name ,doj & their respective ref type >> >>> > what I want that in 2nd excel sheet (working File) I am having diff >> >>> format >> >>> > (mention above) ,with individual Entries as per process name & >> process >> >>> DOJ >> >>> > Kindly proive me the solution that how can I get the Ref type as per >> >>> > process doj & Process name >> >>> > Kindly note that some time the process name & process doj is same >> but >> >>> their >> >>> > ref type is diff so in that case I want the last or latest entry's >> ref >> >>> type >> >>> > as out put as mention in above case (mention in yellow) >> >>> > >> >>> > -- >> >>> > Thanks & Regards, >> >>> > Maulik Desai >> >>> > 9967363926 >> >>> > >> >>> > -- >> >>> > >> >>> > >> >>> >> ---------------------------------------------------------------------------------- >> >>> > Some important links for excel users: >> >>> > 1. Follow us on TWITTER for tips tricks and links : >> >>> > http://twitter.com/exceldailytip >> >>> > 2. Join our LinkedIN group @ >> >>> > http://www.linkedin.com/groups?gid=1871310 >> >>> > 3. Excel tutorials at http://www.excel-macros.blogspot.com >> >>> > 4. Learn VBA Macros at http://www.quickvba.blogspot.com >> >>> > 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com >> >>> > >> >>> > To post to this group, send email to excel-macros@googlegroups.com >> >>> > >> >>> > <><><><><><><><><><><><><><><><><><><><><><> >> >>> > Like our page on facebook , Just follow below link >> >>> > http://www.facebook.com/discussexcel >> >>> > >> >>> >> >>> >> >>> >> >>> -- >> >>> *Regards* >> >>> * * >> >>> *Ashish Koul* >> >>> *akoul*.*blogspot*.com <http://akoul.blogspot.com/> >> >>> *akoul*.wordpress.com <http://akoul.wordpress.com/> >> >>> My Linkedin Profile < >> http://in.linkedin.com/pub/ashish-koul/10/400/830> >> >>> >> >>> >> >>> P Before printing, think about the environment. >> >>> >> >>> -- >> >>> >> >>> >> ---------------------------------------------------------------------------------- >> >>> Some important links for excel users: >> >>> 1. Follow us on TWITTER for tips tricks and links : >> >>> http://twitter.com/exceldailytip >> >>> 2. Join our LinkedIN group @ >> http://www.linkedin.com/groups?gid=1871310 >> >>> 3. Excel tutorials at http://www.excel-macros.blogspot.com >> >>> 4. Learn VBA Macros at http://www.quickvba.blogspot.com >> >>> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com >> >>> >> >>> To post to this group, send email to excel-macros@googlegroups.com >> >>> >> >>> <><><><><><><><><><><><><><><><><><><><><><> >> >>> Like our page on facebook , Just follow below link >> >>> http://www.facebook.com/discussexcel >> >>> >> >>> -- >> >>> Sent from my mobile device >> >>> >> >>> Thanks & Regards, >> >>> Maulik Desai >> >>> 9967363926 >> >>> >> >> >> >> >> >> >> >> -- >> >> *Regards* >> >> * * >> >> *Ashish Koul* >> >> *akoul*.*blogspot*.com <http://akoul.blogspot.com/> >> >> *akoul*.wordpress.com <http://akoul.wordpress.com/> >> >> My Linkedin Profile <http://in.linkedin.com/pub/ashish-koul/10/400/830 >> > >> >> >> >> >> >> P Before printing, think about the environment. >> >> >> >> >> >> >> > >> > >> > -- >> > Thanks & Regards, >> > Maulik Desai >> > 9967363926 >> > >> >> -- >> Sent from my mobile device >> >> Thanks & Regards, >> Maulik Desai >> 9967363926 >> > > > > -- > *Regards* > * * > *Ashish Koul* > *akoul*.*blogspot*.com <http://akoul.blogspot.com/> > *akoul*.wordpress.com <http://akoul.wordpress.com/> > My Linkedin Profile <http://in.linkedin.com/pub/ashish-koul/10/400/830> > > > P Before printing, think about the environment. > > > -- Thanks & Regards, Maulik Desai 9967363926 -- ---------------------------------------------------------------------------------- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com <><><><><><><><><><><><><><><><><><><><><><> Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel