วิธีปรับขนาดกล่องข้อความให้พอดีกับเนื้อหาใน Excel โดยอัตโนมัติ
ขนาดกล่องข้อความได้รับการแก้ไขหลังจากแทรกลงในแผ่นงาน ดังนั้นขนาดจะไม่ปรับให้พอดีกับข้อความที่คุณแทรกหรือลบ บทความนี้มีวัตถุประสงค์เพื่อแสดงวิธีการปรับขนาดกล่องข้อความโดยอัตโนมัติเพื่อให้พอดีกับเนื้อหาใน Excel
ปรับขนาดกล่องข้อความโดยอัตโนมัติเพื่อให้พอดีกับเนื้อหาโดยการปรับขนาดรูปร่างให้พอดีกับคุณสมบัติข้อความ
ปรับขนาดกล่องข้อความทั้งหมดโดยอัตโนมัติเพื่อให้พอดีกับเนื้อหาด้วยรหัส VBA
ปรับขนาดกล่องข้อความโดยอัตโนมัติเพื่อให้พอดีกับเนื้อหาโดยการปรับขนาดรูปร่างให้พอดีกับคุณสมบัติข้อความ
คุณสามารถเปลี่ยนคุณสมบัติของกล่องข้อความดังต่อไปนี้เพื่อปรับขนาดโดยอัตโนมัติด้วยข้อความที่คุณป้อนหรือลบ
1. หลังจากใส่กล่องข้อความแล้วให้คลิกขวาที่เส้นขอบของกล่องข้อความจากนั้นคลิก ขนาดและคุณสมบัติ จากเมนูคลิกขวา ดูภาพหน้าจอ:
2. คุณสามารถดูไฟล์ จัดรูปแบบรูปร่าง บานหน้าต่างจะแสดงทางด้านขวาของแผ่นงานภายใต้ไฟล์ ขนาดและคุณสมบัติ ตรวจสอบแท็บ ปรับขนาดรูปร่างให้พอดีกับข้อความ กล่องใน กล่องข้อความ แล้วปิดไฟล์ จัดรูปแบบรูปร่าง บานหน้าต่าง ดูภาพหน้าจอ:
จากนี้ไปกล่องข้อความจะปรับขนาดให้พอดีกับเนื้อหาโดยอัตโนมัติ
หมายเหตุ: ด้วยวิธีนี้หากมีการเปลี่ยนแปลงหลายกล่องข้อความคุณต้องเปลี่ยนคุณสมบัติของกล่องข้อความทีละกล่อง
ปรับขนาดกล่องข้อความทั้งหมดโดยอัตโนมัติเพื่อให้พอดีกับเนื้อหาด้วยรหัส VBA
สำหรับแผ่นงานที่มีกล่องข้อความหลายกล่องอยู่แล้วรหัส VBA ต่อไปนี้สามารถช่วยให้คุณปรับขนาดโดยอัตโนมัติให้พอดีกับเนื้อหาได้ในครั้งเดียว
1 กด อื่น ๆ + F11 พร้อมกันเพื่อเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคลิก สิ่งที่ใส่เข้าไป > โมดูล. จากนั้นคัดลอกและวางโค้ด VBA ด้านล่างลงในหน้าต่างโมดูล
รหัส VBA: ปรับขนาดกล่องข้อความทั้งหมดโดยอัตโนมัติเพื่อให้พอดีกับเนื้อหาในแผ่นงาน
Sub TextBoxResizeTB()
Dim xShape As Shape
Dim xSht As Worksheet
On Error Resume Next
For Each xSht In ActiveWorkbook.Worksheets
For Each xShape In xSht.Shapes
If xShape.Type = 17 Then
xShape.TextFrame2.AutoSize = msoAutoSizeShapeToFitText
xShape.TextFrame2.WordWrap = True
End If
Next
Next
End Sub
3 กด F5 กุญแจสำคัญในการเรียกใช้รหัส จากนั้นคุณจะเห็นกล่องข้อความทั้งหมดในแผ่นงานปัจจุบันถูกปรับขนาดโดยอัตโนมัติเพื่อให้พอดีกับเนื้อหาดังภาพด้านล่างที่แสดง
และกล่องข้อความเหล่านี้จะปรับขนาดโดยอัตโนมัติพร้อมกับเนื้อหาที่คุณป้อนหรือลบเพื่อใช้ในอนาคต
บทความที่เกี่ยวข้อง:
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!