แทรกรูปใน Excel อย่างไรให้พอดีอัตโนมัติ

วิธีการแทรกรูปใน Excel อย่างไรให้พอดีอัตโนมัติ ไม่ต้องเสียเวลาในการปรับขนาดรูปภาพ
สูตรที่ใช้
........................
Dim sPicture As String, pic As Picture
sPicture = Application.GetOpenFilename _
("Pictures (*.gif; *.jpg; *.bmp; *.tif), *.gif; *.jpg; *.bmp; *.tif", _
, "please select picture as you want")
If sPicture = "False" Then Exit Sub
Set pic = ActiveSheet.Pictures.Insert(sPicture)
With pic
.ShapeRange.LockAspectRatio = msoFalse
.Height = ActiveCell.Height
.Width = ActiveCell.Width
.Top = ActiveCell.Top
.Left = ActiveCell.Left
.Placement = xlMoveAndSize
End With
Set pic = Nothing
+++++++++++++++++++++++++

[@Atidech]

ใช้งานได้สะดวกมากเลยครับ ขอบคุณมากเลย ที่มาแบ่งปันความรู้...

[@wiroonrut]

ขอบคุณคะ มีประโยชน์มากๆเลยคะ

[@ภัทราสองเมือง]

ขอบคุณมากค่ะ ใช้งานสะดวกขึ้นเยอะเลยค่ะ

[@bfgservice3890]

ขอบคุณอาจารย์อย่างสูงครับ ผมทำได้ครับ

[@สมคิดดอกพอง-ฬ1ส]

ขอบคุณ มาดภครับ

[@dongpannawat3407]

ใช้ครั้งต่อไปก็ต้อง ก้อบบี้ใหม่ตลอดเลยครับ

[@jennarongdaothuom7581]

ใส่ในวงกลม ในสามเหลี่ยม หรืออย่างอื่นๆ นอกจากสี่เหลี่ยมได้ไหมครับ

[@destroychannel6761]

เอาไปเปิดเครื่องอื่นไม่ได้คับ มีวิธีไหมคับ ทำยังไง มันขึ้น the linked image cannot be displayed ....

[@kanyawee9253]

ทำแล้วแต่นำไฟล์ไปเปิดกับคอมเครื่องอื่นๆไม่ได้ค่ะ มีวิธีแก้ไหมคะ

[@apichayawwasang2412]

ขอบคุณค่ะ

[@warangkanaamthong1828]

ทำไมของเรามันขึ้นเด้งไปหน้าสูตรหรอคะ เวลากดตรงปุ่มอัพโหลดอ่ะคะ

[@dyosuke8]

ลองทำแล้วครับแต่พอส่งไฟล์ให้คนอื่นไปเปิดดูไม่มีรูปครับเหมือนกับว่าฐานข้อมูลอยู่ในเครื่องต้นทางครับ อย่างนี้มีวิธีแก้ไหมครับ

[@tum116]

เหมือนกันเลยแก้ไขยังไงบอกหน่อยครับ

[@kittisukkasawonk58]

ขอบคุณครับ

[@ThanitthaSriboonrod]

รบกวนสอบถามหน่อยคะ พอเราเซฟแล้วกลับมาทำต่อไม่ได้หรอคะ

[@Noc_nox]

ทำเสร็จแล้ว แต่ไม่สามารถดูได้ในมือถือ ทั้งแอนดรอยและ ios ครับ

[@paradeekongyeun2162]

ขอบคุณมากๆค่ะ

[@khathaleesakdakham1639]

ถ้า เป็น PNG ต้องเพิ่่มในสูตรด้วยไหมคะ

[@tum116]

ส่งให้เครื่องอื่นเปิดไฟล์ไม่ได้รูปไม่ขึ้นมีวิธีแก้มั้ยครับ

[@birthday5791]

เขาแปะสูตรไว้ให้แล้วครับ
☝☝☝☝☝☝

[@น้องภูฟ้าandMom]

Copyสูตร ได้มั้ยคะ

[@Kalebbach]

รองทำแล้ว แต่รูปยืด เพราะรูปที่แทรกขนาดไม่เท่ากัน มีวิธีให้มันไม่ยืดมั้ยครับ

[@กฤษฎาเวกสูงเนิน]

กดคำว่า ใหม่ แล้ว ไม่ขึ้นให้ใส่สูตรทำยังไงครับ

[@arisaorthong1418]

ไม่เข้าใจคะ สูตรเอามาจากตรงไหนคะ เห็นมีเเต่บอกว่าเตรียมสูตรไว้เเล้วคะ รบกวนหน่อยคะ

[@phonekiem497]

ชูดข้างล่างนั้นเอามาจากไหนครับ

[@patrickpp5082]

ดีมากๆเลยครับ มีประโยชน์

[@อนาคินบินเดี่ยว]

แล้วเอาสูตรมาจากไหนครับ

[@Paralobpop2024]

กดเอาสูตรจากตรงไหนคะ

[@arunratbutsasom9113]

Copy สูตรตรงไหนคะ

[@douangkhp3156]

สูดแมักโครเอามาจากไหน

[@อรทัยทิพย์เนตร]

แล้วสุตรเอามาจากไหน

[@หรรษา-ฉ9ฑ]

error ครับ ใช้สูตรไม่ได้ครับ

[@สายชลบุญไชยแสน]

Copy สูตรไม่ไม่ค่ะ

[@douangkhp3156]

ไม้เวีรก

[@SiwanonKhwanon]

ข98

[@kittibom1439]

ของผมพบปัญหา เวลาบันทึกแล้ว จะกลับมาใช้อีก มันใช้งานไม่ได้ครับ

[@kittibom1439]

เป็นnote book สำนักงาน

[@M0mmmM0480]

เซฟไฟล์ใหม่หลังใส่สูตร นามสกุลเป็นต้องเป็น .xlsm ครับ ให้จำไวว่าทุกครั้งที่เลือกใช่มาโค จะต้องเป็นไฟล์ .xlsm ครับ

[@0851463385]

เอาสูตรมาจากไหนคะ

[@3024นายพฤกษ์สุทธินนท์]

แล้วถ้าใส่รูปในช่องเดียวกับข้อความล่ะครับ

[@lindasuwandee3720]

copy สูตรตรงไหนคะ

[@UNFOUNDEDERROR]

ขอบคุณมากๆค่ะว่าแต่ก็อปสูตรตรงไกนคะ

[@Welfare882]

ขอบคุณสำหรับความรู้ค่ะเพราะคลิปนี้งานถึงผ่านไปได้ด้วยดีขอบคุณที่แบ่งปันค่ะ

[@น้องภูฟ้าandMom]

Copy สูตรได้มั้ยคะ

[@ธัญญพัทธ์ธรรมลักษณ์โชติ-ล8ง]

รูปจะขยับไปมาไหม