Sorry for the delay, esco.
I was hoping that your language would be one of the ones I can read, but Turkish isn't among them. Oh, well.
v2 and v3 are just the names of variables; in my program, I put the values that are in Page1!A2 and ...A3 into two variables, which I named v2 and v3, and then put them into A2 and A3 of the target worksheet. But you don't have to do it that way; you could do it directly, like this:
Code:
Sub Something() 'I don't care what you name it.
Set wo = ThisWorkbook
Set soFm = wo.Worksheets("Page1")
' Get the target worksheet name and paste the data.
snTo = soFm.Range("A1").Value
set soTo = wo.Worksheets(snTo)
soTo.Range("A2").Value = soFm.Range("A2").Value
soTo.Range("A3").Value = soFm.Range("A3").Value
End Sub
I still need to see what your version of the program looks like. You showed me
part of a program, but it's the program that you were using before you asked this question. I want to see the program that you started writing after I sent you some sample code. Remember? I showed you the beginning of a program, and I said "tell me whether it's working right". You answered "I did it :P". I want to see
that program.