'Hi TAIgo,
'Use following code:-
Sub TAIgo()
Range("a1").Copy
Range("b1").Select
If Selection.Value = "" Then
ActiveSheet.Paste
Else
Selection.End(xlDown).Select
Selection.End(xlDown).Select
Selection.End(xlUp).Select
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
End If
End Sub
'Thanks & Regards
'--
'DILIP KUMAR PANDEY
' MBA-HR,B COM(Hons.),BCA
'Mobile: +91 9810929744
'dilipan...@gmail.com
'dilipan...@yahoo.com
'New Delhi - 110062
On Mon, May 18, 2009 at 1:16 AM, TAlgo <trading.a...@gmail.com> wrote:
>
> I am trying to copy and past data in a cell from another cell in my
> workbook.
> I then want to move down one cell each and every time I have pasted
> the data.
>
> Source Data always in Cell A1
>
> target :
> I would like to copy in B1
>
> Tomorrow when I open my spreadsheet, I would like to copy new data
> from A1 to B2
>
> and so forth
>
> Thanks
>
> >
>
--~--~---------~--~----~------------~-------~--~----~
-------------------------------------------------------------------------------------
Some important links for excel users:
1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at
http://www.excelitems.com
2. Excel tutorials at http://www.excel-macros.blogspot.com
3. Learn VBA Macros at http://www.vbamacros.blogspot.com
4. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
If you find any spam message in the group, please send an email to:
Ayush Jain @ jainayus...@gmail.com or
Ashish Jain @ 26may.1...@gmail.com
-------------------------------------------------------------------------------------
-~----------~----~----~----~------~----~------~--~---
