Page 1 of 1
ออกจากโปรแกรมด้วยการลิงค์
Posted: Mon Apr 09, 2012 7:38 pm
by Phantae06
ผมอยากทราบว่า มี สูตร ไหมครับ ที่จะทำให้เราออกจากโปรแกรม โดยการคลิก ที่เวล N17
Re: ออกจากโปรแกรมด้วยการลิงค์
Posted: Mon Apr 09, 2012 7:48 pm
by songsug
เอา VBA แทนได้ไหมครับ เวลาคลิกไปโดนคำว่า ออกจากโปรแกรม มันจะปิดให้ ถ้าเรื่อง Links ผมไม่แน่ใจครับ ลองถามอาจารย์อีกทีนะ
Code: Select all
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Value = "ออกจากโปรแกรม" Then
If MsgBox("แน่ใจหรือที่จะปิดไฟล์", vbQuestion + vbYesNo, "ปิดไฟล์.") = vbNo Then Exit Sub
ActiveWorkbook.Close (False) ' ปิดแบบไม่ SAVE นะ
End If
End Sub
Re: ออกจากโปรแกรมด้วยการลิงค์
Posted: Tue Apr 10, 2012 7:04 am
by snasui
ไม่มี Link สำหรับปิดโปรแกรมครับ สามารถทำด้วย VBA อย่างที่คุณ songsug ตอบไปแล้วครับ
Re: ออกจากโปรแกรมด้วยการลิงค์
Posted: Tue Apr 10, 2012 7:39 am
by Phantae06
ขอบคุณครับ จะลองดู เพราะ มีความรู้เรื่อง VBA น้อยมาก
Re: ออกจากโปรแกรมด้วยการลิงค์
Posted: Tue Apr 10, 2012 7:48 am
by Phantae06
ขอโทษครับ ผมเปลี่ยนภาษาที่ใช้ในการพิมพ์ไม่ได้ครับ ไม่ทราบว่าจะเปลี่ยนเป็นภาษาไทยอย่างไร
Re: ออกจากโปรแกรมด้วยการลิงค์
Posted: Tue Apr 10, 2012 7:56 am
by songsug
ที่หน้า VBE (หน้าที่ใช้เขียน Code ) เลือกที่ Tool - Options - เลือก Tab Editor Format ที่ Font ให้เลือกตัวที่ลงท้ายด้วย Thai ครับ ผมใช้ AngsanaUPC แล้วก็เลือกขนาดรับ ลองดูนะ