Excel: วิธีขยายเซลล์เพื่อแสดงเนื้อหาทั้งหมดเมื่อคลิก

ในบางกรณี ถ้าเนื้อหาในเซลล์ยาวกว่าความกว้างของเซลล์และมีค่าในเซลล์คอลัมน์ถัดไป เนื้อหาบางส่วนเท่านั้นที่จะแสดงดังภาพหน้าจอด้านล่างที่แสดง เพื่อหลีกเลี่ยงการเปลี่ยนแปลงความกว้างและความสูงของเซลล์ คุณสามารถคลิกที่เซลล์และดูเนื้อหาทั้งหมดในแถบสูตร แต่ถ้าแถบสูตรถูกซ่อนหรือสั้นกว่าเนื้อหา จะทำอย่างไร? ที่นี่จะแนะนำสองวิธีที่จะแสดงเนื้อหาของเซลล์ในกล่องข้อความเมื่อคลิก

ขยายเซลล์เพื่อแสดงเนื้อหาทั้งหมดโดยแทรกกล่องข้อความ Active X Controls

ขยายเซลล์เพื่อแสดงเนื้อหาทั้งหมดโดยใช้แถบสูตรที่ใหญ่กว่าของ Kutools for Excel

หมายเหตุ: วิธีการที่ให้ไว้ในบทช่วยสอนนี้ได้รับการทดสอบใน Excel 2021 อาจมีบางวิธีที่แตกต่างกันใน Excel เวอร์ชันต่างๆ

1. เปิดใช้งานเวิร์กชีตที่คุณต้องการขยายเซลล์ คลิก ผู้พัฒนา > สิ่งที่ใส่เข้าไป > กล่องข้อความ (ตัวควบคุม ActiveX).

ถ้าไม่มี ผู้พัฒนา แท็บในริบบิ้น โปรดแสดงในตอนแรก โปรดดูบทช่วยสอนนี้ วิธีแสดง/แสดงแท็บนักพัฒนาซอฟต์แวร์ใน Excel Ribbon

2 จากนั้นลากเคอร์เซอร์เพื่อวาดกล่องข้อความที่มีความกว้างและความสูงซึ่งสามารถแสดงเนื้อหาที่ยาวที่สุดของเซลล์ จำชื่อ textbox นี้ไว้ นี่คือ TextBox1

3. คลิกขวาที่กล่องข้อความ แล้วคลิก อสังหาริมทรัพย์ จากเมนูบริบท จากนั้นใน อสังหาริมทรัพย์ บานหน้าต่างเลือก จริง จากรายการดรอปดาวน์ใน หลายสาย และ ตัดคำ ส่วนต่างๆ จากนั้นปิด อสังหาริมทรัพย์ บานหน้าต่าง
  

หรือคุณสามารถเลือก True จากรายการดรอปดาวน์ใน ขนาดอัตโนมัติ ในบานหน้าต่างคุณสมบัติ กล่องข้อความจะถูกปรับขนาดอัตโนมัติตามความยาวของเนื้อหาในเซลล์ที่คุณคลิก

4. คลิกขวาที่แท็บชื่อแผ่นงานในแถบสถานะ แล้วคลิก ดูรหัส จากเมนูบริบท

5 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคัดลอกและวางโค้ดด้านล่างลงในสคริปต์เปล่า

VBA: ขยายเซลล์เพื่อแสดงเนื้อหา

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice
Dim xRgAddress As String
xRgAddress = "A1:B4" 'the range this VBA work, if you leave it is blank, it work for whole sheet
If xRgAddress = "" Then
  With TextBox1
        .Top = Target.Top
        .Left = Target.Offset(, 1).Left
        .Text = Target.Text
        .Visible = True
    End With
Else
    If Intersect(Target, Range(xRgAddress)) Is Nothing Then
        TextBox1.Visible = False
    Else
        With TextBox1
            .Top = Target.Top
           .Left = Target.Offset(, 1).Left
            .Text = Target.Text
            .Visible = True
        End With
    End If
End If
End Sub

โปรดสังเกตว่า TextBox1 เป็นชื่อของกล่องข้อความที่คุณวาด และ A1:B4 คือช่วงของโค้ดนี้ ให้เปลี่ยนตามที่คุณต้องการ

6. กลับไปที่แผ่นงาน คลิก ผู้พัฒนา > โหมดการออกแบบ โหมดการออกแบบที่มีอยู่

เมื่อคุณคลิกที่เซลล์ กล่องข้อความจะปรากฏขึ้นถัดจากเซลล์นั้น และแสดงเนื้อหาทั้งหมดของเซลล์

