เพื่อมุ่งให้เกิดคุณภาพจากการอบรมสูงสุด Excel Expert Training ให้การอบรม Excel กลุ่มเล็กๆ ไม่เกิน 6 คนทุกคนสามารถเรียนรู้ Excel อย่างใกล้ชิด จะมาคนเดียวหรือมาเป็นกลุ่มแล้วนัดวันอบรมแบบส่วนตัวก็ได้ ผู้เข้าอบรมทุกคนสามารถติดตามเนื้อหาที่อบรมได้อย่างชัดเจนจากจอภาพด้านหน้าของตัวเอง
Results 1 to 2 of 2

Thread: vba

  1. #1
    tan1234
    Guest

    Post vba

    ถ้าหนูต้องการเพิ่มข้อมูลในแถวสุดท้ายค่ะแบบเพิ่มต่อจากแถวสุดท้ายที่มีอยู่ค่ะแต่ทำไม่ถูก อาจารย์ ช่วยแนะนำหน่อยน่ะค่ะ ขอบคุณค่ะ
    Dim i As Long
    Dim a As Long
    i = 2
    a = 5


    Do While Worksheets("sortdata").Cells(a, 1).Value <> ""


    Worksheets("savedata").Cells(i, 2).Value = Worksheets("sortdata").Cells(a, 1).Value
    Worksheets("savedata").Cells(i, 3).Value = Worksheets("sortdata").Range("d2").Value
    Worksheets("savedata").Cells(i, 4).Value = Worksheets("sortdata").Cells(a, 3).Value
    Worksheets("savedata").Cells(i, 5).Value = Worksheets("sortdata").Cells(a, 4).Value
    Worksheets("savedata").Cells(i, 6).Value = Worksheets("sortdata").Cells(a, 5).Value
    Worksheets("savedata").Cells(i, 7).Value = Worksheets("sortdata").Cells(a, 6).Value
    Worksheets("savedata").Cells(i, 8).Value = Worksheets("sortdata").Cells(a, 7).Value
    Worksheets("savedata").Cells(i, 9).Value = Worksheets("sortdata").Cells(a, 2).Value
    i = i + 1
    a = a + 1
    ActiveCell.Offset(i, 1).Select
    Loop


    End Sub

  2. #2
    สมเกียรติ
    Guest
    ตั้งชื่อกระทู้ใหม่ให้ดีกว่านี้ครับ ให้ตรงกับสิ่งที่ถาม

    ถ้านี่เป็นการสมัครงาน ใบสมัครงานของคุณจะถูกเลื่อนไปล่างสุดหรือไม่ก็ถูกโยนทิ้งไปเลย :nonod:

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •