एक्सेल: एक निश्चित सेल में टिप्पणी करने के लिए सेल सामग्री को स्थानांतरित करें

Question

मुझे एक सेल में पाठ सामग्री को अन्य सेल में एक टिप्पणी (बाईं ओर एक) में बदलने की आवश्यकता है। मैंने इस पोस्ट को देखा , और कोड ठीक काम करता है लेकिन यह टिप्पणी उसी सेल में डालता है जिसमें टेक्स्ट कंटेंट होता है।

उदाहरण: मुझे कॉलम A पर टिप्पणी करने के लिए कॉलम बी में पाठ की आवश्यकता है।

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

नोट: यह मूल डेटा को नहीं हटाएगा!