Convert number to Thai bath with Excel by .Net

โค้ดการใช้ Excel function() ช่วยในการแปลงค่าตัวเลขเป็นจำนวนเงินไทย
เห็นมีของ php เค้าและ เลยไปหาของ .Net มามั่งครั้นจะเขียนโค้ดเอา ก็ดูของ php เค้าไปประยุกต์ก็ได้เลยจุดประกายให้หาวิธีอื่นครับ 
ซึ่งพอดีได้ลองใช้ function ชื่อ BATHTEXT() ของ Excel พอดีเลยคิดว่าเป็น Windows Program เหมือนกัน และ .Net ก็สามารถ
reference มาใช้ได้เลยลองหาวิธีดูครับ นำไปประยุกต์ใช้ได้ทั้ง Window form และ Web form นะครับ แต่ของ Web อาจจะต้องเพิ่มเติมนิดหน่อย ตอนนำไปใช้ จะได้ง่ายขึ้นมาหน่อยนะครับ

** function BATHTEXT() ของ Excel ไม่แน่ใจว่ามีมาตั้งแต่ version อะไรนะครับ แต่ที่ บ. ผมมี Office2003 กับ 2007 อยู่ก็มีใช้อยู่แล้วครับ

ก่อนเริ่มเขียน code เลยนะครับ ก็ต้อง add refferenc ของ Excel เข้ามาก่อน ตามรูปเลยนะครับ


หลังจากนั้นเลือก tab COM ครับ เลื่อนลงไปหา Microsoft Excel 12 Object Libraly หรือของบางคนอาจจะขึ้นเป็น Microsoft Excel 2007 Object Libraly ก็ได้ครับ เหมือนกัน เสร็จแล้วก็ไปส่วนของ code เลยครับ

Code .Net 2008 (C#)

using System.ComponentModel;

ตัวอย่างขอเป็น Window Form แล้วกันนะครับง่ายดี ของ Web ก็เรียกใช้เหมือนกันครับ
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
*ที่ Form จะมี Add 1 Textbox และ 1 Label ไว้นะครับ 
}

public void TextBox1_TextChanged(object sender, EventArgs e)
{
Mircrosoft.Office.Interop.Excel.Application xcel = new Microsoft.Office.Interop.Excel.Application();
try
{
System.Threading.Thread cThread;
cThread = System.Threading.Thread.CurrentThread;
cThread.CurrentCulture = new CultureInfo("en-US");
Label1.Text = xcel.WorkSheetFunction.BahtText(Convert.ToDouble(TextBox1.Text));
}
catch
{
Label1.Text = "";
}
}
}

Output 

 

Read More

สอนการเขียน PHP กับ OOP (Object Oriented Programming) ผ่าน VDO ออนไลน์

• สอน PHP OOP ตอนที่ 1 Public
  
  
  
  คลิกที่ปุ่ม  เพื่อแสดงผลเต็มจอ Full Screen
  
  


• สอน PHP OOP ตอนที่ 2 Private
  
  
  
  คลิกที่ปุ่ม  เพื่อแสดงผลเต็มจอ Full Screen
  
  


• สอน PHP OOP ตอนที่ 3 Protected
  
  
  
  คลิกที่ปุ่ม  เพื่อแสดงผลเต็มจอ Full Screen
  
  


• สอน PHP OOP ตอนที่ 4 Inheritance
  
  
  
  คลิกที่ปุ่ม  เพื่อแสดงผลเต็มจอ Full Screen
  
  


• สอน PHP OOP ตอนที่ 5 Method แบบรับค่า Parameter
  
  
  
  คลิกที่ปุ่ม  เพื่อแสดงผลเต็มจอ Full Screen
  
  


• สอน PHP OOP ตอนที่ 6 Constructor และ Destructor
  
  
  
  คลิกที่ปุ่ม  เพื่อแสดงผลเต็มจอ Full Screen
  
  