หากคุณได้ติดตั้ง Kutools สำหรับ Excel แถบสูตรที่ใหญ่กว่าที่มีให้จะแสดงเนื้อหาทั้งหมดของเซลล์ในกล่องที่โผล่ขึ้นมาเมื่อคุณคลิกตราบเท่าที่คุณเปิดใช้งานอยู่โดยคลิก Kutools > แถบสูตรที่ใหญ่กว่า

ทิปส์:

1. ด้วยแถบสูตรที่ใหญ่กว่า ยกเว้นเพื่อดูเนื้อหาของเซลล์ที่ใช้งานอยู่ คุณยังสามารถแก้ไขเนื้อหาของเซลล์ในแถบสูตรที่ใหญ่กว่า

2. คุณสามารถปรับขนาดแถบสูตรที่ใหญ่ขึ้นได้โดยการลากที่มุมขวาล่างของแถบ

3. หากคุณเลือกมากกว่าหนึ่งเซลล์ เฉพาะเนื้อหาของเซลล์แรกของการเลือกเท่านั้นที่จะแสดงในแถบสูตรที่ใหญ่กว่า

รายละเอียดเพิ่มเติมเกี่ยวกับ Bigger Formula Bar โปรดเยี่ยมชมที่มัน เกี่ยวกับการสอน.

---

เครื่องมือเพิ่มประสิทธิภาพการทำงานในสำนักงานที่ดีที่สุด

Kutools สำหรับ Excel แก้ปัญหาส่วนใหญ่ของคุณและเพิ่มผลผลิตของคุณได้ถึง 80%

• ซุปเปอร์ฟอร์มูล่าบาร์ (แก้ไขข้อความและสูตรหลายบรรทัดได้อย่างง่ายดาย); การอ่านเค้าโครง (อ่านและแก้ไขเซลล์จำนวนมากได้อย่างง่ายดาย); วางลงในช่วงที่กรองแล้ว...
• ผสานเซลล์ / แถว / คอลัมน์ และการเก็บรักษาข้อมูล แยกเนื้อหาของเซลล์ รวมแถวที่ซ้ำกันและผลรวม / ค่าเฉลี่ย... ป้องกันเซลล์ซ้ำ; เปรียบเทียบช่วง...
• เลือกซ้ำหรือไม่ซ้ำ แถว; เลือกแถวว่าง (เซลล์ทั้งหมดว่างเปล่า); Super Find และ Fuzzy Find ในสมุดงานจำนวนมาก สุ่มเลือก ...
• สำเนาถูกต้อง หลายเซลล์โดยไม่เปลี่ยนการอ้างอิงสูตร สร้างการอ้างอิงอัตโนมัติ ถึงหลายแผ่น ใส่สัญลักษณ์แสดงหัวข้อย่อย, กล่องกาเครื่องหมายและอื่น ๆ ...
• แทรกสูตรที่ชื่นชอบและรวดเร็ว, ช่วงแผนภูมิและรูปภาพ; เข้ารหัสเซลล์ ด้วยรหัสผ่าน; สร้างรายชื่อผู้รับจดหมาย และส่งอีเมล ...
• แยกข้อความ, เพิ่มข้อความ, ลบตามตำแหน่ง, ลบ Space; สร้างและพิมพ์ผลรวมย่อยของเพจ แปลงระหว่างเนื้อหาของเซลล์และความคิดเห็น...
• ซุปเปอร์ฟิลเตอร์ (บันทึกและใช้โครงร่างตัวกรองกับแผ่นงานอื่น ๆ ); การเรียงลำดับขั้นสูง ตามเดือน / สัปดาห์ / วันความถี่และอื่น ๆ ตัวกรองพิเศษ โดยตัวหนาตัวเอียง ...
• รวมสมุดงานและแผ่นงาน; ผสานตารางตามคอลัมน์สำคัญ แยกข้อมูลออกเป็นหลายแผ่น; Batch แปลง xls, xlsx และ PDF...
• การจัดกลุ่มตาราง Pivot ตาม จำนวนสัปดาห์วันในสัปดาห์และอื่น ๆ ... แสดงปลดล็อกเซลล์ที่ถูกล็อก ด้วยสีที่ต่างกัน เน้นเซลล์ที่มีสูตร / ชื่อ...

อ่านเพิ่มเติม ... คุณสมบัติเต็มรูปแบบ ทดลองใช้งานฟรี 30 วัน... ซื้อ... 

---

แท็บ Office - นำอินเทอร์เฟซแบบแท็บมาสู่ Office และทำให้งานของคุณง่ายขึ้นมาก

• เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
• เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
• เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!

อ่านเพิ่มเติม ... คุณสมบัติเต็มรูปแบบ ทดลองใช้งานฟรี 30 วัน... ซื้อ...