Excel: 셀 내용을 특정 셀의 메모로 이동

Question

셀의 텍스트 내용을 다른 셀(왼쪽 셀)의 주석으로 변환해야 합니다. 나는 보았다이 게시물, 코드는 잘 작동하지만 텍스트 내용과 동일한 셀에 주석을 넣습니다.

예: A열에 대한 설명이 되려면 B열의 텍스트가 필요합니다.

Answer 1

데이터가 포함된 셀을 선택합니다.(귀하의 경우 B 열의 셀)

다음 짧은 매크로를 실행하세요.

Sub CommentMaker()
   Dim r As Range, v As String
   For Each r In Selection
      If r.Column <> 1 Then
         If r.Text <> "" Then
         v = r.Text
         With r.Offset(0, -1)
            .ClearComments
            .AddComment
            .Comment.Visible = False
            .Comment.Text Text:=v
         End With
         End If
      End If
   Next r
End Sub

메모: 원본 데이터는 제거되지 않습니다!