मुख्य सामग्री पर जाएं

एक्सेल में हर दूसरी पंक्ति में एक ही टेक्स्ट कैसे डालें?

लेखक: सिलुविया अंतिम संशोधित: 2020-07-23

इस लेख में, हम आपको दिखाएंगे कि एक्सेल में हर दूसरी पंक्ति में एक ही टेक्स्ट कैसे डाला जाए। कृपया अधिक जानकारी के लिए ब्राउज़ करें।

VBA कोड के साथ प्रत्येक पंक्ति में समान टेक्स्ट डालें
एक्सेल के लिए कुटूल के साथ हर दूसरी पंक्ति में समान टेक्स्ट डालें


VBA कोड के साथ प्रत्येक पंक्ति में समान टेक्स्ट डालें

मान लीजिए कि आप नीचे दिए गए स्क्रीनशॉट के अनुसार निश्चित सीमा में हर एक पंक्ति में "नाम", "डेटा" और "स्कोर" टेक्स्ट सम्मिलित करना चाहते हैं। कृपया निम्नलिखित VBA कोड आज़माएँ।

1. वर्कशीट में, दबाएँ ऑल्ट + F11 खोलने के लिए एक साथ कुंजियाँ अनुप्रयोग के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.

2। क्लिक करें सम्मिलित करें > मॉड्यूल. स्क्रीनशॉट देखें:

3. नीचे दिए गए वीबीए कोड को कॉपी करके कोड एडिटर में पेस्ट करें।

वीबीए कोड: एक्सेल में हर एक पंक्ति में एक ही टेक्स्ट डालें

Sub inserttexteveryonerow()
	Dim Last As Integer
	Dim emptyRow As Integer
	Last = Range("A" & Rows.Count).End(xlUp).Row
	For emptyRow = Last To 2 Step - 1
		If Not Cells(emptyRow, 1).Value = "" Then
			Rows(emptyRow).Resize(1).Insert
			Range(Cells(emptyRow, "A"), Cells(emptyRow, "C")).Value = Array("Name", "Date", "Sore")
		End If
	Next emptyRow
End Sub

नोट्स: उपरोक्त कोड में:

1. आपका डेटा वर्कशीट में पहली पंक्ति से शुरू होना चाहिए।
2. कृपया "नाम", "डेटा" और "स्कोर" के टेक्स्ट को उन टेक्स्ट में बदलें जिनकी आपको आवश्यकता है।
3. अक्षर A और C उस सेल श्रेणी को दर्शाते हैं जहां आप विशिष्ट टेक्स्ट सम्मिलित करना चाहते हैं।
4। दबाएं F5 कोड चलाने की कुंजी. और आप देख सकते हैं कि आपके कार्यपत्रक में प्रत्येक पंक्ति में निर्दिष्ट पाठ जोड़े गए हैं।

एक्सेल के लिए कुटूल के साथ हर दूसरी पंक्ति में समान टेक्स्ट डालें

उपरोक्त कोड के साथ, आप बस हर एक पंक्ति में टेक्स्ट डाल सकते हैं। Excel में प्रत्येक n पंक्ति में टेक्स्ट सम्मिलित करने के बारे में आपका क्या ख़याल है? इस अनुभाग में, हम आपको दिखाएंगे शीर्षक पंक्तियाँ सम्मिलित करें की उपयोगिता एक्सेल के लिए कुटूल. इस उपयोगिता के साथ, प्रत्येक n पंक्ति में टेक्स्ट सम्मिलित करना अब कोई समस्या नहीं होगी।

आवेदन करने से पहले एक्सेल के लिए कुटूल, कृपया सबसे पहले इसे डाउनलोड करें और इंस्टॉल करें.

1। क्लिक करें कुटूल > सम्मिलित करें > शीर्षक पंक्तियाँ सम्मिलित करें इस उपयोगिता को सक्षम करने के लिए.

2। में शीर्षक पंक्तियाँ सम्मिलित करें संवाद बॉक्स, आपको यह करना होगा:

1). उन टेक्स्ट की श्रेणी का चयन करें जिन्हें आप प्रत्येक n पंक्ति में सम्मिलित करना चाहते हैं शीर्षक श्रेणी डिब्बा;
2). उस श्रेणी का चयन करें जिसमें आपको टेक्स्ट सम्मिलित करने की आवश्यकता है रेंज सम्मिलित करें डिब्बा;
3). में अंतराल पंक्ति संख्या निर्दिष्ट करें अंतराल पंक्तियाँ डिब्बा। यदि आप प्रत्येक पंक्ति में टेक्स्ट सम्मिलित करना चाहते हैं, तो कृपया बॉक्स में 1 दर्ज करें, और प्रत्येक n पंक्ति के लिए, कृपया बॉक्स में n दर्ज करें;
4). क्लिक करें OK बटन.

अब निर्दिष्ट पाठ को चयनित श्रेणी में प्रत्येक n पंक्ति में डाला गया है।

  यदि आप इस उपयोगिता का निःशुल्क परीक्षण (30-दिन) चाहते हैं, कृपया इसे डाउनलोड करने के लिए क्लिक करें, और फिर उपरोक्त चरणों के अनुसार ऑपरेशन लागू करने के लिए जाएं।

सर्वोत्तम कार्यालय उत्पादकता उपकरण

🤖 कुटूल्स एआई सहयोगी: निम्न के आधार पर डेटा विश्लेषण में क्रांति लाएं: बुद्धिमान निष्पादन   |  कोड जनरेट करें  |  कस्टम फ़ॉर्मूले बनाएं  |  डेटा का विश्लेषण करें और चार्ट बनाएं  |  कुटूल फ़ंक्शंस का आह्वान करें...
लोकप्रिय सुविधाएँ: डुप्लिकेट ढूंढें, हाइलाइट करें या पहचानें   |  रिक्त पंक्तियाँ हटाएँ   |  डेटा खोए बिना कॉलम या सेल को संयोजित करें   |   फॉर्मूला के बिना गोल ...
सुपर लुकअप: एकाधिक मानदंड VLookup    मल्टीपल वैल्यू वीलुकअप  |   अनेक शीटों में VLookup   |   फजी लुकअप ....
उन्नत ड्रॉप-डाउन सूची: शीघ्रता से ड्रॉप डाउन सूची बनाएं   |  आश्रित ड्रॉप डाउन सूची   |  बहु-चयन ड्रॉप डाउन सूची ....
स्तम्भ प्रबंधक: कॉलमों की एक विशिष्ट संख्या जोड़ें  |  कॉलम ले जाएँ  |  छिपे हुए कॉलम की दृश्यता स्थिति टॉगल करें  |  रेंज और कॉलम की तुलना करें ...
फीचर्ड फीचर्स: ग्रिड फोकस   |  डिजाइन देखें   |   बड़ा फॉर्मूला बार    कार्यपुस्तिका एवं शीट प्रबंधक   |  संसाधन लाइब्रेरी (ऑटो टेक्स्ट)   |  खजूर बीनने वाला   |  कार्यपत्रकों को संयोजित करें   |  एन्क्रिप्ट/डिक्रिप्ट सेल    सूची के अनुसार ईमेल भेजें   |  सुपर फ़िल्टर   |   विशेष फ़िल्टर (फ़िल्टर बोल्ड/इटैलिक/स्ट्राइकथ्रू...) ...
शीर्ष 15 टूलसेट12 टेक्स्ट टूल्स (पाठ जोड़ें, अक्षर हटाएँ, ...)   |   50 + चार्ट प्रकार (गैन्ट चार्ट, ...)   |   40+ प्रैक्टिकल सूत्र (जन्मदिन के आधार पर आयु की गणना करें, ...)   |   19 निवेशन टूल्स (QR कोड डालें, पथ से चित्र सम्मिलित करें, ...)   |   12 रूपांतरण टूल्स (शब्दों को संख्याएँ, मुद्रा रूपांतरण, ...)   |   7 विलय और विभाजन टूल्स (उन्नत संयोजन पंक्तियाँ, विभाजन कोशिकाओं, ...)   |   ... और अधिक

एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है।  वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...

Description


ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (4)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
thanks you so much.
This comment was minimized by the moderator on the site
Thank you so much for this VBA code and other. They have solved many of my problems, working with a huge data set!!
This comment was minimized by the moderator on the site
Thank you, the code was exactly what I needed. One question, I have data that I want repeated every other row but only to specific rows then a new string of text starts that I want repeated. How to I change the code to reflect stopping the repeat at a specific row?
This comment was minimized by the moderator on the site
FOLLOW MY INSTRUCTION ON GOOGLE.COM
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations