get sheet name into a vba line of code

[Hattie]

the following line of code works but copies from sheet4 to sheet2
i want to specify different source sheets from time to time.

How do i replace the static sheet4 in the line below with a cell reference
so i can just type a sheet name of the source sheet into cell a1of the target sheet?

how do i replace sheet2 with the current sheet i am on (the target sheet)

'Copy cell to another cell

Sheets("Sheet4").Range("A1").Copy Sheets("Sheet2").Range("B11")

thanks

 

[JLGWhiz]

as an example, you can use a variable to define a range value then use the variable in the code. You only need to change the value in the cells to chnge the sheet name in the code. Be sure you change all occurences of the sheet name wihin the code or you could get undesired results.

Dim shNm1 As String, shNm2 As String
 shNm1 = Range("E1").Value 'Change range to suit
shNm2 = Range("E2").Value 'Change range to suit
Sheets(shNm1).Range("A1").Copy Sheets(shNm2).Range("B11")

 

[Hattie]

thank you, that works a treat.

 

[JLGWhiz]

thank you, that works a treat.

You're welcome,
regards, JLG