Selasa, 20 November 2012

Menggunakan dim dan filename untuk referensi cell

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

Page View