नमूना डेटासेट में विभिन्न स्थानों पर विभिन्न एक्सेसरीज की बिक्री शामिल है। नीचे दिया गया टेक्स्ट बॉक्स डेटासेट का सारांश दिखाता है, जिसमें उच्चतम और निम्नतम बिक्री प्रदर्शित होती है।

टेक्स्ट बॉक्स क्या है?
टेक्स्ट बॉक्स एक आयताकार आकार का ऑब्जेक्ट है जो वर्कशीट के एक विशिष्ट क्षेत्र के भीतर टेक्स्ट को धारण और प्रदर्शित कर सकता है।
Excel में टेक्स्ट बॉक्स कैसे जोड़ें: 4 तरीके
डेटासेट में एक कंपनी का बिक्री डेटा है।

विधि 1- टेक्स्ट बॉक्स विकल्प का उपयोग करके
- Insert टैब पर जाएं और Text में Text Box चुनें।

कर्सर बदल जाएगा।
- वर्कशीट में किसी क्षेत्र पर क्लिक करके टेक्स्ट बॉक्स डालें और इसे नीचे खींचें।

- टेक्स्ट बॉक्स में टेक्स्ट दर्ज करें।

कीबोर्ड का उपयोग करके:
आप Alt, N, X भी दबा सकते हैं। यह वर्कशीट पर एक टेक्स्ट बॉक्स बनाएगा।
विधि 2- शेप्स से टेक्स्ट बॉक्स जोड़ना
- Insert >> Illustrations >> Shapes पर जाएं।
- Basic Shapes में Text Box चुनें।

कर्सर बदल जाएगा।
- वर्कशीट में किसी क्षेत्र पर क्लिक करके टेक्स्ट बॉक्स डालें और इसे नीचे खींचें।

- टेक्स्ट बॉक्स में टेक्स्ट दर्ज करें।

विधि 3 – Excel में ActiveX Controls से टेक्स्ट बॉक्स डालना
ActiveX Control Text Box डालने के लिए:
- रिबन पर Developer टैब सक्षम करें।
- Developer >> Controls >> Insert पर जाएं।
- ActiveX Controls में Text Box (ActiveX Controls) चुनें।

कर्सर बदल जाएगा।
- वर्कशीट में किसी क्षेत्र पर क्लिक करके टेक्स्ट बॉक्स डालें और इसे नीचे खींचें।

- ऑब्जेक्ट डिज़ाइन मोड में है। इसे बंद करने के लिए, Developer >> Controls >> Design Mode पर क्लिक करें।

- टेक्स्ट बॉक्स में टेक्स्ट दर्ज करें।

नोट
ActiveX Control टेक्स्ट बॉक्स में लाइन ब्रेक डालने के लिए Shift+Enter का उपयोग करें।
स्क्रॉलबार के साथ मल्टी-लाइन टेक्स्ट बॉक्स जोड़ना
- पिछली विधि का उपयोग करके पहले एक ActiveX Control टेक्स्ट बॉक्स बनाएं।
- टेक्स्ट बॉक्स पर राइट-क्लिक करें और Properties चुनें।

- Properties विंडो में, MultiLine के रूप में True चुनें।
- ScrollBars के लिए 1, 2, या 3 चुनें। यहां, वर्टिकल स्क्रॉलबार बनाने के लिए 2।

- अपना टेक्स्ट दर्ज करें। टेक्स्ट बॉक्स में स्क्रॉलबार प्रदर्शित होंगे।

विधि 4 – Excel में एकाधिक टेक्स्ट बॉक्स जोड़ने के लिए VBA का उपयोग करना

विस्तृत दृश्य के लिए छवि पर क्लिक करें
- Developer >> Code >> Visual Basic पर जाएं।

- Insert >> Module चुनें।

