엑셀 vba 클립보드 내용 붙여넣기 따옴표 없애기

Sub 단추2_Click() 'Selection.Copy     Dim objData As New DataObject     Dim strTemp As String     Dim rng As Range     strTemp = ""     For Each rng In Selection         strTemp = strTemp & rng.Value     Next rng     objData.SetText (strTemp)     objData.PutInClipboard     Dim WSH As Object     Set WSH = CreateObject("WScript.Shell")     WSH.Popup "복사되었습니다!", 1, "Title", vbInformation         '1은 1초 시간이다.     Set WSH = Nothing End Sub