Excel Forum

:D ต้องขออภัยครับ การจะใช้ Code VBA นั้นจะต้องเข้าใจบ้างและถามเฉพาะที่ติดปัญหาตามกฎข้อ 5 ด้านบน :roll: หากไม่เข้าใจเลยยังไม่ควรใช้ จำเป็นต้องศึกมามาเป็นลำดับก่อน ศึกษาอย่างไรนั้นลองอ่านที่นี่เป็นแนวทางครับ http://snasui.com/viewtopic.php?f=5&t=3274

กำลังศึกษาอยู่ครับ ถ้าติดตรงไหน เดียวจะมาถามใหม ...

:D
ช่วยอธิบายถึงตำแหน่งชีท ตำแหน่งเซลล์ว่าต้องการจะ Lock ชีทไหน เซลล์ไหน อย่างไร Code ที่ Copy มาใช้นั้นแสดงค่าผิดพลาดอย่างไร

การโพสต์ Code ให้เป็น Code ดูที่นี่ครับ http://snasui.com/viewtopic.php?f=3&t=1187


1. Sheet ชื่อ Main Search ที่ต้องการ Lock
2. ตำแหน่งที่ต้องการจะ Lock คือ Lock ท ...

ผู้รู้ทุกท่านและเพื่อน ๆ พี่ ๆ ทุกท่าน และอาจารย์ ช่วยแนะนำหน่อยครับ

1. ผมอยาก Lock Cell ใน sheet หน่อยนะครับคือ
ผมต้องทำอย่างไรครับ...?

2. ผมอยาก ดับเบิ้ลคลิก ช่องแถวนี้น่ะครับ
ต้องใช้ Code อย่างไรน่ะครับ

ผมลองศึกษา Code ชุดนี้ดูแล้วครับ งงเลย ไปไม่ถูกครับ
Code นี้ได้มาจากที่นี้หล่ะครับ แต ...

:D ลองใช้ DropButtonClick แทนดูว่าใช้งานได้หรือไม่ การใช้งานให้คลิกที่ Drop-down Button ครับ
Private Sub ComboBox1_DropButtonClick()
With Me.ComboBox1
.Clear
.AddItem "Other"
.AddItem "Case+Note book"
.AddItem "Monitor"
.AddItem "Software"
End With
End Sub
สำหรับ Event Click ไม่พบว่าเก ...

:D ลองใช้ DropButtonClick แทนดูว่าใช้งานได้หรือไม่ การใช้งานให้คลิกที่ Drop-down Button ครับ
Private Sub ComboBox1_DropButtonClick()
With Me.ComboBox1
.Clear
.AddItem "Other"
.AddItem "Case+Note book"
.AddItem "Monitor"
.AddItem "Software"
End With
End Sub
สำหรับ Event Click ไม่พบว่าเก ...

snasui wrote: แนบไฟล์ พร้อม Code มาด้วยเพื่อน ๆ จะได้ช่วยทดสอบได้ครับ

ติดที่การใช้งาน ComboBox ครับ ช่วยแนะนำด้วยน่ะครับ

ขอบคุณมาก ๆ ครับ

:D เรื่องถูกหรือไม่ถูกสามารถทดสอบได้เองครับ ให้ถามเฉพาะที่ติดปัญหาครับ :mrgreen:

ขอโทษครับ ทดสอบแล้วครับ
ไม่สามารถ ทำได้ เนื่องจากว่า กดแล้วไม่ยอมขึ้น
ถ้า Object Dblclick จะขึ้น Data มาให้เลือกนะครับ
Private Sub ComboBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
With Me.ComboBox1 ...

การใช้ ComboBox ผมใช้อย่างนี้ถูกต้องให้ครับ ช่วยแนะนำด้วยครับ
Private Sub ComboBox1_Change()
With Me.ComboBox1
.Clear
.AddItem "Other"
.AddItem "Case+Note book"
.AddItem "Monitor"
.AddItem "Software"
End With
End Sub


คือต้องการที่จะ Select Sheet น่ะครับ
ขอบคุณครับ.

เดียวเข้ามารายงานผล อีกทีครับ ขอบคุณครับ.

snasui wrote: จาก Link ที่แนบมาเรากำหนดค่าตัวแปร c ใช้แทนค่าทีเราต้องการค้นหา การหาว่าค่าตัวแปรอยู่แถวใดคอลัมน์ใดสามารถใช้ .Row, .Column เข้ามาตรวจสอบได้ครับ

Code: Select all

c.Row

คือบรรทัดของตัวแปร

Code: Select all

c.Column

คือคอลัมน์ของตัวแปร

ขอบคุณมาก ๆ ครับ อาจารย์
อย่างนี้ต้องลองใช้แล้วครับ ขอบคุณมาก ๆ ครับ

