Messages In This Digest (7 Messages)

1a.: Ber-Excel Ria Menggunakan Database MS Access From: sin.ur4t@yahoo.com
1b.: Re: Ber-Excel Ria Menggunakan Database MS Access From: Kid Mr.
1c.: Re: Ber-Excel Ria Menggunakan Database MS Access From: sin.ur4t

2a.: Re: Rekonsiliasi Saldo From: i Haps
2b.: Re: Rekonsiliasi Saldo From: Irwan didi

3a.: Daftar Libur Nasional dan Cuti Bersama Th 2012 From: siti Vi
3b.: Menambah field berformula di dalam pivot table From: Mumu SBTC

View All Topics | Create New Topic

Messages

1a.: Ber-Excel Ria Menggunakan Database MS Access

Posted by: "sin.ur4t@yahoo.com" sin.ur4t@yahoo.com sin.ur4t

Sat Dec 24, 2011 8:28 am (PST)

Dear...Be-xl-ers :)

Sebelumnya makasih banyak buat Pak bro ontoseno84 atas 'ajarannya' ttg cara attach file :)

Data kami tersimpan di MS Access, dan kami ingin tetap seperti itu. Kami bekerja menggunakan Excel.
1. Bgmn caranya agar excel ter-koneksi dgn access sbg sumber data?
2. Bgmn caranya agar excel bisa 'mencuri' dan 'hitung-menghitung' menggunakan data access tsb?

Terlampir contoh data access dan tabel excel utk hasil yg diinginkan.
Jika harus pakai macro, mohon dijelaskan step by step, maklum masih awam :)
Trims sblmnya atas pencerahan rekan2.

Salam Hormat
Sinurat - Sumut

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (3)
1b.: Re: Ber-Excel Ria Menggunakan Database MS Access

Posted by: "Kid Mr." mr.nmkid@gmail.com nmkid.family@ymail.com

Sat Dec 24, 2011 8:44 am (PST)

Pak Sinurat,

Jika menggunakan Excel 2003, coba jalan-jalan ke :
http://office.microsoft.com/en-us/excel-help/import-data-import-external-data-into-excel-2003-RZ001183132.aspx

Jika menggunakan Excel 2007, coba jalan-jalan ke :
http://office.microsoft.com/en-us/excel-help/connect-to-import-external-data-HP010089898.aspx?CTT=1

Kid.

2011/12/24 <sin.ur4t@yahoo.com>

> **
>
>
> Dear...Be-xl-ers :)
>
> Sebelumnya makasih banyak buat Pak bro ontoseno84 atas 'ajarannya' ttg
> cara attach file :)
>
> Data kami tersimpan di MS Access, dan kami ingin tetap seperti itu. Kami
> bekerja menggunakan Excel.
> 1. Bgmn caranya agar excel ter-koneksi dgn access sbg sumber data?
> 2. Bgmn caranya agar excel bisa 'mencuri' dan 'hitung-menghitung'
> menggunakan data access tsb?
>
> Terlampir contoh data access dan tabel excel utk hasil yg diinginkan.
> Jika harus pakai macro, mohon dijelaskan step by step, maklum masih awam :)
> Trims sblmnya atas pencerahan rekan2.
>
> Salam Hormat
> Sinurat - Sumut
>
>

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (3)
1c.: Re: Ber-Excel Ria Menggunakan Database MS Access

Posted by: "sin.ur4t" sin.ur4t@yahoo.com sin.ur4t

Sat Dec 24, 2011 2:29 pm (PST)

Makasih arahannya pak Mr Kid, link-nya sdh saya baca dgn terbata-bata, yahhh lumayan faham lah utk cara meng-koneksi-kan excel dgn access.

Nah, tapi selanjutnya msh bingung pak. gimana langkah (rumus) utk 'menyuruh' excel mengambil data access yg diperlukan lalu menampilkan hasil kalkulasinya.

Salam,
Sinurat - Sumut

