VBA
|
:
|
Visual Basic
of Application
|
VBA
|
:
|
Macro
|
Macro Scurity
|
Pengaturan Macro
|
|
Enable macro
|
Macro Aktif
|
|
Disable macro
|
Macro belum aktif
|
|
Record macro
|
Merekam Macro
|
|
Open
|
:
|
buka
|
Save
|
:
|
simpan
|
SaveAs
|
:
|
simpan sebagai
|
:
|
||
Close
|
:
|
Tutup
|
:
|
||
Workbook
|
:
|
Buku kerja atau
file excel
|
:
|
||
ActiveWorkbook
|
:
|
buku kerja aktif
|
:
|
||
Workbook_Open
|
:
|
buka buku kerja
|
:
|
||
ThisWorkbook.Save
|
:
|
Simpan buku kerja
|
:
|
||
ActiveWorkbook.SaveAs Filename:=”budi.xlsm”
|
:
|
Simpan sbg Save As
|
:
|
||
ActiveWorkbook.SaveAs
Filename:=”C:\Data\SalesData1.xlsx”
|
:
|
Simpan sbg Save As
ke dokumen C
|
:
|
||
ThisWorkbook.Close
|
:
|
Tutup buku kerja
|
:
|
||
Application.Quit
|
:
|
Tutup aplikasi
|
:
|
||
Private Sub
|
:
|
Prosedur Khusus
utk sebuah objek
|
:
|
||
Private Sub Workbook_Open()
|
:
|
Auto saat
Workbook_Open
|
:
|
||
Private Sub Workbook_BeforeClose(Cancel As
Boolean)
|
:
|
Auto sebelum Workbook close
|
:
|
||
Private Sub Workbook_Deactivate()
|
:
|
Auto sebelum Workbook close
|
:
|
||
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As
Boolean, Cancel As Boolean)
|
:
|
Auto sebelum Workbook save
|
:
|
||
Private Sub Workbook_Open()
|
:
|
Auto saat Workbook_Open
|
:
|
||
Private Sub UserForm_Initialize()
|
:
|
Perintah auto
userform property
|
:
|
||
Private Sub UserForm_Activate()
|
:
|
Perintah auto
userform aktif
|
:
|
||
Private Sub ComboBox2_Change()
|
:
|
Perintah auto
ComboBox2 di klik
|
:
|
||
Private Sub Textbox1_Change()
|
:
|
Perintah auto
Textbox1 di klik
|
:
|
||
Private Sub MultiPage1_Change()
|
:
|
Perintah auto
MultiPage1 di klik
|
:
|
||
Private Sub ScrollBar1_Change()
|
:
|
Perintah auto
ScrollBar di klik
|
:
|
||
Private Sub SpinButton1_Change()
|
:
|
Perintah auto
SpinButton1 di klik
|
:
|
||
Private Sub CheckBox1_Click()
|
:
|
Perintah auto
CheckBox di klik
|
:
|
||
Private Sub Image1_Click()
|
:
|
Perintah auto
Image1 di klik
|
:
|
||
Private Sub Label1_Click()
|
:
|
Perintah auto
Label1 di klik
|
:
|
||
Private Sub ListBox1_Click()
|
:
|
Perintah auto
ListBox1 di klik
|
:
|
||
Private Sub ToggleButton1_Click()
|
:
|
Perintah auto
ToggleButton1 di klik
|
:
|
||
Private Sub UserForm_Click()
|
:
|
Perintah auto
UserForm di klik
|
:
|
||
Label
|
:
|
Label tampilan text
|
:
|
||
Caption
|
:
|
Isi atau Label
pada tollboxt
|
:
|
||
Label1.Caption = “Selamat Belajar VBA”
|
:
|
Menggunakan Caption
|
:
|
||
CommandButton2. Caption = “Input Data”
|
:
|
Menggunakan Caption
|
:
|
||
OptionButton1.Caption = "Male"
|
:
|
Menggunakan Caption
|
:
|
||
TextBox1.Value
|
:
|
Menggunakan Value
|
:
|
||
ComboBox1.Value
|
:
|
Menggunakan Value
|
:
|
||
xlDialogOpen
|
:
|
Jendela pengaturan
di excel
|
:
|
||
Application.Dialogs(xlDialogOpen).Show
|
:
|
Jendela Buka dokumen
|
:
|
||
Application.Dialogs(xlDialogPrint).Show
|
:
|
Jendela print dialog
|
:
|
||
Application.Dialogs(xlDialogSaveAs).Show
|
:
|
Jendela save as dialog
|
:
|
||
Application.Visible = True
|
:
|
Sembuyikan lembar
Kerja =true
|
:
|
||
Application.Visible = False:
|
:
|
Jangan sembunyikan
lembar Kerja = False
|
:
|
||
Private Sub Worksheet_SelectionChange
|
:
|
Perintah otomatis
pada sheet active
|
:
|
||
Sheets("Sheet1").Range("A1") =
"Belajar VBA"
|
:
|
Sheets("Sheet1").Range("A1")
= "Belajar VBA"
|
:
|
||
SelectionChange
|
:
|
SelectionChange
|
:
|
||
Range("A1") = "Belajar VBA"
|
:
|
Range("A1")
= "Belajar VBA"
|
:
|
||
Font.FontStyle = "Italic"
|
:
|
Jenis Text
|
:
|
||
Worksheet
|
:
|
Lembar kerja atau
sheet
|
:
|
||
Worksheet(“sheet1”)
|
:
|
Nama sheet = sheet1
|
:
|
||
Worksheet(“Data”)
|
:
|
Nama sheet = data
|
:
|
||
sheet1
|
:
|
Sheet yang pertama
|
:
|
||
Sheet2
|
:
|
Sheet yang ke dua
|
:
|
||
Sheets(“Sheet1”)
|
:
|
Nama Sheetnya Sheet1
|
:
|
||
Sheets(“Sheet2”)
|
:
|
Nama Sheetnya Sheet2
|
:
|
||
Sheets(“Data”)
|
:
|
Nama Sheetnya Data
|
:
|
||
Sheest(“siswa”)
|
:
|
Nama Sheetnya siswa
|
Sheet(“Sheet1”)
|
:
|
Nama Sheetnya Sheet1
|
Count
|
:
|
hitung
|
:
|
||
Sheets.Count
|
:
|
Semua jumlah Lembar
|
:
|
||
Sheets.Add
|
:
|
Tambah Sheet Baru
|
:
|
||
Sheets(Sheets.Count)
|
:
|
Sejumlah sheet yang
ada
|
:
|
||
Sheets.Add
|
:
|
Tambah Sheet Baru
|
:
|
||
Move After
|
:
|
Simpan setelah
|
:
|
||
Sheets(Sheets.Count)
|
:
|
Sejumlah sheet yang
ada
|
:
|
||
Sheets.Add.Move After:=Sheets(Sheets.Count)
|
:
|
buat Sheet simpan
setelah sheet akhir
|
:
|
||
Sheets.Add.Move before:=Sheets(Sheets.Count)
|
:
|
buat &simpan
sebelum sheet akhir
|
:
|
||
Sheets("Sheet1").Copy After:=Sheets(Sheets.Count)
|
:
|
Sheet1.Copy simpan sesudah sheet akhir
|
Wednesday, March 4, 2020
KAMUS VBA
Subscribe to:
Post Comments (Atom)
APLIKASI GUDANG VERSI EXCEL VBA
Aplikasi Gudang Sederhana silahkan dikembangkan kritik dan saran membangun selalu kami harapkan FROM ENTRI IURAN BULANA...
-
Membuat form entri Iuran Bulanan Private Sub ComboBox1_Change() If ComboBox1.Value = ActiveSheet.Range("d7") Then TextBo...
-
Dapatkan Segera aplikasi Data dan Keuangan RT !!! Kerja lebih mudah dan lebih berpropesional Hemat waktu dan tenaga !!! Harga bersahabat...
-
STATEMEN DIM Pengertian DIM DIM adalah bagian dari versi awal bahasa komputer BASIC (Beginne...
No comments:
Post a Comment