Hello mike, Please find the attached file as per your requirement. Always send your requirement output in excel file.
Regards,
Mandeep Baluja
On Saturday, March 7, 2015 at 7:33:44 AM UTC+5:30, Mike B wrote:
>
> *12/11/2014 5:15**12/11/2014 5:15*CGT 01*12/11/2014
> 5:15*CGT 02*12/11/2014 5:15*CGT 03*Totals for 12/11/2014 5:15:14
> AM:**12/12/2014
> 5:15*CGT 01CGT 02
> CGT 03
>
>
>
> Thank you Mandeep for helping. I have very large file 7,800 rows of data,
> in Column "C" I have dates in December 2014 that I want to find and copy to
> column "B" in front of each CGT for that date, some dates have five CGT's
> which is the maximum number of CGTs for a specific date. Please find below
> the code I was trying to use, it works but doesn't copy for all CGTs and
> does move forward only does the same cells.
>
> Sub CopyDate()
> '
> ' CopyDate Macro
> '
> '
> Range("C:C").Find(What:="12/??/2014", LookIn:=xlValues).Activate
>
> Selection.Copy
>
> ActiveCell.Offset(1, -1).Select
> ActiveSheet.Paste
>
>
> End Sub
>
> I Appreciate any help you can give me.
> Thank you
> Mike B
>
>
>
> On Thursday, March 5, 2015 at 11:54:14 PM UTC-6, Mandeep Baluja wrote:
>
>> send me your file and steps you want to achieve
>>
>> Regards,
>> Mandeep
>>
>> On Thursday, March 5, 2015 at 9:46:12 PM UTC+5:30, Mike B wrote:
>>>
>>>
>>>
>>> I try it works but goes back to what I just did even though I moved my
>>> cursor down 11 rows. I would appreciate any help how to get it to advance
>>> to the next block that I am trying to copy and paste. I have about 7,000
>>> rows of data to do.
>>> Thank you
>>> Mike B
>>>
>>>
>>> Sub just_dates2()
>>> '
>>> ' just_dates2 Macro
>>> '
>>>
>>> '
>>> Range("C1166:Y1166").Select
>>> Application.CutCopyMode = False
>>> ActiveCell.FormulaR1C1 = "Accounting Period Start Date : 12/29/2014
>>> 5:15:09 AM"
>>> Range("B1167").Select
>>> ActiveSheet.PasteSpecial Format:="Unicode Text", Link:=False, _
>>> DisplayAsIcon:=False, NoHTMLFormatting:=True
>>>
>>>
>>> End Sub
>>>
>>
--
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/d/optout.
Get_cells_Between_Two_cells.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12
