RE: $$Excel-Macros$$ Re: Copy data to next empty row
Hi, Ok, please see the below code, if still it's not fine then let me know Sub findlastrow() Dim rng As Range Set rng = Range(A37:A115 ) For Each c In rng If c.Value = Then storeval = c.Row MsgBox storeval Exit Sub End If Next End Sub Warm Regards, Ravi Kumar. From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] On Behalf Of DanJ Sent: Friday, August 30, 2013 12:21 PM To: excel-macros@googlegroups.com Subject: $$Excel-Macros$$ Re: Copy data to next empty row Dear Experts, Thank you for your quick replies. Sorry, if my question was not clear. What I wanted to find is the last row within the range A37:A115 of the first workbook. Again, thank you. DanJ On Friday, August 30, 2013 12:39:15 PM UTC+8, DanJ wrote: Dear Experts, I have a range, A37:A115, in my first (1st) workbook where I copy and paste data from my second and third workbook, respectively. Since the number of rows to be copied from the second workbook vary daily, the next empty row in range A37:A115 of the first workbook changes too. How do i determine or code the next empty row where the data from the third workbook have to be copied and pasted? Thank you in advance for your help. DanJ -- Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It's =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ https://www.facebook.com/discussexcel FORUM RULES 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) Jobs posting is not allowed. 6) Sharing copyrighted material and their links is not allowed. NOTE : Don't ever post confidential data in a workbook. Forum owners and members are not responsible for any loss. --- You received this message because you are subscribed to the Google Groups MS EXCEL AND VBA MACROS group. To unsubscribe from this group and stop receiving emails from it, send an email to excel-macros+unsubscr...@googlegroups.com mailto:excel-macros+unsubscr...@googlegroups.com . To post to this group, send email to excel-macros@googlegroups.com mailto:excel-macros@googlegroups.com . Visit this group at http://groups.google.com/group/excel-macros. For more options, visit https://groups.google.com/groups/opt_out. -- Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ https://www.facebook.com/discussexcel FORUM RULES 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) Jobs posting is not allowed. 6) Sharing copyrighted material and their links is not allowed. NOTE : Don't ever post confidential data in a workbook. Forum owners and members are not responsible for any loss. --- You received this message because you are subscribed to the Google Groups MS EXCEL AND VBA MACROS group. To unsubscribe from this group and stop receiving emails from it, send an email to excel-macros+unsubscr...@googlegroups.com. To post to this group, send email to excel-macros@googlegroups.com. Visit this group at http://groups.google.com/group/excel-macros. For more options, visit https://groups.google.com/groups/opt_out.
RE: $$Excel-Macros$$ Re: Copy data to next empty row
Yes, that's perfect Warm Regards, Ravi Kumar. From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] On Behalf Of Dante Julian Sent: Friday, August 30, 2013 1:03 PM To: excel-macros@googlegroups.com Subject: Re: $$Excel-Macros$$ Re: Copy data to next empty row Dear Ravi, Did figure it out. In your code, I replaced the line Msgbox storeval with c.Select. Thank you and best regards, DanJ _ From: Ravi Kumar excellearn2...@gmail.com mailto:excellearn2...@gmail.com To: excel-macros@googlegroups.com mailto:excel-macros@googlegroups.com Sent: Friday, August 30, 2013 2:57 PM Subject: RE: $$Excel-Macros$$ Re: Copy data to next empty row Hi, Ok, please see the below code, if still it's not fine then let me know Sub findlastrow() Dim rng As Range Set rng = Range(A37:A115 ) For Each c In rng If c.Value = Then storeval = c.Row MsgBox storeval Exit Sub End If Next End Sub Warm Regards, Ravi Kumar. From: excel-macros@googlegroups.com mailto:excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] On Behalf Of DanJ Sent: Friday, August 30, 2013 12:21 PM To: excel-macros@googlegroups.com mailto:excel-macros@googlegroups.com Subject: $$Excel-Macros$$ Re: Copy data to next empty row Dear Experts, Thank you for your quick replies. Sorry, if my question was not clear. What I wanted to find is the last row within the range A37:A115 of the first workbook. Again, thank you. DanJ On Friday, August 30, 2013 12:39:15 PM UTC+8, DanJ wrote: Dear Experts, I have a range, A37:A115, in my first (1st) workbook where I copy and paste data from my second and third workbook, respectively. Since the number of rows to be copied from the second workbook vary daily, the next empty row in range A37:A115 of the first workbook changes too. How do i determine or code the next empty row where the data from the third workbook have to be copied and pasted? Thank you in advance for your help. DanJ -- Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It's =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ https://www.facebook.com/discussexcel FORUM RULES 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) Jobs posting is not allowed. 6) Sharing copyrighted material and their links is not allowed. NOTE : Don't ever post confidential data in a workbook. Forum owners and members are not responsible for any loss. --- You received this message because you are subscribed to the Google Groups MS EXCEL AND VBA MACROS group. To unsubscribe from this group and stop receiving emails from it, send an email to excel-macros+unsubscr...@googlegroups.com mailto:excel-macros+unsubscr...@googlegroups.com . To post to this group, send email to excel-macros@googlegroups.com mailto:excel-macros@googlegroups.com . Visit this group at http://groups.google.com/group/excel-macros. For more options, visit https://groups.google.com/groups/opt_out. -- Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It's =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ https://www.facebook.com/discussexcel FORUM RULES 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) Jobs posting is not allowed. 6) Sharing copyrighted material and their links is not allowed. NOTE : Don't ever post confidential data in a workbook. Forum owners and members are not responsible for any loss. --- You received this message because you are subscribed to a topic in the Google Groups MS EXCEL AND VBA MACROS group. To unsubscribe from this topic, visit https://groups.google.com/d/topic/excel-macros/3iL-MbtQduo/unsubscribe. To unsubscribe from this group and all its topics, send an email to excel-macros+unsubscr...@googlegroups.com mailto:excel-macros+unsubscr...@googlegroups.com . To post to this group, send email to excel-macros@googlegroups.com mailto:excel-macros@googlegroups.com . Visit this group at http://groups.google.com/group/excel-macros. For more options, visit https://groups.google.com/groups/opt_out. -- Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It's =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ https
Re: $$Excel-Macros$$ Re: Copy data to next empty row
Have you try something like bellow ? Sub NextEmpty() Range(A37).End(xlDown).Offset(1).Select End Sub Rgds, [dp] Pada 30/08/2013 14:35, Ravi Kumar menulis: Yes, that’s perfect // */Warm Regards,/* */Ravi Kumar./* *From:*excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] *On Behalf Of *Dante Julian *Sent:* Friday, August 30, 2013 1:03 PM *To:* excel-macros@googlegroups.com *Subject:* Re: $$Excel-Macros$$ Re: Copy data to next empty row Dear Ravi, Did figure it out. In your code, I replaced the line Msgbox storeval with c.Select. Thank you and best regards, DanJ *From:*Ravi Kumar excellearn2...@gmail.com mailto:excellearn2...@gmail.com *To:* excel-macros@googlegroups.com mailto:excel-macros@googlegroups.com *Sent:* Friday, August 30, 2013 2:57 PM *Subject:* RE: $$Excel-Macros$$ Re: Copy data to next empty row Hi, Ok, please see the below code, if still it’s not fine then let me know Sub findlastrow() Dim rng As Range Set rng = Range(A37:A115 ) For Each c In rng If c.Value = Then storeval = c.Row MsgBox storeval Exit Sub End If Next End Sub // */Warm Regards,/* */Ravi Kumar./* *From:*excel-macros@googlegroups.com mailto:excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] *On Behalf Of *DanJ *Sent:* Friday, August 30, 2013 12:21 PM *To:* excel-macros@googlegroups.com mailto:excel-macros@googlegroups.com *Subject:* $$Excel-Macros$$ Re: Copy data to next empty row Dear Experts, Thank you for your quick replies. Sorry, if my question was not clear. What I wanted to find is the last row within the range A37:A115 of the first workbook. Again, thank you. DanJ On Friday, August 30, 2013 12:39:15 PM UTC+8, DanJ wrote: Dear Experts, I have a range, * A37:A115,* in my first (1st) workbook where I copy and paste data from my second and third workbook, respectively. Since the number of rows to be copied from the *second workbook* vary daily, the next empty row in range *A37:A115* of the first workbook changes too. How do i determine or code the next empty row where the data from the*third workbook* have to be copied and pasted? Thank you in advance for your help. DanJ -- Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ https://www.facebook.com/discussexcel FORUM RULES 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) Jobs posting is not allowed. 6) Sharing copyrighted material and their links is not allowed. NOTE : Don't ever post confidential data in a workbook. Forum owners and members are not responsible for any loss. --- You received this message because you are subscribed to the Google Groups MS EXCEL AND VBA MACROS group. To unsubscribe from this group and stop receiving emails from it, send an email to excel-macros+unsubscr...@googlegroups.com mailto:excel-macros+unsubscr...@googlegroups.com. To post to this group, send email to excel-macros@googlegroups.com mailto:excel-macros@googlegroups.com. Visit this group at http://groups.google.com/group/excel-macros. For more options, visit https://groups.google.com/groups/opt_out. -- Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ https://www.facebook.com/discussexcel FORUM RULES 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) Jobs posting is not allowed. 6) Sharing copyrighted material and their links is not allowed. NOTE : Don't ever post confidential data in a workbook. Forum owners and members are not responsible for any loss. --- You received this message because you are subscribed to a topic in the Google Groups MS EXCEL AND VBA MACROS group. To unsubscribe from this topic, visit https://groups.google.com/d/topic/excel-macros/3iL-MbtQduo/unsubscribe. To unsubscribe from this group and all its topics, send an email to excel-macros+unsubscr...@googlegroups.com mailto:excel-macros+unsubscr...@googlegroups.com. To post to this group, send email to excel-macros@googlegroups.com mailto:excel-macros@googlegroups.com. Visit this group at http://groups.google.com/group/excel
