Sub dural()
Sheets("Data").Range("A:A").Copy
Sheets("Monthly").Activate
Cells(1, Month(Date)).Select
ActiveSheet.Paste
End Sub
--
Gary''s Student - gsnu200796
"AJ" wrote:
> I would like to create a macro to copy the current month information from one
> spreadsheet into a Montly YTD spreadsheet.
>
> I want to be able to create a macro so that for example if it's June, the
> macro would know how many columns over it needs to "copy to" on the YTD
> spreadsheet. I will be doing this each month.
>
> Hope that makes sense.
>
> Thanks!
>
>
>
>
> --
> AJ
|