• สอน PHP OOP ตอนที่ 7 Static
  
  
  
  คลิกที่ปุ่ม  เพื่อแสดงผลเต็มจอ Full Screen
  
  


• สอน PHP OOP ตอนที่ 8 self and parent
  
  
  
  คลิกที่ปุ่ม  เพื่อแสดงผลเต็มจอ Full Screen
  
  


• สอน PHP OOP ตอนที่ 9 Abstract Class
  
  
  
  คลิกที่ปุ่ม  เพื่อแสดงผลเต็มจอ Full Screen
  
  


• สอน PHP OOP ตอนที่ 10 Interface Class
  
  
  
  คลิกที่ปุ่ม  เพื่อแสดงผลเต็มจอ Full Screen
  
  



• สอน PHP OOP Project ตอนที่ 1 สร้าง Class Database
  
  
  
  คลิกที่ปุ่ม  เพื่อแสดงผลเต็มจอ Full Screen

Read More

Excel Array Formula ตอนที่1

ตอนใหม่มาแล้วครับ ลองดูกันได้เลย เนื้อหาเกี่ยวกับ Array Formula ซึ่งเป็นการคำนวณใน Excel แบบ Advance  ครับ

เนื้อหา

• แนะนำ Array Formula
• Formula Auditing
• เวลาพิมพ์สูตรเสร็จ อย่าลืมกด Ctrl+Shift+Enter นะครับ ถึงจะเป็นการใช้ Array Formula

ตอนต่อไป จะเป็นการใช้ Array Formula ในการ Lookup ข้อมูลแบบ Advance ครับ

Read More

10 เทคนิคที่คุณอาจไม่เคยรู้เกี่ยวกับสูตรของ Excel

หลายๆ คนคงจะใช้โปรแกรม Microsoft Office Excel กันเป็นประจำอยู่แล้ว ทั้งในการทำงานหรือชีวิตประจำวัน แต่ถ้าเรารู้เทคนิคที่จะทำให้เราสามารถใช้ Excel ได้อย่างมีประสิทธิภาพมากขึ้น มันก็น่าจะเป็นเรื่องดีไม่น้อย ผมเลยมีเทคนิคเจ๋งๆ ในการทำงานกับสูตรของ Excel มาบอกเล่ากันหลังจากได้ศึกษามาซักพักนึงจาก คุณExcelIsFun ใน Youtube ครับ

ในตอนแรกผมคิดว่าจะแนะนำ "5 Combo สูตร Excel สุดเจ๋ง" แต่ก็คิดว่าบทความแรกเกี่ยวกับ Excel น่าจะเล่นเรื่องที่(เขียน)ง่ายกว่านั้นก่อน วันนี้เลยจะขอเริ่มด้วย "10 เทคนิคที่คุณอาจไม่เคยรู้เกี่ยวกับสูตรของ Excel" ซึ่งหลายๆ เทคนิคเป็นเรื่องของ ปุ่มลัด (Shortcut) ที่ทำให้เราทำงานได้เร็วขึ้นครับ

ป.ล. หลายๆ อันในนี้อาจต้องใช้ Excel 2007 นะครับ แต่ Excel 2003 ก็ลองดูได้ครับ

10 เทคนิคที่คุณอาจไม่เคยรู้เกี่ยวกับสูตรของ Excel (เรียงตามความบ่อยในการใช้)

1. กด TAB เพื่อใส่สูตรที่โปรแกรมแนะนำ : ขณะพิมพ์สูตร สามารถพิมพ์ไปนิดหน่อยจน Excel ขึ้นสูตรที่แนะนำให้ แล้วสามารถกด TAB เพื่อเลือกใช้สูตรนั้นได้เลย โดยไม่ต้องพิมพ์ให้จบ (แต่ก่อนผมโง่พิมพ์จนจบอยู่ตั้งนาน)

