Dim digunakan pada macro agar kode nama atau istilah tertentu bisa dimasukkan dan dikenali dalam macro. Pertama Dim kita tentukan dulu menjadi jenis apa, bisa string/huruf atau integer/bilangan atau lainnya. Kedua kita definisikan atau kita beri nilai mengacu kemana?
Untuk referensi cell dalam macro bisa menggunakan define name dan bisa juga
dengan Dim berikut untuk mengacu ke cell tertentu.
berikut contoh penggunaan Dim :
'Karena ref cell tidak bisa di tengah rumus mesti pakai dim
Windows((Range("n40"))).Activate
Dim FileName1 As String
Dim FileName2 As String
FileName1 = (Range("K3"))
FileName2 = (Range("K5"))
MSG1 = MsgBox("tempatkan cel di tempat paste dan yes,kalau belum tekan no untuk batal", vbYesNo, "Proses?")
If MSG1 = vbYes Then
'bila pilih yes
ThisWorkbook.Activate
Windows(FileName1).Activate
Sheets("perdist").Select
Cells.Select
ref file: di file pembuatan progress
Untuk rumus diatas, menggunakan nama file yang terdapat di cell K3 dan K5 untuk selanjutnya diaktifkan atau dibuka sebagai tempat paste.
Tidak ada komentar:
Posting Komentar