Prev: Fill Down to Last Value
Next: Selecting certain Rows and Copying cells in those rows to new work
From: puiuluipui on 7 Jun 2010 11:48
Hi, i need a macro to run based on a criteria in A1.
In A1 i have a dropdown list with sheets name. If i select in A1 the sheet
John, and then i run the macro, i need the macro to copy some cells from the
sheet John.
If i select in A1 the sheet Mary, then the macro to copy from sheet Mary.
Can this be done?
Thanks!
From: Jackpot on 7 Jun 2010 12:02
Yes. Try the below...




With Sheets(CStr(Range("A1")))
..Range("A1:A10").Copy Sheets("Sheet1").Range("B1")
End With


"puiuluipui" wrote:

> Hi, i need a macro to run based on a criteria in A1.
> In A1 i have a dropdown list with sheets name. If i select in A1 the sheet
> John, and then i run the macro, i need the macro to copy some cells from the
> sheet John.
> If i select in A1 the sheet Mary, then the macro to copy from sheet Mary.
> Can this be done?
> Thanks!
From: puiuluipui on 7 Jun 2010 12:18
This is perfect!
Thanks!

"Jackpot" wrote:

> Yes. Try the below...
>
>
>
>
> With Sheets(CStr(Range("A1")))
> .Range("A1:A10").Copy Sheets("Sheet1").Range("B1")
> End With
>
>
> "puiuluipui" wrote:
>
> > Hi, i need a macro to run based on a criteria in A1.
> > In A1 i have a dropdown list with sheets name. If i select in A1 the sheet
> > John, and then i run the macro, i need the macro to copy some cells from the
> > sheet John.
> > If i select in A1 the sheet Mary, then the macro to copy from sheet Mary.
> > Can this be done?
> > Thanks!
 | 
Pages: 1
Prev: Fill Down to Last Value
Next: Selecting certain Rows and Copying cells in those rows to new work