2. กด F4 เพื่อ fix cell reference : เวลาพิมพ์สูตรที่เป็นชื่อ cell อยู่ ถ้าอยากจะ Fix cell reference เพื่อให้ตัว Cell ที่สูตรอ้างไม่เปลี่ยนไปเวลา copy สูตรไปยังช่องอื่นๆ (เหมือนพิมพ์ $ ลงไปข้างหน้า) โดยสามารถกด F4 ได้เลย (กดได้ ไปเรื่อยๆ มันจะวน fix ให้ 3 แบบด้วยกัน คือ Fix ทั้งแถวทั้งหลัก, Fix แถวอย่างเดียว, Fix หลักอย่างเดียว)

3. กด F3 เพื่อเรียก Cell Name ที่ตั้งเอาไว้ : เวลาพิมพ์สูตรอยู่ ถ้าอยากจะใช้ function กับ cell ที่ได้ตั้งชื่อไว้แล้ว สามารถกด F3 เพื่อเลือกว่าจะใช้ Cell ที่ตั้งชื่อเอาไว้แล้วอันไหน มันจะแสดง list ขึ้นมาให้ดูทุกอันเลย แต่ต้องมีการตั้งชื่อไว้ก่อน ( การตั้งชื่อ Cell นั้น ให้เลือก cell หรือกลุ่ม cell ที่ต้องการ แล้วพิมพ์ชื่อไปในช่อง Name Box ที่อยู่ด้านซ้ายของช่องใส่สูตร )

4. กด F2 เพื่อแก้สูตร : เวลาพิมพ์สูตรเสร็จไปแล้ว ถ้าอยากกลับไปแก้สูตรอีกโดยไม่ใช่เมาส์คลิ๊กที่ช่องพิมพ์สูตร ให้เลือก Cell ที่ต้องการแล้ว กด F2 (ช่วยได้มากเวลาพิมพ์สูตรผิด แล้วอยากใช้ปุ่มลูกศรกลับไปแก้ไข ซึ่งต้องกด F2 ก่อน)

5. คุณสามารถเอา Mouse ลากย้าย Tool Tips ของสูตรได้ : เวลาพิมพ์สูตรในช่องแล้วมันขึ้นวิธีใช้สูตรขึ้นมาบัง cell ต่างๆ ของเราจนเกะกะ เราสามารถเอาเมาส์ลากย้ายมันไปวางที่ที่เราต้องการได้ครับ

6. กด Alt + ปุ่ม= เพื่อ Auto SUM : ถ้าเรามีเลขพิมพ์เรียงๆ กันอยู่จากบนลงล่าง เราเลือกช่องที่อยู่ล่างถัดมาหนึ่งช่องแล้วกดปุ่ม Alt+= เพื่อ Auto Sum ได้เลยครับ

7. กด Ctrl+Enter เพื่อใช้สูตรเดียวกันทีเดียวหลายๆ cell : ให้ลาก cell ทั้งหมดที่ต้องการใส่สูตร กด = เพื่อใส่สูตรตามปกติ แล้วกด Ctrl+Enter หลังจากใส่สูตรเสร็จ มันจะใช้สูตรนั้นเหมือนกันทุกช่อง โดยจะเปลี่ยน Cell reference ให้เองด้วย

8. การกำหนด cell ที่จะใช้งานต่อเวลาพิมพ์สูตรเสร็จ : กด Enter ไป cell ข้างล่าง, กด Ctrl+Enter อยู่ช่องเดิม, กด Tab ไปด้านขวา, กด Shift+Tab ไปด้านซ้าย, Shift+Enter ไปข้างบน

9. กด F9 เพื่อแปลงจากสูตรเป็นค่าที่แปลงผลแล้ว : หลังจากกด F2 เพื่อเข้าไปแก้ไขสูตร ลองกดปุ่ม F9 ดู สูตรที่ผูกติดกัย cell จะกลายเป็นค่าผลลัพท์เลย (สามารถเลือกเป็นบางส่วนของสูตรแล้วกด F9 ดูผลได้ด้วย)

