Page 1 of 1

สอบถามการเขียนโค้ด

Posted: Sat Oct 18, 2014 2:41 pm
by Tamlom
โค้ดที่เขียน ผิดพลาดอย่างไรครับ และจะแก้ไขได้อย่างไร

Private Sub Textbox1_AfterUpdate()

Sheets("SV0036").Select
If SV0036("B2").value = 0 Then
Textbox1.Backcolor = RGB (255,255,0)
Else
Textbox1.Backcolor = RGB (255,255,255)
End If

End Sub

Re: สอบถามการเขียนโค้ด

Posted: Sat Oct 18, 2014 2:57 pm
by snasui
:D การโพสต์ Code ควรโพสต์ให้แสดงเป็น Code ดูตัวอย่างที่นี่ครับ viewtopic.php?style=3&f=3&t=1187

If SV0036("B2").value = 0 Then ควรเป็น If Sheets("SV0036").Range("B2").value = 0 Then

Re: สอบถามการเขียนโค้ด

Posted: Sat Oct 18, 2014 10:08 pm
by Tamlom
ขอบคุณอาจารย์มากครับ ได้คำตอบตรงกับความต้องการครับผม