អំពី VBA (តចប់)

៤-Cells របស់Worksheet

-ការចូលទៅកាន់cell

Sub Exercise()

    ‘refer to cell D6

    Workbooks.Item(1).Worksheets.Item("Sheet1").Range("D6")

End Sub

Sub Exercise()

    ‘refer from cell B2 to H6

    Range("B2:H6")

End Sub

Sub Exercise()

    ‘refer from cell D2 to B5 and from F8 to I14

    Range("D2:B5, F8:I14")

End Sub

-ការជ្រើសរើសcell

Sub Exercise()

​​​           'select cell D6

    Range("D6").Select

End Sub

Sub Exercise()

    ‘select from cell D2 to B5 and from F18 to I14

    Range("D2:B5, F8:I14").Select

End Sub

Sub Exercise()

    ‘select all cells

    Rows.Select

End Sub

-ការបោះតំលៃទៅអោយ cell

Private Sub CommandButton1_Click()

Sheet1.Cells(1, 1) = "Dara" 

‘ រឺ

Sheet1.Range("D1") = "Channa"

End Sub

IV-Form និង controls ដទៃទៀត

Form ជាcontrol សំខាន់មួយដែលផ្តល់លទ្ធភាពអោយអ្នកប្រើប្រាស់ធ្វើការបញ្ចូល លុប កែ រឺមើលទិន្នន័យបានងាយស្រួល។

-ការបង្កើត From:

១.ចុចលើ developer tab រួចុចលើ Visal basic

២.បន្ទាប់ពីកម្មវិធីធ្វើការបើកផ្ទាំង Visual Basic Editor រួចមក សូមចុចលើ

នៅខាងឆ្វេង គឺវាផ្ទាំងcontrols ដែលអាចទាញយកមកដាក់លើ From នៅផ្នែកខាងស្តាំ។

Read More

អំពី VBA (ត)

២-Worksheets

Workbook គឺជាស៊េរីនៃ worksheets ជាច្រើន។នេះមានន័យថាworkbook ផ្ទុកនូវworksheets ជាច្រើន។

-ការចូលទៅកាន់ worksheet

Sub Exercise()

​​​​​​​​​​​​​​​​​​​​​​​​​​                    ​​​     Dim journalentry as worksheet      

    Set journalentry=Workbooks.Item(1).Worksheets(2)

End Sub

រឺ

Sub Exercise()

     Dim journalentry as worksheet

    Set journalentry=Workbooks.Item(1).Sheets.Item("Sheet3")

End Sub

          រឺ

Sub Exercise()

    Dim journalentry as worksheet

    Set journalentry=Workbooks(1).Worksheets(2)

End Sub

          -ការ select worksheet

Private Sub Exercise()

    Sheets("Sheet1").Select

End Sub

-ការដាក់ឈ្មោះអោយ worksheet ដោយប្រើប្រាស់ Name ប្រូភើធី

Private Sub Exercise()

    Sheets("Sheet1").Name = "Employees Records"

End Sub

            -បន្ថែម worksheet ដោយប្រើប្រាស់ Add  method របស់ sheets collection

Private Sub cmdNewWorksheet_Click()

    Sheets.Add

End Sub

            -លុប worksheet ដោយប្រើប្រាស់ delete method

Private Sub cmdRemoveSheet_Click()

    Worksheets("Sheet3").Delete

    txtRemoveSheet.Text = ""

End Sub

២-ជួរឈរ(Columns) របស់Worksheet

-ការចូលទៅកាន់ជួរឈរ(Column) ដោយប្រើ index

Sub Exercise()

    ' This refers to the 1th column

    Workbooks(1).Worksheets(2).Columns(1)

    ' This refers to the 12th column

    Workbooks(1).Worksheets(2).Columns(12)

End Sub

-ការចូលទៅកាន់ជួរឈរ(Column) ដោយប្រើ name/label

Sub Exercise()

     “This refers to the column named/labeled A

    Columns("A")

    ' This refers to the column named DR

    Columns("DR")

End Sub

Sub ColumnReference()

    ‘ Refer to the range of columns D to G

    Columns("D:G")

End Sub

Sub Exercise()

    ‘This refers to Columns H, D, and B

    Range("H:H, D:D, B:B")

End Sub

Read More

អំពី VBA

VBA (Visual Basic For Application) ជាផ្នែកដ៏សំខាន់មួយសំរាប់អ្នកសិក្សា Ms. Excel 2007 កំរិតខ្ពស់។

តាមរយៈ VBA គេអាចសរសេរកូដដើម្បំបំពេញមុខងារមួយចំនួនដែលកម្មវិធី Ms. Excel 2007 មិនមាន។

          ខាងក្រោមនេះ មិត្តអ្នកអានទាំងអស់នឺងទទួលបានចំណេះមួយចំនួនក្នុងការសរសេរកូដ

ដោយប្រើប្រាស់ VBA។

I.អថេរ និងប្រភេទទិន្នន័យ

          អថេរៈ​ នៅក្នុងការសរសេរកម្មវិធីកុំព្យូទ័រ អថេរគឺជាតំលៃមួយដែលបានរក្សាទុកជាបណ្តោះអាសន្នក្នុង memory របស់កុំព្យូទ័រនៅពេលដែលវាដំណើរការ។

          ការប្រកាសអថេរៈ

          ដើម្បីអាចប្រើប្រាស់អថេរបាន ជាចំាបាច់គេត្រូវប្រកាសវាជាមុន។ ការប្រកាសអថេរត្រូវចាប់ផ្តើម ដោយពាក្យ Dim។ឧទាហរណ៍ៈ