10. กด Ctrl + Shift + Enter เพื่อใช้สูตรแบบ Array Formula (Advance มากขอบอก) : บางสูตรของ Excel นั้น เราไม่สามารถกด Enter เฉยๆ หลังจากใส่สูตรได้ เพราะว่าสูตรนั้นต้องการให้ Excel คำนวณโดยใช้ Array เช่น การใช้ Sum แบบเป็น range คูณกัน

เช่น =SUM(A1:A10*B1:B10) จะต้องกด Ctrl+Shift+Enter หลังจากใส่สูตรเสร็จแล้วเท่านั้น ไม่งั้นมันจะ error
โดยในช่องใส่สูตรจะขึ้นเครื่องหมาย { } ครอบสูตรให้เอง เป็น {=SUM(A1:A10*B1:B10)}

และเราจะใช้วิธีพิมพ์เข้าไปเองก็ไม่ได้ด้วย ผลลัพธ์ที่ได้ออกมาจะเป็นผลบวกของ A1*B1 + A2*B2 + A3*B3... A10*B10 ให้เราได้เลย (จริงๆอันนี้สามารถใช้สูตร SUMPRODUCT แทนได้ แต่เราสามารถ พลิกแพลง Array Formula ได้เยอะกว่ามาก )

ใครสนใจรายละเอียดเกี่ยวกับ Array Formula ไปดูได้ที่ Youtube Tutorial ของ ExcelIsFun ได้เลยครับ มีเป็น series เลย http://www.youtube.com/watch?v=vqfikSMx7mE

เอาล่ะ ครบ 10 Tips แล้ว ใครสงสัยตรงไหน หรือมีอะไรแนะนำก็ comment ไว้ได้เลยครับ

Read More

Excel การซ่อนภาพ (Hiding Graphics)

หากคุณเตรียมแผ่นงานที่มีกราฟิก ที่คุณอาจจะต้องการพิมพ์ แต่ไม่ต้องการให้เห็นภาพกราฟิกในแผ่นงานที่พิมพ์ออกมา

ตัวอย่าง : เช่น คุณอาจจะมีการเตรียมการทดสอบสำหรับนักเรียน และการทดสอบต้องให้วาด
กราฟ โดยคุณได้กำหนดตำแหน่งแบบให้นักเรียนทำการทดสอบจากพื้นที่วาดภาพกราฟ แต่ภาพ
กราฟของแผ่นแสดงคำตอบ จะไม่แสดงภาพให้นักเรียนเห็นคำตอบ วิธีที่ง่ายที่สุดในการจัดการใน Excel คือ เพียงปิดการแสดงผลกราฟิก เมื่อคุณต้องพิมพ์แบบทดสอบนักเรียน เพื่อทำสร้างไฟล์เดียวที่มีคำถามและคำตอบ ขั้นตอนการทำ ดังนี้  

 1. คลิกที่ปุ่ม  (Office Button) แล้วเลือก  โปรแกรมจะแสดงกล่องโต้ตอบตัวเลือกขึ้นมา 

 2. คลิกที่ ตัวเลือก  ที่ด้านซ้ายของกล่องโต้ตอบ

 3. ค้นหาตัวเลือกที่มีอยู่ จนกว่าคุณจะเห็นตัวเลือกการแสดงผลนี้พื้นที่สมุดงาน

 4. ถ้าจำเป็นต้องใช้แบบหล่นลงรายชื่อเพื่อระบุสมุดงานที่คุณต้องการเปลี่ยนแปลงตัวเลือกที่

 5. Select ไม่มี (ซ่อน Objects) ปุ่ม 

 6. คลิกปุ่ม   กราฟิกจะหายไปจากหน้าจอ 

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

ตัวอย่าง

หมายเหตุ : เมื่อคุณต้องการพิมพ์ โดยให้แสดงภาพกราฟิกออกมา ก็เพียงแต่ทำตามขั้นตอนเหมือนกับข้างต้น และคลิกเลือกที่  และตามด้วยกดปุ่ม 