--- In belajar-excel@yahoogroups.com, "Kid Mr." <mr.nmkid@...> wrote:
>
> Pak Sinurat,
>
> Jika menggunakan Excel 2003, coba jalan-jalan ke :
> http://office.microsoft.com/en-us/excel-help/import-data-import-external-data-into-excel-2003-RZ001183132.aspx
>
> Jika menggunakan Excel 2007, coba jalan-jalan ke :
> http://office.microsoft.com/en-us/excel-help/connect-to-import-external-data-HP010089898.aspx?CTT=1
>
> Kid.
>
> 2011/12/24 <sin.ur4t@...>
>
> > **
> >
> >
> > Dear...Be-xl-ers :)
> >
> > Sebelumnya makasih banyak buat Pak bro ontoseno84 atas 'ajarannya' ttg
> > cara attach file :)
> >
> > Data kami tersimpan di MS Access, dan kami ingin tetap seperti itu. Kami
> > bekerja menggunakan Excel.
> > 1. Bgmn caranya agar excel ter-koneksi dgn access sbg sumber data?
> > 2. Bgmn caranya agar excel bisa 'mencuri' dan 'hitung-menghitung'
> > menggunakan data access tsb?
> >
> > Terlampir contoh data access dan tabel excel utk hasil yg diinginkan.
> > Jika harus pakai macro, mohon dijelaskan step by step, maklum masih awam :)
> > Trims sblmnya atas pencerahan rekan2.
> >
> > Salam Hormat
> > Sinurat - Sumut
> >
> >
>

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (3)

2a.: Re: Rekonsiliasi Saldo

Posted by: "i Haps" hapsari.stlizbeth@gmail.com liz_indri_haps

Sat Dec 24, 2011 4:59 pm (PST)

Whaduh lampirannya di atas "jatah yg diatur dm *peraturan milis*" 397 KB
dengan nama yg terlalu generik
(sering kembar dengan file donlotan sebeumnya, sulit dicari kembali)
Xls kan bisa di-ZIP atau di-RAR (maksudku : dicompressed) sehingga mengecil
bisa sampai 15 - 20% nya ?
File besar membuat penderitaan bagi member yg koneksi-internetnya kelas
"payah" seperti koneksi-ku;
file 300 KB kalau bisa terdonlot tuntas pun bisa di-sambil (disambi)
membuat miegorenginstant dulu...

Btw,
VBA Code - nya hanya seperti ini,
ditulis di module sheet "Recon" (sheet di mana "otomatisasi" ingin
dijalankan)

Private Sub Worksheet_Change(ByVal Target As Range)
' makro dijalankan otomatis -
' jika Kriteria Account diubah
' coded by: indri Hapsari / 24 Dec 2011
'-------------------------------
If Target.Cells.Count = 1 Then
If Target.Address = "$C$1" Then
If Not Target.Value = vbNullString Then
*SummarizedAccount*
Else
Range("A$4").CurrentRegion. _
Offset(1, 0).ClearContents
Range("D1").ClearContents
End If
End If
End If
End Sub
'-----------------------

yg tidak sempat dijelaskan di sini saat ini hanyalah "method" bernama
SummarizedAccount itu
tapi anda bisa melihatnya di module (lembar code)nya...

akan sangat membahagiakan penanggap, jika anda berkenan mencobanya, lalu
mengabarkan hasil percobaan itu (works / not works ); misalnya "cicing wae"
(seperti banyak penanya lalin) pun juga ndak masalah..

*sedikit catatan:*

Jurnal KELUAR: Kok ndak ada kolom KODE nya ya ? "Wai? (Why) ?
Kolom Jumlah jadi lain posisinya dengan posisi KolomJumlah pada Jurnal
MASUK

Hal seperti ini bisa berakibat pengolahan lebih lanjut menjadi lebih sulit
dan runningtimenya LAMA, dan Coding / rumus tidak gampang dapat dibuat
code yg Re-Usable !