- मॉड्यूल में निम्न कोड डालें।
Sub InsertMultipleTextBoxes()
Dim ws As Worksheet
Dim textBox As Shape
Dim i As Integer
Dim numTextBoxes As Integer
Dim textArray() As String
' वह वर्कशीट सेट करें जहां आप टेक्स्ट बॉक्स डालना चाहते हैं
Set ws = ThisWorkbook.Sheets("4.1 VBA Multiple Box") ' "4.1 VBA Multiple Box" को अपने वास्तविक शीट नाम से बदलें
' डालने के लिए टेक्स्ट बॉक्स की संख्या सेट करें
numTextBoxes = 3 ' इसे वांछित संख्या में बदलें
' प्रत्येक टेक्स्ट बॉक्स के लिए अलग-अलग टेक्स्ट की सरणी
textArray = Split("Sioux City has the highest television sales,Stony Brook has the highest mobile sales,Green Bay has the highest monitor sales", ",")
' एकाधिक टेक्स्ट बॉक्स डालने के लिए लूप
For i = 1 To numTextBoxes
' टेक्स्ट बॉक्स डालें
Set textBox = ws.Shapes.AddTextbox(Orientation:=msoTextOrientationHorizontal, _
Left:=50 + (i - 1) * 200, Top:=230, Width:=150, Height:=50)
' टेक्स्ट बॉक्स के अंदर टेक्स्ट सेट करें
textBox.TextFrame.Characters.Text = textArray(i - 1)
textBox.TextEffect.FontSize = 12
textBox.Line.ForeColor.RGB = RGB(0, 0, 255)
Next i
End Sub

विस्तृत दृश्य के लिए छवि पर क्लिक करें
- कोड चलाने के लिए F5 दबाएं।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
नोट
लूप के बिना एक ही टेक्स्ट बॉक्स बनाने के लिए उसी कोड का उपयोग करें:
Sub InsertTextBox()
Dim ws As Worksheet
Dim textBox As Shape
Set ws = ThisWorkbook.Sheets("4. VBA") ' "4. VBA" को अपने वास्तविक शीट नाम से बदलें
Set textBox = ws.Shapes.AddTextbox(Orientation:=msoTextOrientationHorizontal, _
Left:=60, Top:=230, Width:=250, Height:=80)
textBox.TextFrame.Characters.Text = "Total Sales by Store:" & vbNewLine & "Green Bay has the highest total sales with $50,960, followed by Sioux City with $41,614." & vbNewLine & "Rock Island has the lowest total sales at $14,628."
textBox.Line.ForeColor.RGB = RGB(0, 0, 255)
End Sub
Excel में टेक्स्ट बॉक्स कैसे फॉर्मेट करें
1. आकार बदलना और एडिट पॉइंट्स
- टेक्स्ट बॉक्स पर क्लिक करें और Shape Format पर जाएं।
- Shape Format >> Insert Shapes >> Edit Shape >> Change Shape चुनें।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
चुना गया टेक्स्ट बॉक्स बदल जाएगा।

एडिट पॉइंट्स बदलें:
- टेक्स्ट बॉक्स के किनारे पर क्लिक करें। माउस कर्सर एक नुकीले प्लस साइन को प्रदर्शित करेगा।

- Shape Format >> Insert Shapes >> Edit Shape >> Edit Points चुनें।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
- किनारे के बिंदुओं को क्लिक करके खींचें ताकि किनारों को स्थानांतरित करके मैन्युअल रूप से आकार बदल सकें।

2. शेप स्टाइल्स बदलना
- टेक्स्ट बॉक्स चुनें और Shape Format टैब पर जाएं।
- Shape Styles में एक स्टाइल चुनें।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
- नीचे की ओर तीर पर क्लिक करके Quick Styles एक्सेस करें।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
- एक स्टाइल पर क्लिक करें।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
- टेक्स्ट बॉक्स बदल जाएगा। यहां, Subtle Effect- Black, Dark-1 चुना गया था।

3. टेक्स्ट बॉक्स का भराव रंग बदलना
- टेक्स्ट बॉक्स पर क्लिक करें और Shape Format >> Shape Styles >> Shape Fill चुनें।
- एक रंग चुनें।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
आप Home टैब में Font में Fill चुनकर भराव रंग भी बदल सकते हैं।
4. बॉर्डर हटाना
टेक्स्ट बॉक्स पर क्लिक करें और Shape Format >> Shape Styles >> Shape Outline >> No Outline चुनें।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
बॉर्डर हटा दिया जाएगा।

5. फॉन्ट आकार, स्टाइल और रंग बदलना
- Home >> Font >> Font Color पर जाएं।

नोट
यदि आप टेक्स्ट बॉक्स के अंदर टेक्स्ट का रंग बदलना चाहते हैं तो टेक्स्ट बॉक्स के अंदर टेक्स्ट चुनें।
- Font में अन्य संपादन विकल्प हैं।

