ขอวิธีการขึ้นแถวใหม่ในการคีย์ข้อมูลหน่อยครับ
Posted: Fri Apr 11, 2014 4:54 pm
คือ ผมต้องการให้คีย์ข้อมูลที่ G1 แล้วพอ Enter มันจะวิ่งไปที่ A2 เลย พอคีย์ถึง G2 พอ Enter ก็วิ่งมาที่ A3 เลย อย่างนี้ครับ พอจะมีวิธีหรือเปล่าครับ
ขออภัยด้วยครับคิดลึกเกินไป สรุปผมใช้คำสั่งแค่นี้ครับ
If Target.Column = 8 Then ' หลังจากที่มีคีย์ข้อมูลที่ Column G
Target.Offset(1, -7).Activate ' กำหนดให้ลงมา 1 แถว ถอยไป 7 Column
End If
ขออภัยด้วยครับคิดลึกเกินไป สรุปผมใช้คำสั่งแค่นี้ครับ
If Target.Column = 8 Then ' หลังจากที่มีคีย์ข้อมูลที่ Column G
Target.Offset(1, -7).Activate ' กำหนดให้ลงมา 1 แถว ถอยไป 7 Column
End If
คีย์ด้วยวิธีธรรมดาก็ได้ครับ