Read More

Excel วิธีเปลี่ยนขนาดกระดาษที่แผ่นงานแบบครั้งเดียว

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

ตัวอย่าง : คุณมีแผ่นงานทั้งหมด 15 แผ่น และต้องการเปลี่ยนรูปแบบหน้าทุกแผ่น ให้เป็นขนาด
A4 มีวิธีที่รวดเร็วเพื่อให้การเปลี่ยนแปลงตามขั้นตอนเหล่านี้ คือ:

 1. คลิกขวาที่แท็บแผ่นงานใดก็ได้ คุณจะเห็นกรอบรายการคำสั่งปรากฏขึ้น

 2. เลือกไปที่คำสั่ง "เลือกแผ่นงานทั้งหมด (Select All Sheets)" ดังรูป

 3. จากนั้นไปที่แถบเมนูคำสั่ง เลือก "เค้าโครงหน้ากระดาษ (Page Layout)"
 4. เลือก "ขนาด (Size)" (ในที่นี้จะเลือกใช้ขนาดกระดาษ A4)


 5. ในกรณีที่เราต้องการเปลี่ยนขนาดกระดาษ ก็เพียงคลิกขวาที่แท็บแผ่นงานใดก็ได้อีกครั้ง
จะเห็นกรอบรายการคำสั่งปรากฏขึ้น
 6. จากนั้นเลือกคำสั่ง "ยกเลิกจัดกลุ่ม (Ungroup Sheets)"

ทำนองเดียวกัน ขนาดกระดาษที่ตั้งขณะนี้สำหรับแผ่นงานทั้งหมด. มีข้อเสียเปรียบในวิธีนี้เป็นแต่หากแผ่นงานบุคคลมีแตกต่างกันการตั้งค่าการตั้งค่าหน้า (orientations อื่นขอบ, หัว footers, ฯลฯ) จากนั้นทำตามขั้นตอนเหล่านี้จะตั้งพวกเขาทั้งหมดเดียวกัน. ถ้าคุณเพียงต้องการเปลี่ยนขนาดกระดาษ และไม่ต้องการเปลี่ยนการตั้งค่าอื่นๆ
การใช้แมโคร

Sub AllSheetsA4()
Dim sht As Variant

For Each sht In ActiveWorkbook.Sheets
sht.PageSetup.PaperSize = xlPaperA4
Next

End Sub

หมายเหตุ : เคล็ดลับนี้ทำงานร่วมกับ Microsoft Excel 97, Excel 2000, Excel 2002, Excel 2003 และ Excel 2007

Read More

วิธีเปลี่ยนภาษาบนเมนูคำสั่งใน Excel 2007 จากไทย-อังกฤษ หรือ อังกฤษ-ไทย

1. คลิกที่ปุ่ม  (Office Button) อยู่ตำแหน่งมุมซ้ายด้านบนสุด

2. จะปรากฏหน้าต่างขึ้นมา ให้เลือกคลิกที่ปุ่ม  จะปรากฏหน้าต่างขึ้นมา (ดังรูป)

3. คลิกเลือกไปที่ปุ่ม  จะปรากฏหน้าต่างใหม่ขึ้นมา (ดังรูป)

4. คลิกที่  เพื่อทำการเลือกเป็นภาษาไทย (ดังรูป)

5. คลิกที่ปุ่ม  และตามด้วยปุ่ม  อีกครั้ง จากนั้นให้ทำการปิดโปรแกรม แล้วเปิดใหม่อีกครั้ง โปรแกรมก็จะแสดงคำสั่งเป็นภาษาไทย ช่วยให้เราใช้งานได้ง่ายขึ้นแล้วครับ

หมายเหตุ : กรณีโปรแกรมจะแสดงผลเป็น 2 ภาษาได้นั้น ต้องขึ้นอยู่กับการติดตั้งโปรแกรมลงใน
เครื่องฯ ครั้งแรกด้วยนะครับ

Read More