:D ลองดูตัวอย่างการ Search จากกระทู้นี้และลองปรับมาดูครับ :arrow: http://www.snasui.com/viewtopic.php?f=9&t=2244&view=next และที่นี่ครับ http://www.snasui.com/viewtopic.php?f=3&t=3496&view=next

ขอบคุณครับอาจารย์
ได้จากกระทู้นี้ครับ http://www.snasui.com/viewtopic.php?f=3&t=3496&view=next
ตอนนี้ ข ...

คือผมอยากจะทราบวิธี Search เป็นคำ ที่อยู่ใน Cell
วิธีและขั้นตอนการทำงาน
1. key Data ลง TextBox2 เช่น คำว่า "เก้าอี้" หรือจะเป็นคำอื่น ก็ได้ ที่เราต้องการหา
2. แล้วกดปุ่ม Search เพื่อให้ code ทำตามคำสั่งที่กำหนดไว้ เบื้อต้น

ผมต้องการ code Search น่ะครับ
เบื้อต้น ผมได้ลอง Record Macro แล้วน่ะครับ แต ...

yodpao.b wrote:ขอโทษครับ เข้าใจผิดไปหน่อย

อยากทราบไอคอนลูกศรที่อยู่ในเมนูวาดภาพ excel 2003

อยากทราบไอคอนลูกศรที่อยู่ในเมนูวาดภาพ excel2003 ถ้าเป็น 2007 อยู่ที่ใด

2007 นะครับ
กด Insert
กด Shapes

แล้วเลือกใช้ได้เลยครับ
ตรงจุดประสงค์หรือเปล่าครับ ผิดพลาดต้องขอโทษด้วยครับ...

ขอบคุณครับท่าน เอาไปใส่ตามที่บอก อันนี้ได้แล้วครับ

ท่านครับ

สมมุติผมสร้าง TextBox 1,2,3,4 ตามลำดับ
แล้วพอผมเข้า userform cursor มันไปอยู่ที่ textbox1 แล้วผมก็ enter มันก็ไป textbox2,3,4 ตามลำดับ
แล้วพอผมลบ textbox2 ออก แล้วมาเปลี่ยนเป็น combobox พอเข้าฟอร์ม แล้ว enter มันข้าม combobox ไป textbox3 ...

หรือว่าผมต้อง Set ค่า TabIndex ด้วยหรือเปล่าครับ
แต่ผมเข้าใจว่าค่า TabIndex เป็นค่าที่ได้รับจากการ กด Tab อย่าง
หรือมันเป็นค่าที่ Set Auto ตอนที่เราสร้าง


โอเคครับ ทำได้แล้วครับ

ถ้าติดตรงไหนอีกจะมาถามอีกน่ะครับ ขอบคุณมาก ๆ ครับ.

ถ้าเราต้องการให้ Focus ตรงที่เราต้องการ ต้องทำอย่างไรครับ

Code ตัวอย่างที่ผมเขียนไปแล้ว คือต้องการให้ Focus ตามที่เราต้องการ
Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 Then
StrValue = Me.TextBox1.Value
Call ChLenAll(StrValue ...

bank9597 wrote: ที่ถามมานั้น ต้องใช้ VBA ช่วยทั้งนั้นเลยครับ ลองหาวิธีและเขียนโค๊ดมาดูก่อนแล้วกันครับ เดี๋ยวอาจารย์คนควนและคนอื่นๆจะเข้ามาช่วยดูให้ครับ

อ่อครับ ขอบคุณครับ กำลังเขียน Code VBA อยู่ครับ
ขอบคุณมาก ๆ ครับ.

การสร้าง DTPicker ไม่ให้ AutoSiz และอยากให้ Focus ตามที่เราต้องการ

1 .การสร้าง DTPicker Date เราจะทำยังไงให้ DTPicker เวลาที่เราเปิด File excel(File Run Program) ตัวนี้ขึ้นมาใหม่
เราอยากให้ขนาด ของ DTPicker (Height) ได้ตามที่เราต้องการ หรือเป็นค่าเก่าที่เรา Set ไว้ ตอนก่อนหน้านี้
2 .ผมกำลังจะสร ...

snasui wrote: ผมไม่ทราบวิธีอื่นใดนอกจากที่ตอบไปแล้วครับ

อ่อครับ ไม่เป็นไรครับ
ขอบคุณมาก ๆ ครับ อาจารย์.

Microsoft Office 2003 กับ Microsoft Office 2007 รูปที่ได้ออกมามันต่างกันมาก

Microsoft Office 2003 รูปที่ออกมา สวยไม่ดำ ตัวหนังสือ อ่านออก
Microsoft Office 2007 รูปที่ออกมา ไม่สวย ตัวหนังสือดำมาก จนอ่านไม่ออก

มีวิธีแก้ไข หรือว่ามีวิธี Save Image แบบไหนที่พอจะช่วยให้รูปสวยขึ้นมาอีกหน่อยได้ไหมครับ ...