कॉलम में प्रत्येक सेल के टेक्स्ट को दूसरे सेल में टिप्पणी के रूप में स्वचालित रूप से कैसे डालें

Question

कहते हैं कि मेरे पास 2 कॉलम हैं। चलो उन्हें कॉलम 1 और कॉलम 2 कहते हैं। दोनों स्तंभ कोशिकाओं में कुछ पाठ या रिक्त होते हैं। मुझे जो करना है वह कॉलम 2 में सेल के टेक्स्ट को कॉलम 1 में एक ही पंक्ति पर सेल के लिए टिप्पणी के रूप में सम्मिलित करना है और इसे सभी पंक्तियों पर लागू करना है।

उदाहरण के लिए, इस तरह एक तालिका दी गई है:

सेल Text1में टिप्पणी के साथ qith होगा Text4:

और इसी तरह:

Comments

"बहुत व्यापक" होने के लिए करीबी वोट? यह कैसे व्यापक है? यह एक बहुत ही विशिष्ट प्रश्न है।

— यूजीन एस

आपने पहले से क्या कोशिश की है?

— MJH

मैंने इसे Google करने की कोशिश की, लेकिन केवल VBA से जुड़े उत्तर मिले, जिनसे मैं बचना चाहूंगा।

— यूजीन एस

मुझे लगता है कि आप इसके लिए एक समाधान खोजने की संभावना नहीं है जिसमें VBA शामिल नहीं है।

— MJH

क्या कोई कारण है जो आप VBA से बचना चाहते हैं? मैं 99.32% सकारात्मक हूं, आप इसके बिना इसे पूरा नहीं कर पाएंगे।

— ब्रुसेविन

Answer 1

कहते हैं कि हमारे पास B100 के माध्यम से A1 में डेटा है । यदि आप अपना दिमाग बदलते हैं और मैक्रो-आधारित समाधान स्वीकार करेंगे, तो यह प्रयास करें:

Sub CommentMaker()
    Dim A As Range, aa As Range

    Set A = Range("A1:A100")
    A.ClearComments

    For Each aa In A
        aa.AddComment
        aa.Comment.Text Text:=CStr(aa.Offset(0, 1).Value)
    Next aa
End Sub