วันพุธที่ 18 กรกฎาคม พ.ศ. 2555

กรณีที่มีปัญหากล่องความเห็นหรือกล่อง Comment จำนวนมากมีขนาดไม่พอดีกับข้อความ เช่นเล็กไปหรือใหญ่ไป หากต้องจัดการด้วยมือเพื่อให้พอดีกับข้อความแล้วจะทำเสียเวลาไปมากมายครับ
จากปัญหาดังกล่าว เราสามารถใช้ Code VBA ตามด้านล่างในการจัดการปรับกล่องความเห็นให้พอดีกับข้อความพร้อมกันทีเดียวทุกชีทได้ครับ Winking smile
Sub AutoSizeCmt()
Dim i As Integer
Dim c As Comment
Dim cmt As Comments
For i = 1 To Worksheets.Count
Set cmt = Worksheets(i).Comments
For Each c In cmt
c.Shape.TextFrame.AutoSize = True
Next c
Next i
End Sub

Posted by netdesign On 07:30 No comments

0 ความคิดเห็น:

แสดงความคิดเห็น

Onsite computer repair Ramkhamhaeng.














รับซ่อมคอมพิวเตอร์นอกสถานที่ รามคำแหง บางกะปิ นวมินทร์ เสรีไทย


ค่าแรง+ค่ารถ+ลงwinodws+โปรแกรมดูหนังฟังเพลง+office+antivirus 400 บาท
ปล. ให้บริการ เฉพาะเขตพื้นที่ รามคำแหง บางกะปิ นวมินทร์ เสรีไทย ลาดพร้าวเฉพาะ บริเวณ จากเดอะมอลบางกะปิถึงโชคไชย4


สนใจติต่อ : Tel. 083-792-5426





ดูแผนที่ขนาดใหญ่ขึ้น


  • RSS
  • Delicious
  • Digg
  • Facebook
  • Twitter
  • Linkedin
  • Youtube

ป้ายกำกับ

คลังบทความของบล็อก

Advertisement

Unordered List