- Shape Format में विभिन्न WordArt Styles एक्सेस करें।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
6. टेक्स्ट बॉक्स के अंदर लाइन स्पेसिंग बदलना
- पूरे टेक्स्ट को चुनें।
- टेक्स्ट पर राइट-क्लिक करें और Paragraph चुनें।

- Paragraph में, Spacing चुनें।
- विभिन्न लाइन स्पेसिंग विकल्प चुनें।
- OK पर क्लिक करें।

यहां, 6pt चुना गया था।

7. टेक्स्ट बॉक्स को घुमाना
- टेक्स्ट बॉक्स चुनें और आपको बॉक्स के शीर्ष पर एक घड़ी की दिशा में घूमने वाला आइकन दिखाई देगा।
- इसे क्लिक करें और अपने माउस कर्सर को घुमाने के लिए ले जाएं।
GIF देखें।

8. टेक्स्ट फिट करने के लिए टेक्स्ट बॉक्स का आकार बदलना

टेक्स्ट फिट करने के लिए स्वचालित रूप से आकार बदलना:
- टेक्स्ट बॉक्स को उसके किनारे पर क्लिक करके चुनें।
- Format Shape विकल्प खोलने के लिए Ctrl+1 दबाएं।
- Text Options >> Textbox चुनें
- Text Box में, Resize shape to fit text चेक करें।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
ऊंचाई और चौड़ाई टेक्स्ट से मेल खाने के लिए समायोजित होगी।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
फिट और रैप करने के लिए आकार बदलें:
- Wrap text in shape चुनें।
- ऊंचाई समायोजित होगी और चौड़ाई बनी रहेगी।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
यह आउटपुट है।

VBA का उपयोग करके फिट करने के लिए आकार बदलें:
- VBA एडिटर खोलें और मॉड्यूल में निम्न कोड डालें।
Sub FitTextBoxToText()
Dim ws As Worksheet
Dim textBox As Shape
' वर्कशीट सेट करें
Set ws = ThisWorkbook.Sheets("8. Resize to Fit Text") ' "YourSheetName" को अपने वास्तविक शीट नाम से बदलें
' टेक्स्ट बॉक्स का नाम सेट करें
Dim textBoxName As String
textBoxName = "TextBox 1" ' अपने टेक्स्ट बॉक्स के वास्तविक नाम से बदलें
' जांचें कि टेक्स्ट बॉक्स मौजूद है या नहीं
On Error Resume Next
Set textBox = ws.Shapes(textBoxName)
On Error GoTo 0
If Not textBox Is Nothing Then
' टेक्स्ट बॉक्स को इसकी सामग्री में फिट करें
textBox.TextFrame.AutoSize = True
Else
MsgBox "Text box not found!"
End If
End Sub

विस्तृत दृश्य के लिए छवि पर क्लिक करें
- कोड चलाने के लिए F5 दबाएं। यह टेक्स्ट बॉक्स का आकार बदल देगा।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
9. Excel में टेक्स्ट बॉक्स को संरेखित करना

टेक्स्ट बॉक्स को क्षैतिज रूप से संरेखित करना:
- Ctrl दबाकर और बाएं-क्लिक करके सभी टेक्स्ट बॉक्स चुनें।

- Shape Format >> Align Objects >> Align Top चुनें।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
बॉक्स क्षैतिज रूप से संरेखित होंगे।

टेक्स्ट बॉक्स को लंबवत रूप से संरेखित करना:
- सभी टेक्स्ट बॉक्स चुनें।
- Shape Format >> Align Objects >> Align Left चुनें।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
यह टेक्स्ट बॉक्स को लंबवत रूप से संरेखित करेगा।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
10. टेक्स्ट बॉक्स की पारदर्शिता बदलना

टेक्स्ट बॉक्स की पारदर्शिता बदलने के लिए:
- टेक्स्ट बॉक्स को उसके किनारे पर क्लिक करके चुनें।
- Format Shape विंडो खोलने के लिए Ctrl+1 दबाएं।
- Shape Options >> Fill & Line >> Fill चुनें।
- Color में Transparency स्तर बदलें।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
11. Excel में टेक्स्ट बॉक्स को एंकर करना