Sub sum

Dim x

Dim something

End sub

ចំណាំៈ អថេរត្រូវមានឈ្មោះ ហើយត្រូវដាក់នៅក្រោយពាក្យ dim។ ឈ្មោះអថេរត្រូវចាប់ផ្តើមដោយតួអក្សរ រឺ សញ្ញា _ (underscore) និងគ្មានសញា្ញចុច (.)។ ការដាក់ឈ្មោះអោយអថេរមិនត្រូវជាន់នឹងពាក្យគន្លឹះដូចមាន ក្នុងតារាងខាងក្រោមទេៈ

And (Bitwise)	And (Condition)	As	Boolean	ByRef	Byte
ByVal	Call	Case	CBool	CByte	CDate
CDbl	CInt	CLng	Const	CSng	CStr
Date	Dim	Do	Double	Each	Else
ElseIf	End	EndIf	Error	False	For
Function	Get	GoTo	If	Integer	Let
Lib	Long	Loop	Me	Mid	Mod
New	Next	Not	Nothing	Option	Or (Bitwise)
Or (Condition)	Private	Public	ReDim	REM	Resume
Select	Set	Single	Static	Step	String
Sub	Then	To	True	Until	vbCrLf
vbTab	With	While	Xor

ប្រភេទទិន្នន័យ

          ការប្រកាសអថេរខាងលើពុំមានកំនត់ប្រភេទទិន្នន័យទេ។

Read More

តើ Laptop, Notebook, Netbook និង Tablet PC ខុសគ្នាត្រង់ណាទៅ?

Laptop, Notebook, Netbook និង Tablet PC ជាប្រភេទកុំព្យូទ័រដែលអាចដាក់ខ្លួនបាន (ចល័តបាន)ដោយសារវាមាន battery សម្រាប់ធ្វើការនៅពេលដែលយើងមិនមានអគ្គិសនីសម្រាប់ប្រើប្រាស់ ។ ប៉ុន្តែប្រភេទកុំព្យូទ័រទាំងនេះបានបែងចែកទៅតាមប្រភេទរៀងៗខ្លួន ។

Laptop

គឺជាកុំព្យូទ័រមាន Keyboard ពេញលក្ខណៈ, monitor អាចបត់បាន និង មានភ្ជាប់មកជាមួយនូវ optical or floppy disk ។ ជាទូទៅមានសមត្ថភាពដូចទៅនឹង desktop ដែរ គ្រាន់តែវាងាយស្រួលដាក់តាមខ្លួន ។

Read More

Wow មិននឹកស្មានថា Window មាន File Extensions/File Types ច្រើនចឹងសោះ

ខាងក្រោមនេះជាប្រភេទ File Extensions ឬ File Type ដែលមាននៅក្នុងវីនដូ

  .###  Temporary File

  .#24  Locoscript 24-pin Printer Data File

  .#IB  Locoscript Dot Matrix Data File

  .#SC  Locoscript Dot Matrix Data File

  .#ST  Locoscript Dot Matrix Printer Definition File

  .~    Temporary File

  .~AP  Borland C++ AppExpert Project Database File

  .~DE  Borland C++ Project Backup File

Read More

ពាក្យបញ្ជាក្នុង Window (Run commands)

នេះគឺជាបញ្ជីរបស់ Run commands ដែលមានភាពងាយស្រួលប្រើប្រាស់​បានលឿនរហ័ស:

- Widow 7 

 

Windows logo key + R

Add/Remove Programs = appwiz.cpl

Administrative Tools = control admintools

Authorization Manager= azman.msc "New"

Calculator = calc

Certificate Manager = certmgr.msc

Character Map = charmap

Check Disk Utility = chkdsk

Control Panel = control "New"

Read More

ស្វែងយល់ខ្លះៗពី Hard Disk Drive (HDD)

Hard Disk Drive (HDD) ជាឧបរកណ៍សម្រាប់រក្សាទុកទិន្នន័យជាចិន្រៃ្តរបស់កុំព្យូទ័រដ៏សំខាន់ ដែលបង្កើត​ដំបូង​នៅ​ឆ្នាំ ១៩៥៦ ដោយក្រុមហ៊ុន IBM ហើយមានឈ្មោះថា RAMAC ។

ជាទូទៅនៅក្នុងកុំព្យូទ័រមួយត្រូវមាន HDD មួយយ៉ាងតិចសម្រាប់រក្សាទុកនូវប្រព័ន្ធដំណើរការ (Operating System) កម្មវិធីសម្រាប់ប្រើប្រាស់ (Software) និង ឯកសារផ្សេងៗទៀត ។ HDD ដែលសិ្ថតនៅខាងក្នុង case ត្រូវបាន​គេ​ហៅថា Internal HDD ហើយមាន HDD មួយប្រភេទទៀតដែលប្រើនៅខាងក្រៅសម្រាប់រក្សាទុកឯកសារ ឬ backup ត្រូវបានគេហៅថា External HDD ដែលអាចភ្ជាប់តាមរយៈខ្សែ USB ។

Read More