[FONT=Lucida Console][color=Royalblue]Sub[/color] a1112871a()
'https://www.mrexcel.com/forum/excel-questions/[color=Brown]1112871[/color]-remove-quotation-excel-while-pasting-data.html
[color=Royalblue]Dim[/color] obj [color=Royalblue]As[/color] [color=Royalblue]New[/color] DataObject
[color=Royalblue]Dim[/color] tx [color=Royalblue]As[/color] [color=Royalblue]String[/color]
Selection.Copy
obj.GetFromClipboard
tx = obj.GetText
Application.CutCopyMode = False
tx = Replace(tx, Chr([color=Brown]34[/color]), [color=Darkcyan]""[/color])
obj.SetText tx
obj.PutInClipboard
MsgBox [color=Darkcyan]"Data has been copied to clipboard"[/color]
[color=Royalblue]End[/color] [color=Royalblue]Sub[/color][/FONT]