- टेक्स्ट बॉक्स को उसके किनारे पर क्लिक करके चुनें।
- Format Shape विंडो खोलने के लिए Ctrl+1 दबाएं।
- Shape Options >> Size & Properties >> Properties चुनें।
- Don't move and size with cells चेक करें।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
टेक्स्ट बॉक्स लॉक करें:
- Home >> Cells >> Format >> Protect Sheet पर जाएं।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
- Protect Sheet में Edit objects अनचेक करें और OK पर क्लिक करें।

कॉलम या पंक्ति का आकार बदलकर टेक्स्ट बॉक्स का आकार नहीं बदला जाएगा।

टेक्स्ट बॉक्स को फिर से संपादित करने के लिए शीट को अनप्रोटेक्ट करने की आवश्यकता है।
Excel में टेक्स्ट बॉक्स कैसे कॉपी करें
- टेक्स्ट बॉक्स को उसके किनारे पर क्लिक करके चुनें।

- कॉपी करने के लिए Ctrl+C दबाएं और पेस्ट करने के लिए Ctrl+V दबाएं।

Excel में टेक्स्ट बॉक्स को सेल से कैसे लिंक करें
.
- एक टेक्स्ट बॉक्स बनाएं।
- बॉक्स के बीच में क्लिक करें। वहां टेक्स्ट दर्ज करने के बजाय, फॉर्मूला बार का उपयोग करें।
- "=" दर्ज करें इसके बाद वह सेल जिसे आप संदर्भित करना चाहते हैं। यहां, =$C$16 C16 से लिंक करने के लिए।

- Enter दबाएं। मान टेक्स्ट बॉक्स में प्रदर्शित होगा।

- टेक्स्ट बॉक्स पर डबल-क्लिक करें और अपना टेक्स्ट दर्ज करें।

और पढ़ें: टेक्स्ट बॉक्स को सेल से लिंक करें
Excel में डायनामिक टेक्स्ट बॉक्स कैसे बनाएं

.
- लोकेशन डालने के लिए एक सेल चुनें और Data >> Data Tools >> Data Validation पर जाएं।

- Data Validation में, Settings चुनें।
- Allow में List चुनें और Source में रेंज दर्ज करें। यहां, स्रोत डेटा B6:B13 है।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
- सेल में एक ड्रॉप-डाउन तीर प्रदर्शित होगा। एक मान चुनें।

- C17 में निम्न फॉर्मूला दर्ज करें।
=VLOOKUP(C16,B6:F13,4,TRUE)

- एक टेक्स्ट बॉक्स डालें, इसे चुनें और फॉर्मूला बार में =$C$17 दर्ज करके इसे सेल से लिंक करें।

और पढ़ें: डायनामिक टेक्स्ट बॉक्स जोड़ें
Excel में फ्लोटिंग टेक्स्ट बॉक्स कैसे बनाएं
- VBA विंडो खोलें।
- Insert >> UserForm चुनें।

- Toolbox में, TextBox चुनें और अपना टेक्स्ट बॉक्स ड्रैग और ड्रॉप करें।

- Multiline को True सेट करें और ScrollBars विकल्प में 2 चुनें।

- एक Module बनाएं और निम्न कोड दर्ज करें।
Sub floating_text_box()
UserForm1.TextBox1.Text = "Monthly sales of accessories in different branches of XYZ company"
UserForm1.Show vbModeless
End Sub

विस्तृत दृश्य के लिए छवि पर क्लिक करें
- कोड चलाने के लिए F5 दबाएं। फ्लोटिंग टेक्स्ट बॉक्स प्रदर्शित होगा।

- टेक्स्ट बॉक्स में अपना टेक्स्ट दर्ज करें, जैसे ActiveX टेक्स्ट बॉक्स में।

विस्तृत दृश्य के लिए छवि पर क्लिक करें
और पढ़ें: फ्लोटिंग टेक्स्ट बॉक्स बनाएं
Excel में टेक्स्ट बॉक्स में हाइपरलिंक कैसे जोड़ें
- एक टेक्स्ट बॉक्स डालें।

- बॉक्स में फॉर्मेटिंग जोड़ें (वैकल्पिक)।

- टेक्स्ट बॉक्स पर राइट-क्लिक करें और Link चुनें।

- Insert Hyperlink में लिंक के लिए स्थान चुनें। यहां, Link to: में Place in This Document चुना गया और एक नामित शीट चुनी गई।

- OK पर क्लिक करें।
टेक्स्ट बॉक्स एक बटन के रूप में काम करेगा। इस पर क्लिक करने से हम होमपेज पर पहुंच जाएंगे।

