Copy Contents and Add to the Start of Existing Cell Contents

[KurtWilliams]

Good Afternoon, this is my first question though I have been benefiting from surfing these forums for years. My VBA skill is spotty and often cobbled together without deep understanding of why stuff works! Slowly learning though.

I currently have an excel tracking document that I use in meetings to take minutes and then on the same log I have a cell that tracks all updates for each file in question typically by typing the date, the note and then Alt+Enter for a line break within the cell so eventually the cell would appear like this:

June 13: Contacted Owner
June 12: Documents recieved
June 10: Inquiry from owner

I am trying to write a quick macro that would allow me to copy the meeting minute cell contents and paste it in front of the existing contents of another cell. This could take the form of two short macros (one for copy and one for paste once the user has selected the cell to paste to.

I've run across a lot of examples of more basic copy and paste functions in excel but the copy cell contents and add to existing contents was not one i could find. Any help or suggestions would be appreciated!

 

[XLfriend777]

Hi KurtWilliams - Welcome to the forum. I have likewise benefited from all the wisdom on the forum. It is great to hear when it helps others. I thought the code below might help you get started on this problem. Let me know if it makes sense.

Sub KurtWilliams_copy_paste()
'Takes the contents of B1 and pastes it in A1 above the current contents
Dim Copy1, original As String

Copy1 = Cells(1, 2).Value 'Data in B1

original = Cells(1, 1).Value 'Original value in A1

Cells(1, 1).Value = Copy1 & Chr(10) & original 'Chr(10) is a line break

End Sub