Saya lupa menjelaskan menjalankan prosedurnya :
Pada sheet Selected Data,menggunakan workbook change...pada saat merubah
Job Number otomatis akan mengambil data dari Database
Salam,
Indra
On 2/14/2014 3:42 PM, Mr. Kid wrote:
Hai Indra,
Boleh ndak kalo BeExceller diberi penjelasan yang lebih detil tentang
datanya ada dimana, mau diapakan, hasilnya seperti apa (minimal hasil
kerja manualnya), yang sudah dicoba apa saja, script tersebut
rencananya buat apa dan segalanya lah.
File lampiran akan membantu. Cukup contoh data, ndak perlu seluruh
data kerja, yang penting mewakili kasus. Jangan sampai lebih dari
250KB ya...
Penjelasan singkatnya bisa diletakkan di body email. Penjelasan detil
dalam workbook yang dilampirkan akan lebih baik lagi.
Kalau ndak ada keterangan lebih lanjut, bisa-bisa ndak akan ada yang
reply nanti...
Wassalam,
Kid.
2014-02-13 10:29 GMT+07:00 ChordJR <[email protected]
<mailto:[email protected]>>:
Assalamualaikum Wr. Wb.
Minta bantuan dari pada master untuk coding macro yang sudah ada
sebelum
saya bekerja,karena ilmu saya yang masih awam mohon di berikan coding
yang tepat...karena saya mencoba untuk membuat file baru dengan bagan
yang sama tapi tidak bisa bekerja...saya rasa mungkin ada kekurangan
pada macro ini...
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 2 And Target.Column = 4 Then
'calculate criteria cell in case calculation mode is manual
Sheets("DATA").Range("Criteria").Calculate
Worksheets("DATA").Range("database") _
.AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Sheets("DATA").Range("criteria"), _
CopyToRange:=Range("A8:Ay8"), Unique:=False
End If
End Sub
*Untuk Name Range pada sheet Data :
criteria=DATA!$B$1:$B$2
database=DATA!$B$4:$DJ$30000
Saya rasa dengan penjelasan singkat ini dapat di mengerti oleh para
master...karena untuk mengupload file terlalu besar sizenya...
Wassalam,
Indra
----- Mods -----
Sample data dengan ukuran <= 250 KB akan lebih memudahkan calon
penanggap
silakan kirim sample workbook, tidak harus data asli, jumlah data
tidak perlu banyak
yang penting mewakili kasus yang ditanyakan.
Berikan juga keterangan, apa2 saja yang diinginkan termasuk contoh
hasil manual
____________
