วันจันทร์ที่ 14 กันยายน พ.ศ. 2552

VBA คืออะไร

Visual Basic for Applications (VBA) คือการใช้ภาษาวิชวลเบสิกในการเขียนโค้ดควบคุมโปรแกรมประยุกต์อื่นๆ เช่น ไมโครซอฟท์ ออฟฟิศ ออโตแคด เป็นต้น

ตัวอย่าง

ใช้ภาษา VBA ในการเลือกข้อมูลจากตารางในไมโครซอฟท์ เอกซ์เซล: '''Sub''' LoopTableExample

'''Dim''' db As DAO.Database
'''Dim''' rs As DAO.Recordset

'''Set''' db = CurrentDb
'''Set''' rs = db.OpenRecordset("SELECT * FROM tblMain")

'''Do Until''' rs.EOF
MsgBox rs!FieldName
rs.MoveNext
'''Loop'''

rs.Close
db.Close
'''Set''' rs = '''Nothing'''
'''Set''' db = '''Nothing'''
'''End Sub'''

VBA ยังสามารถสร้างฟังก์ชันของผู้ใช้ (User Defined Function : UDF) ที่ใช้ในไมโครซอฟท์ เอกซ์เซล:Public Function BUSINESSDAYPRIOR(dt As Date) As Date

Select Case Weekday(dt, vbMonday)
Case 1
BUSINESSDAYPRIOR = dt -3
Case 7
BUSINESSDAYPRIOR = dt -2
Case Else
BUSINESSDAYPRIOR = dt -1
End Select
End Function