नोट
हाइपरलिंक वाले टेक्स्ट बॉक्स को चुनने के लिए Ctrl+Left click का उपयोग करें। साधारण लेफ्ट क्लिक आपको लिंक किए गए स्थान पर ले जाएगा।
और पढ़ें: Excel में टेक्स्ट बॉक्स एंकर करें
Excel में टेक्स्ट बॉक्स पर सशर्त फॉर्मेटिंग कैसे लागू करें
ActiveX टेक्स्ट बॉक्स का उपयोग करें:
- एक ActiveX टेक्स्ट बॉक्स बनाएं।
- बॉक्स चुनें और Name Box में इसका नाम बदलें। यहां, "ConditionalTextBox"। (Controls में Design Mode सक्रिय होना चाहिए)

- शीट नाम पर राइट-क्लिक करें और View Code चुनें।

- एडिटर में निम्न कोड डालें।
Private Sub ConditionalTextBox_Change()
If ConditionalTextBox.Value < "0" Then
ConditionalTextBox.BackColor = rgbBlack
If ConditionalTextBox.Value < "0" Then
ConditionalTextBox.ForeColor = rgbWhite
If ConditionalTextBox.Value > "0" Then
ConditionalTextBox.BackColor = rgbWhite
If ConditionalTextBox.Value > "0" Then
ConditionalTextBox.ForeColor = rgbBlack
End Sub

विस्तृत दृश्य के लिए छवि पर क्लिक करें
- VBA एडिटर बंद करें।
यदि मान सकारात्मक है तो रंग सफेद में बदल जाएगा और यदि शून्य या नकारात्मक है तो काला।

नोट
यदि टेक्स्ट बॉक्स खाली है या इसमें गैर-संख्यात्मक मान हैं, तो भराव भी काला हो जाता है।
Excel में टेक्स्ट बॉक्स सामग्री को सेल सामग्री में कैसे बदलें

- VBA एडिटर खोलें और एक Module डालें।
- निम्न कोड दर्ज करें।
Sub ConvertTextBoxToCell()
Dim Sh_xRg As Range
Dim Sh_xRow As Long
Dim Sh_xCol As Long
Dim Sh_xTxtBox As textBox
Set Sh_xRg = Application.InputBox("Select a cell):", "Convert Text Box to Cell ", _
ActiveWindow.RangeSelection.AddressLocal, , , , , 8)
Sh_xRow = Sh_xRg.Row
Sh_xCol = Sh_xRg.Column
For Each Sh_xTxtBox In ActiveSheet.TextBoxes
Cells(Sh_xRow, Sh_xCol).Value = Sh_xTxtBox.Text
Sh_xRow = Sh_xRow + 1
Next
End Sub

विस्तृत दृश्य के लिए छवि पर क्लिक करें
- कोड चलाने के लिए F5 दबाएं।
- एक बॉक्स खुलेगा जो सेल संदर्भ मांगेगा। B6 चुनें (पहला सेल जिसमें टेक्स्ट बॉक्स है)।

- टेक्स्ट बॉक्स हटाने के लिए OK पर क्लिक करें।

और पढ़ें: टेक्स्ट बॉक्स को सेल में बदलें
Excel ग्राफ में टेक्स्ट बॉक्स कैसे जोड़ें

- Insert >> Text >> Text Box पर जाएं।
- इसे क्लिक करें और चार्ट क्षेत्र में खींचें जहां आप टेक्स्ट बॉक्स जोड़ना चाहते हैं।

- टेक्स्ट बॉक्स में अपना टेक्स्ट दर्ज करें।

Excel में टेक्स्ट बॉक्स कैसे हटाएं

- टेक्स्ट बॉक्स को हटाने के लिए, उसके किनारे पर क्लिक करके चुनें।

- Delete दबाएं।

क्या करें जब Excel में टेक्स्ट बॉक्स न दिखे?
- इसे टॉगल ऑफ और ऑन किया जा सकता है। Ctrl+6 दबाएं।

- यदि आप Ctrl+6 दबाते हैं, तो यह दिखाई नहीं देगा।

प्रैक्टिस वर्कबुक डाउनलोड करें
Excel में टेक्स्ट बॉक्स: नॉलेज हब
<< Excel सीखने के लिए वापस जाएं
निःशुल्क एडवांस्ड Excel अभ्यास समाधान के साथ प्राप्त करें!