back to top

excel.web.id

Ini adalah code macro untuk mengambil file

Private Sub getlinkfile() ‘ langsung di tempatkan pada label
Dim nFileName As Variant
'nFileName = Application.GetOpenFilename("Excel Files (*.xls),*.xls", , "Ambil file")'with
nFileName = Application.GetOpenFilename()
If nFileName = False Then
Me.Label1.Caption = "Tidak ada file yang dipilih"
Else
Me.Label1.Caption = nFileName
End If
End Sub
Perhatikan kodenya dan coba baca alurnya.






IF …. Then
-----------------------------------
Sub IF_FUNCTION()
If 6 > 3 Then
    MsgBox "6 Lebih besar dari 3"
End If
End Sub


Cara membaca kode :
Jika 6 lebih besar dari 3 maka tampilkan pesan "6 lebih besar dari 3"
IF … Then …. Else
-----------------------------------
Sub IF_FUNCTION2()
If 6 < 3 Then
MsgBox "6 Lebih kecil dari 1"
Else
If 6 < 5 Then
MsgBox "6 Lebih kecil dari 1"
Else
MsgBox "6 Lebih Besar dari 1"
End If
End If
End Sub
IF_"2 is greater than 4"
ElseIf 3 > 4 Then
Msgbox "..."
End If
End Sub

ELSEIF_ELSE
-----------------------------------
Sub IF_ELSEIF_ELSE_FUNCTION()
If 1 > 4 Then
MsgBox "1 is greater than 4"
ElseIf 2 > 4 Then
MsgBox
box "3 is greater than 4"
Else:
MsgBox "1, 2 or 3 are lesser than 4"
End If
End Sub

Cara membaca kode :


Jenis Perintah SQLData Definition Language (DDL) - Perintah SQL untuk mendefinisikan skema database atau Tabel : CREATE , DROP, ALTERData Manipulation Language (DML) - Perintah SQL untuk memanipulasi data dan pencarian data : INSERT , UPDATE, DELETE, SELECT

Data Control Language (DCL) - Perintah SQL untuk mengontrol database atau tabel : GRANT - REVOKE


Kumpulan Perintah MySQL
CONTOH PERINTAH SQL  KETERANGAN
CREATE DATABASE DBKOPERASI Membuat Database dengan nama DBKOPERASI
SHOW DATABASE Melihat daftar database yang ada di server
DROP DATABASE DBKOPERASI Menghapus Database dengan
nama DBKOPERASI
ALTER DATABASE
CREATE TABEL Pelanggan (
idpel INT AUTO_INCREMENT PRIMARY KEY, nama VARCHAR(30) NOT NULL, alamat VARCHAR(70), deposit DOUBLE DEFAULT 200000)
Membuat tabel dengan nama Pelanggan dengan field idpel, nama, dan alamat. Idpel bersifat INT, tidak boleh NULL, otomatis isiannya, dan Primary Key), FIELD deposit dengan default 200000
DESC Pelanggan Menampilkan design tabel Pelanggan


Asumsi

CREATE DATABASE -- Membuat database
CREATE DATABASE DBKOPERASI -- misal membuat database dengan nama DBKOPERASI

MEMBUAT VIEWCREATE VIEW <NAMA TABLE VIEW> AS <lnjutkan dengan perintah>
exp : CREATE VIEW LIHAT AS
SELECT A.*,B.NAMA FROM PRODUK A INNER JOIN JENIS_PRODUK B WHERE A.IDJENIS=B.IDJENIS
delimiter //
create procedure test_param3
(out param1 INT, in param2 INT, in param3 int)
begin
select count(*) into param1 from produk
WHERE idjenis=param2 or idjenis=param3;
end;
//delimiter
call test_param3 (@count,2,3);
SELECT @count
Bagaimana cara membuat file untuk menyimpan macro ?

Untuk dapat menjalankan file yang mengandung code makro maka kita harus membuat file suatu file Macro.

File Macro excel adalah file yang berextensi .xlsm. Contoh : LatihanForm.xlsm
    Bagaimana Caranya ?
  1. Buat file Baru : Menu File – New – Blank Workbook
  2. Simpan File : Menu File – Save As
  3. Klik File Name : LatihanForm dengan Save as type : excel Macro-Enabled Workbook.
  4. Save
Gambar :
image
Sumber : Buku Membuat Form Excel Profesional dengan VBA Macro – Nyong Masbaim

shipping

0 item(s) in cart

bank acc

Copyright © 2016.
excel.web.id Allright reserved.
Proudly by Blogger
cart
0 items in cart