Selain itu ada Tabel Jurnal kok dipisah (jurnal KELUAR (penabung menarik
dana) dan Jurnal MASUK (penabung mendepositkan dana) ..
Itu juga sudah tidak sesuai dengan kaidah database. MUNGKIN kedua Tabel ini
adalah dua buah REPORT; bukan data-tabel yg disediakan untuk sumber
pembuatan report (rekening dsb)

Maaf, satu lagi...
di sheet MASUK saya menCABUT pemberlakuan fitur SUBTOTAL
Karena Data yg di"Subtotal" adalah REPORT, bukan tabel data yg berkaidah
database lagi (lha kok disuruh dijadikan sumber penerbitan Report >?)

BILA tabel-tabel yg akan diolah untuk bisa menerbitkan reports ternyata
terlalu banyak melanggar kaidah database; kemungkinan terburuknya adalah :
tidak bisa diolah tanpa (jika ditak diperbaiki dulu)

CMIIW,
mungkin itu semua hanya keterbatasan pengetahuan saya saja, padahal menurut
orang lain semuanya sudah "OKE & siap olah!"
indri Haps / smg, 24 dec 2011

Jika ada ada kendala dlm menggunakan file terlampir (sulit melihat
vbacode-nya), anda masih dapat mencoba file lain
<http://www.box.com/s/r1xc7e09jt1r9hmlfrv3>yg dapat diunduh di sini:
http://www.box.com/s/r1xc7e09jt1r9hmlfrv3

2011/12/24 Irwan didi <irwan_didi@yahoo.com>
>
> Dear Pakars.
>
> Saya ada kendala dalam menyusun rekonsiliasi saldo dimana penerimaan
(sheet masuk) mempunyai data pemasukan per kode barang dan pengeluaran
(sheet keluar) adalah total pencairan dana.
> yang saya tanyakan bagaimana membuat kode VBA untuk menghasilkan rekap
rekonsiliasi seperti yang tertera pada sheet recon.
>
> Terima Kasih
> one
>

----------

Private Sub Worksheet_Change(ByVal Target As Range)
' makro dijalankan otomatis -
' jika Kriteria Account diubah
' coded by: indri Hapsari / 24 Dec 2011
'-------------------------------
If Target.Cells.Count = 1 Then
If Target.Address = "$C$1" Then
If Not Target.Value = vbNullString Then
SummarizedAccount
Else
Range("A$4").CurrentRegion. _
Offset(1, 0).ClearContents
Range("D1").ClearContents
End If
End If
End If
End Sub

Sub SummarizedAccount()
'---------------------------------------
' Menggenerate 1 rekening
' Procedure Utama
'---------------------------------------
' SUM Transaksi on Tgl SAMA & D/C sama
' Coded by siti Vi & indri Hapsari
' Smg, 24 dec 2011
'---------------------------------------
Dim tDepo As Range, tDraw As Range
Dim AcRNG As Range, tRslt As Range
Dim AkumD As Double, AkumC As Double
Dim Saldo As Double
Dim CriAc As String, CriTg As Date
Dim i As Long, lROW As Long

Set tDepo = Sheets("Masuk").Cells(1).CurrentRegion
Set tDraw = Sheets("Keluar").Cells(1).CurrentRegion
Set tRslt = Sheets("Recon").Cells(4, 1)
CriAc = Sheets("Recon").Cells(1, 3)
tRslt.CurrentRegion.Offset(1, 0).ClearContents
Call Sort_byACCT_byDate(tDepo.Parent)
tDepo.Parent.Cells(1).CurrentRegion.Name = "TbDepo"
Call Sort_byACCT_byDate(tDraw.Parent)

Set AcRNG = CurrAcBlok(CriAc, tDepo)
Sheets("Recon").Cells(4) = AcRNG(1, 2)
Application.Calculation = xlCalculationManual
Application.EnableEvents = False

If Not AcRNG Is Nothing Then
CriTg = AcRNG(1, 3)
For i = 1 To AcRNG.Rows.Count
If AcRNG(i, 3).Value = CriTg Then
AkumD = AkumD + AcRNG(i, 5)
Else
lROW = lROW + 1
tRslt(lROW, 1) = CriTg ' date
tRslt(lROW, 2) = AkumD ' Dr
tRslt(lROW, 3) = 0 ' Cr
CriTg = AcRNG(i, 3).Value
AkumD = AcRNG(i, 5).Value
End If
If i = AcRNG.Rows.Count Then
lROW = lROW + 1
tRslt(lROW, 1) = CriTg ' date
tRslt(lROW, 2) = AkumD ' Dr
tRslt(lROW, 3) = 0 ' Cr
AkumD = 0
Set AcRNG = Nothing
End If
Next i
End If

Set AcRNG = CurrAcBlok(CriAc, tDraw)
If Not AcRNG Is Nothing Then
CriTg = AcRNG(1, 3)
For i = 1 To AcRNG.Rows.Count
If AcRNG(i, 3).Value = CriTg Then
AkumC = AkumC + AcRNG(i, 4)
Else
lROW = lROW + 1
tRslt(lROW, 1) = CriTg ' date
tRslt(lROW, 2) = 0 ' Dr
tRslt(lROW, 3) = AkumC ' Cr
CriTg = AcRNG(i, 3).Value
AkumC = AcRNG(i, 4).Value
End If
If i = AcRNG.Rows.Count Then
lROW = lROW + 1
tRslt(lROW, 1) = CriTg ' date
tRslt(lROW, 2) = 0 ' Dr
tRslt(lROW, 3) = AkumC ' Cr
AkumC = 0
Set AcRNG = Nothing
End If
Next i
End If
Call Sort_ResultTbl
Set tRslt = tRslt.CurrentRegion

'-running-saldo--
For i = 2 To tRslt.Rows.Count
Saldo = Saldo + tRslt(i, 2) - tRslt(i, 3)
tRslt(i, 4) = Saldo
Next i

'reSet
Cells(1, 3).Select
Call Sort_byDATE_byAcct(tDepo.Parent)
Call Sort_byDATE_byAcct(tDraw.Parent)
Application.Calculation = xlCalculationAutomatic
Application.EnableEvents = True
End Sub

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (3)
2b.: Re: Rekonsiliasi Saldo

Posted by: "Irwan didi" irwan_didi@yahoo.com irwan_didi

Sat Dec 24, 2011 5:50 pm (PST)

Mbak haps dan mbak siti.

terima kasih atas solusinya dan sangat berjalan dengan baik, sebelumnya saya mohon ma'af karena kelupaan untuk mereduce sizenya dan menghilangkan sub total (karena sebelumnya saya sub total u mempermudah pengecekan), sebenarnya data2 tersebut adalah dari 2 file yang berbeda dimana sheet masuk itu adalah transaksi kelompok per kode material, sedangkan sheet keluar adalah transaksi dari file divisi keuangan dimana hanya mencatat secara global debet maupun kredit kelompok.

sekali lagi terima kasih atas solusi pakar2 excell sedoyo

________________________________
From: i Haps <hapsari.stlizbeth@gmail.com>
To: belajar-excel@yahoogroups.com
Sent: Sunday, December 25, 2011 7:59 AM
Subject: Re: [belajar-excel] Rekonsiliasi Saldo

Whaduh lampirannya di atas "jatah yg diatur dm peraturan milis" 397 KB dengan nama yg terlalu generik
(sering kembar dengan file donlotan sebeumnya, sulit dicari kembali)
Xls kan bisa di-ZIP atau di-RAR (maksudku : dicompressed) sehingga mengecil bisa sampai 15 - 20% nya ?File besar membuat penderitaan bagi member yg koneksi-internetnya kelas "payah" seperti koneksi-ku;
file 300 KB kalau bisa terdonlot tuntas pun bisa di-sambil (disambi) membuat miegorenginstant dulu...

Btw,
VBA Code - nya hanya seperti ini,
ditulis di module sheet "Recon" (sheet di mana "otomatisasi" ingin dijalankan)

Private Sub Worksheet_Change(ByVal Target As Range)
' makro dijalankan otomatis -
' jika Kriteria Account diubah
' coded by: indri Hapsari / 24 Dec 2011
'-------------------------------
If Target.Cells.Count = 1 Then
If Target.Address = "$C$1" Then
If Not Target.Value = vbNullString Then
SummarizedAccount
Else
Range("A$4").CurrentRegion. _
Offset(1, 0).ClearContents
Range("D1").ClearContents
End If
End If
End If
End Sub
'-----------------------

yg tidak sempat dijelaskan di sini saat ini hanyalah "method" bernama SummarizedAccount itu
tapi anda bisa melihatnya di module (lembar code)nya...

akan sangat membahagiakan penanggap, jika anda berkenan mencobanya, lalu mengabarkan hasil percobaan itu (works / not works ); misalnya "cicing wae" (seperti banyak penanya lalin) pun juga ndak masalah..

sedikit catatan:

Jurnal KELUAR: Kok ndak ada kolom KODE nya ya ? "Wai? (Why) ?
Kolom Jumlah jadi lain posisinya dengan posisi KolomJumlah pada Jurnal MASUK

Hal seperti ini bisa berakibat pengolahan lebih lanjut menjadi lebih sulit dan runningtimenya LAMA, dan Coding / rumus tidak gampang dapat dibuat code yg Re-Usable !

Selain itu ada Tabel Jurnal kok dipisah (jurnal KELUAR (penabung menarik dana) dan Jurnal MASUK (penabung mendepositkan dana) ..
Itu juga sudah tidak sesuai dengan kaidah database. MUNGKIN kedua Tabel ini adalah dua buah REPORT; bukan data-tabel yg disediakan untuk sumber pembuatan report (rekening dsb)

Maaf, satu lagi...
di sheet MASUK saya menCABUT pemberlakuan fitur SUBTOTAL
Karena Data yg di"Subtotal" adalah REPORT, bukan tabel data yg berkaidah database lagi (lha kok disuruh dijadikan sumber penerbitan Report >?)

BILA tabel-tabel yg akan diolah untuk bisa menerbitkan reports ternyata terlalu banyak melanggar kaidah database; kemungkinan terburuknya adalah : tidak bisa diolah tanpa (jika ditak diperbaiki dulu)

CMIIW,
mungkin itu semua hanya keterbatasan pengetahuan saya saja, padahal menurut orang lain semuanya sudah "OKE & siap olah!"
indri Haps / smg, 24 dec 2011

Jika ada ada kendala dlm menggunakan file terlampir (sulit melihat vbacode-nya), anda masih dapat mencoba file lain yg dapat diunduh di sini: http://www.box.com/s/r1xc7e09jt1r9hmlfrv3

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (3)

3a.: Daftar Libur Nasional dan Cuti Bersama Th 2012

Posted by: "siti Vi" setiyowati.devi@gmail.com siti_vi

Sun Dec 25, 2011 2:43 am (PST)

Daftar Libur ("Holidays") suatu periode, berguna untuk melengkapi kalkulasi
dengan
fungsi WORKDAY dan NETWORKDAY di Excel pada periode tsb)

Teman-teman yg belum sempat menyiapkan *daftar libur Nasional th 2012*dapat
melihat di workbook <http://www.box.com/s/18jqj18h0i6i0be25vz2> terlampir..

(kalau anda menjiplak persis dari SKB-nya, maka daftar tsb sebetulnya
kurang tepat
untuk dijadikan "Range HOLIDAYS", karena ada HARI MINGGU yg juga dimasukkan
sebagai Hari Libur Nasional

Semoga bermanfat..

*Data siap pakai untuk mendukung fungsi WORKDAY dan NETWORKDAYS
anda* *DAFTAR
HARI LIBUR & CUTI BERSAMA* *TGL* *HARI* *KETERANGAN* *STATUS* 23-Jan-2012
Senin Tahun Baru Imlek 2563 Libur Nasional: 23-Mar-2012 Jumat Hari Raya
Nyepi, Tahun Baru Saka 1934 Libur Nasional: 06-Apr-2012 Jumat Wafat Yesus
Kristus Libur Nasional: 17-May-2012 Kamis Kenaikan Yesus Kristus Libur
Nasional: 18-May-2012 Jumat Cuti Bersama Kenaikan Yesus Kristus Cuti Bersama
17-Aug-2012 Jumat Hari Kemerdekaan RI Libur Nasional: 20-Aug-2012 Senin Idul
Fitri 1 Syawal 1433 H Libur Nasional: 21-Aug-2012 Selasa Cuti Bersama Idul
Fitri Cuti Bersama 22-Aug-2012 Rabu Cuti Bersama Idul Fitri Cuti Bersama
26-Oct-2012 Jumat Idul Adha 1433 H Libur Nasional: 15-Nov-2012 Kamis Tahun
Baru 1434 H Libur Nasional: 16-Nov-2012 Jumat Cuti Bersama Tahun Baru
1434 H Cuti
Bersama 24-Dec-2012 Senin Cuti Bersama Hari Raya Natal Cuti Bersama
25-Dec-2012 Selasa Hari Raya Natal Libur Nasional:

~siti

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (2)
3b.: Menambah field berformula di dalam pivot table

Posted by: "Mumu SBTC" seggaf@sbtcgroup.com man_jufri

Sun Dec 25, 2011 3:07 am (PST)

Halo XL Mania,...

Mau tanya nih apa ada kemungkinan untuk menambahkan satu field di dalam pivot table yang isinya formula. Untuk lebih jelasnya bisa lihat di attachmet yang saya kirim ini.

sebelumnya makasih banget atas bantuanna yah,...

best regards,

Muhammad Assegagf

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (2)

Create New Topic | Visit Your Group on the Web

Messages

---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com

posting ke milis, kirimkan ke:
belajar-excel@yahoogroups.com

berkunjung ke web milis
http://tech.groups.yahoo.com/group/belajar-excel/messages

melihat file archive / mendownload lampiran
http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/

menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com

keluar dari membership milis (UnSubscribe):
kirim mail kosong ke belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------

MARKETPLACE

Stay on top of your group activity without leaving the page you're on - Get the Yahoo! Toolbar now.

Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Individual | Switch format to Traditional
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

EXCEL FEED

Minggu, 25 Desember 2011

[belajar-excel] Digest Number 1450

Messages In This Digest (7 Messages)

Messages

Ber-Excel Ria Menggunakan Database MS Access

Posted by: "sin.ur4t@yahoo.com" sin.ur4t@yahoo.com sin.ur4t

Sat Dec 24, 2011 8:28 am (PST)

Re: Ber-Excel Ria Menggunakan Database MS Access

Posted by: "Kid Mr." mr.nmkid@gmail.com nmkid.family@ymail.com

Sat Dec 24, 2011 8:44 am (PST)

Re: Ber-Excel Ria Menggunakan Database MS Access

Posted by: "sin.ur4t" sin.ur4t@yahoo.com sin.ur4t

Sat Dec 24, 2011 2:29 pm (PST)

Re: Rekonsiliasi Saldo

Posted by: "i Haps" hapsari.stlizbeth@gmail.com liz_indri_haps

Sat Dec 24, 2011 4:59 pm (PST)

Re: Rekonsiliasi Saldo

Posted by: "Irwan didi" irwan_didi@yahoo.com irwan_didi

Sat Dec 24, 2011 5:50 pm (PST)

Daftar Libur Nasional dan Cuti Bersama Th 2012

Posted by: "siti Vi" setiyowati.devi@gmail.com siti_vi

Sun Dec 25, 2011 2:43 am (PST)

Menambah field berformula di dalam pivot table

Posted by: "Mumu SBTC" seggaf@sbtcgroup.com man_jufri

Sun Dec 25, 2011 3:07 am (PST)

Tidak ada komentar:

Posting Komentar

Followers

Blog Archive

About Me