Page 1 of 1
การเขียนโค๊ดบน WorkSheet โดยสั่งให้มีการวางค่าอย่างเดียว
Posted: Mon Dec 19, 2011 11:05 am
by bank9597

อาจารย์ครับ ผมมีเรื่องรบกวนถามเกี่ยวกับการบังคับวางข้อมูลแบบวางเฉพาะค่าอย่างเดียว
สมมุติว่า ในชีท Sheet1 เซลล์ A1:A5 โดยในเซลล์ดังกล่าวจะมีการคัดลอกข้อมูลมาจากส่วนอื่นมาวาง(Paste) เราจะเขียนโค๊ดอย่างไรเมื่อเวลามีการวางข้อมูล (Paste) ให้เป็นการวางค่าอย่างเดียว โดยไม่เอาขนาดฟอนต์ สีพื้นหลังครับ
เราสามารถวางโค๊ดใน WorkSheet เลยได้ไหม โดยไม่ต้องสร้างปุ่ม RUN
Re: การเขียนโค๊ดบน WorkSheet โดยสั่งให้มีการวางค่าอย่างเดียว
Posted: Mon Dec 19, 2011 4:20 pm
by snasui

สำหรับที่ถามมาใช้ Code การวางเฉพาะ Values ได้ ดูตัวอย่างตามด้านล่างครับ
Code: Select all
Sub test()
Dim rSource As Range
Dim rTarget As Range
'Other code
rSource.Copy
rTarget.PasteSpecial xlPasteValues
'Other code
End Sub