Macro to copy data from one workbook to specific workbook selected in drop down

[aburshd]

Hello guys, I am a new to excel. Still learning. Please help me solve a problem. Thank you in advance.

COULD YOU PLEASE SOLVE:

CONSIDER 3 CELLS: A2,B2,C2 in a Workbook named, Data Entry.

A2 is where I write data in.
B2 is a drop down list of 3 different posting workbook's named: X, Y, Z.

I want a SAVE button.
When SAVE button is clicked, I want to copy cell A2 to the workbook chosen from the drop down lists in B2. If X is chosen, data will save in X workbook only.

I hope this makes sense. And expect to see wonderful solution from you guys.
Thanks once again

 

[JLGWhiz]

Hello guys, I am a new to excel. Still learning. Please help me solve a problem. Thank you in advance.

COULD YOU PLEASE SOLVE:

CONSIDER 3 CELLS: A2,B2,C2 in a Workbook named, Data Entry.

A2 is where I write data in.
B2 is a drop down list of 3 different posting workbook's named: X, Y, Z.

I want a SAVE button.
When SAVE button is clicked, I want to copy cell A2 to the workbook chosen from the drop down lists in B2. If X is chosen, data will save in X workbook only.

I hope this makes sense. And expect to see wonderful solution from you guys.
Thanks once again

You can add the button manually and assign this macro to it. It is assumed that the names in the B2 dropdown include the file extension (e.g. .xlsx)

Sub saveA2()
Dim sh As Worksheet, wb As Workbook
Set sh = ThisWorkbook.Sheets(1) 'Edit sheet name
Set wb = Workbooks(sh.Range("B2").Value)
sh.Range("A2").Copy wb.Sheets(1).Cells(Rows.Count, 1).End(xlUp)(2)
wb.Save
End Sub

 

[aburshd]

Not working. Bro could you attach file for me. I don't know if i sound wierd.