3 Messages
Digest #3587
1a
Fw: [belajar-excel] Perintah SQL untuk menggabungkan data sekaligus by "hendrik karnadi" hendrikkarnadi
1b
Re: Fw: [belajar-excel] Perintah SQL untuk menggabungkan data sekali by "Mr. Kid" nmkid.family@ymail.com
Messages
Sat Oct 3, 2015 5:14 pm (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
Mr. Kid,Mau nanya sedikit lagi tentang penulisan datatype string di Macro.
Masih dengan contoh kasus yang sama, untuk merekap Debits dan Kredits.Bagaimana penulisan macronya bila yang ingin ditampilkan adalah details dari Account tertentu ?Saya coba seperti ini (dengan dua apostroph mengapit Account yang menjadi Criteria),sSQL = sSQL & "Select Account, Description, Debit, Credit From " & oLr.Range(1) & vbCr & "WHERE Account = ""240"""
Tapi ketika dijalankan ada error mesaage "No Value given for one or more required parameters"
Untuk lebih jelasnya saya lampirkan kembali .zip filenya (Consolidate(Detail_ERR) beserta file2 sumbernya), yang macronya telah saya ubah seperti di atas.Mohon dapat diberikan petunjuk lebih lanjut.
Terima kasih.
Salam,HK
----- Forwarded Message -----
From: "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com>
To: BeExcel <belajar-excel@yahoogroups.com>
Sent: Thursday, 1 October 2015, 11:19
Subject: Re: [belajar-excel] Perintah SQL untuk menggabungkan data sekaligus menjumlahkan
loh...
kan tentang datatype string ada disini. Mulai dari cara penyimpanan data teks (string) ke sebuah variabel, menggabungkan (concatenate) banyak data teks (string), menggabungkan (concatenate) variabel bertipe string dengan suatu data teks, dan berbagai contoh lainnya. Termasuk untuk datatype lainnya.
sedangkan untuk penambahan Description, adalah sekedar mengikuti logika.
Coba deh dibayangkan, ada data produk dan tahun pembuatannya, beserta nilai penjualannya.
Produk Th_Prod Nilai
A 1990 100
A 1990 500
A 2000 300
B 1990 250
B 2015 350
B 2015 150
C 2014 30
C 2014 10
1. Bagaimana hasil total nilai per produk ?
2. Bagaimana hasil total nilai per tahun pembuatan ?
3. Bagaimana hasil total nilai per produk per tahun pembuatan ?
4. Coba buat tabel outputnya secara manual, apa beda dari ke-3 output di atas ?
5. Bisakah menampilkan total nilai per produk soal nomor 1 di atas tapi disertai informasi tahun pembuatannya yang per record output nomor 1 hanya memuat 1 nilai tahun pembuatan tertentu ?
6. Kenapa pada kasus Anda ditambahkan Description ?
dari alur logika di atas, maka muncullah struktur query group by yang dengan tegas menyatakan bahwa bagian group by diisi dengan your_key_columns_without_columns_aliasses dan bukan your_tables_or_views_keys
Regard,
Kid
2015-10-01 11:02 GMT+07:00 hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>:
Terima kasih Mr. Kid.
Berhasil....Jadi harus ada tambahan tanda &, ""(string) dan Description (untuk grupnya).
Salam.
HK
From: "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com>
To: BeExcel <belajar-excel@yahoogroups.com>
Sent: Thursday, 1 October 2015, 10:42
Subject: Re: [belajar-excel] Perintah SQL untuk menggabungkan data sekaligus menjumlahkan
Pak HK,
sSQL = sSQL & "Select Account, Description, Sum(Debits) as Total_Debit, Sum(Credits) as Total_Credit From " & oLr.Range(1) & vbCr & "GROUP BY Account,Description"
Regard,
Kid
2015-10-01 10:11 GMT+07:00 hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>:
Mr. Kid,
Terima kasih atas penjelasannya.
Saya coba ganti perintah :sSQL = sSQL & "Select * From " & oLr.Range(1)
dengan
sSQL = sSQL & "Select Account, Description, Sum(Debits) as Total_Debit, Sum(Credits) as Total_Credit From " & oLr.Range(1) & vbCrGROUP BY Account
Ketika macro dijalankan keluar message "Syntax Error" pada huruf yang berwarna merah. Dimana salahnya ya ?
Terima kasih.
Salam,HK
From: "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com>
To: BeExcel <belajar-excel@yahoogroups.com>
Sent: Thursday, 1 October 2015, 8:58
Subject: Re: [belajar-excel] Perintah SQL untuk menggabungkan data sekaligus menjumlahkan
Hai Pak HK,
1. Query dasar agregat yang memiliki keys (agregat per anything) tanpa filter terhadap hasil agregat
SELECT your_key_columns, your_aggregat_ecpression
FROM your_source
GROUP BY your_key_columns_without_columns_aliasses
contoh : total penjualan per tahun (berdasar tanggal invoice) per produk
SELECT produk_id, year(tgl_invoice) as tahun, sum(penjualan) as total_jual
FROM dataINV
GROUP BY produk_id, year(tgl_invoice) --> tanpa aliasses
2. Query dasar UNION [ALL]
Query1
UNION [ALL]
Query2
UNION [ALL]
.
.
UNION [ALL]
QueryN
dengan setiap Query# berupa select query yang memiliki susunan sesuai kebutuhan.
Urutan kolom dan tipe datanya dari setiap Query# adalah tetap, dengan definisi kolom di Query1 yang menjadi nama kolom output
3. Susunan select query dasar
SELECT your_columns [, your_aggregate_expressions]
FROM your_source
[
[JOIN your_join1 ON your_join1_relations]
.
.
[JOIN your_joinN ON your_joinN_relations]
]
[
WHERE your_filter_expressions
]
[
GROUP BY your_columns_except_aggregate_expressions_without_columns_aliasses
[HAVING your_aggregate_filter_expressions] --> berisi filter terhadap kolom-kolom agregat, dan bukan terhadap key columns
]
[
UNION [ALL]
your_another_query2
.
.
UNION [ALL]
your_another_queryN
]
[
ORDER BY your_sort_expressions
]
gunakan klausa ORDER BY secara bijak dan usahakan dihindari kecuali penting sekali diseakhir mungkin suatu proses, karena klausa ORDER BY termasuk computer resources eater
4. source dari query lain (subquery di bagian FROM)
SELECT your_dataset_alias#.your_columns
FROM
(
queryS
) as your_dataset_alias1
[another query clauses]
queryS bisa berisi select query dasar seperti di-nomor 3 tanpa klausa ORDER BY
subquery suatu query seperti queryS juga bisa diletakkan pada bagian sumber data yang di-JOIN
setiap Query# dalam UNION [ALL] bisa berisi subquery suatu query seperti queryS
-----------------------
Prinsip dasar ber-query :
1. ketahui sumber data yang akan diproses
2. pahami alur komputasi yang dibutuhkan
3. susun query berdasar 1 dan 2
-----------------------
Jadi, menggabungkan data hasil agregat adalah hal yang berbeda dengan mengagregat hasil gabungan data
> menggabungkan data hasil agregat
SELECT your_key_columns, your_aggregate_expressions
FROM your_source1
GROUP BY your_key_columns_without_columns_aliasses
UNION [ALL]
SELECT your_key_columns, your_aggregate_expressions
FROM your_source2
GROUP BY your_key_columns_without_columns_aliasses
.
.
UNION [ALL]
SELECT your_key_columns, your_aggregate_expressions
FROM your_sourceN
GROUP BY your_key_columns_without_columns_aliasses
hasilnya bisa jadi ada your_columns yang sama dengan nilai your_aggregate apa saja jika dengan [ALL] atau ada hasil aggregate yang hilang jika tanpa [ALL]
> mengagregat hasil gabungan dataSELECT your_key_columns, your_aggregate_expressionsFROM
(
SELECT your_key_columns
FROM your_source1
UNION [ALL]
SELECT your_key_columns
FROM your_source2
.
.
UNION [ALL]
SELECT your_key_columns
FROM your_sourceN
) as your_dataset_alias
GROUP BY your_key_columns_without_columns_aliasses
Regard,
Kid
On Wed, Sep 30, 2015 at 5:36 PM, hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
Dear Be-Excelers,
Berikut adalah perintah Macro yang saya dapat dari internet (file terlampir) untuk menggabungkan data (non unique) dari beberapa file yang ada dalam satu folder (Path),
Sub Consolidate()
Dim sSQL As String 'SQL String Dim oLr As ListRow 'Worksheets Row Dim cn As Object 'Connection Dim rs As Object 'Recordset
' Create SQL For Each oLr In Sheet1.ListObjects("Worksheets").ListRows If sSQL <> "" Then sSQL = sSQL & vbCr & "Union All" & vbCr 'tidak unik sSQL = sSQL & "Select * From " & oLr.Range(1) Next sSQL = Replace(sSQL, "<Path>", ThisWorkbook.Path) ' Create Connection Objects Set cn = CreateObject("ADODB.Connection") Set rs = CreateObject("ADODB.Recordset")
cn.Open "Provider=Microsoft.ACE.OLEDB.12.0;" & _ "Data Source=" & ThisWorkbook.FullName & ";" & _ "Extended Properties=""Excel 12.0 Xml;HDR=YES"";" rs.Open sSQL, cn Debug.Print sSQL
If Sheet1.ListObjects.Count > 1 Then Sheet1.ListObjects(2).Delete Sheet1.ListObjects.Add( _ SourceType:=xlSrcQuery, _ Source:=rs, _ Destination:=Sheet1.Range("C6")).QueryTable.Refresh
rs.Close cn.Close
Set rs = Nothing Set cn = Nothing
End Sub
Yang ingin saya tanyakan adalah bagaimana bunyi perintah SQL nya (warna biru) jika yang ingin ditampilkan adalah total per no rek (bukan detailnya).
Terima kasih.
Salam,HK
#yiv5762845329 #yiv5762845329 -- #yiv5762845329ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv5762845329 #yiv5762845329ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv5762845329 #yiv5762845329ygrp-mkp #yiv5762845329hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv5762845329 #yiv5762845329ygrp-mkp #yiv5762845329ads {margin-bottom:10px;}#yiv5762845329 #yiv5762845329ygrp-mkp .yiv5762845329ad {padding:0 0;}#yiv5762845329 #yiv5762845329ygrp-mkp .yiv5762845329ad p {margin:0;}#yiv5762845329 #yiv5762845329ygrp-mkp .yiv5762845329ad a {color:#0000ff;text-decoration:none;}#yiv5762845329 #yiv5762845329ygrp-sponsor #yiv5762845329ygrp-lc {font-family:Arial;}#yiv5762845329 #yiv5762845329ygrp-sponsor #yiv5762845329ygrp-lc #yiv5762845329hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv5762845329 #yiv5762845329ygrp-sponsor #yiv5762845329ygrp-lc .yiv5762845329ad {margin-bottom:10px;padding:0 0;}#yiv5762845329 #yiv5762845329actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv5762845329 #yiv5762845329activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv5762845329 #yiv5762845329activity span {font-weight:700;}#yiv5762845329 #yiv5762845329activity span:first-child {text-transform:uppercase;}#yiv5762845329 #yiv5762845329activity span a {color:#5085b6;text-decoration:none;}#yiv5762845329 #yiv5762845329activity span span {color:#ff7900;}#yiv5762845329 #yiv5762845329activity span .yiv5762845329underline {text-decoration:underline;}#yiv5762845329 .yiv5762845329attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv5762845329 .yiv5762845329attach div a {text-decoration:none;}#yiv5762845329 .yiv5762845329attach img {border:none;padding-right:5px;}#yiv5762845329 .yiv5762845329attach label {display:block;margin-bottom:5px;}#yiv5762845329 .yiv5762845329attach label a {text-decoration:none;}#yiv5762845329 blockquote {margin:0 0 0 4px;}#yiv5762845329 .yiv5762845329bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv5762845329 .yiv5762845329bold a {text-decoration:none;}#yiv5762845329 dd.yiv5762845329last p a {font-family:Verdana;font-weight:700;}#yiv5762845329 dd.yiv5762845329last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv5762845329 dd.yiv5762845329last p span.yiv5762845329yshortcuts {margin-right:0;}#yiv5762845329 div.yiv5762845329attach-table div div a {text-decoration:none;}#yiv5762845329 div.yiv5762845329attach-table {width:400px;}#yiv5762845329 div.yiv5762845329file-title a, #yiv5762845329 div.yiv5762845329file-title a:active, #yiv5762845329 div.yiv5762845329file-title a:hover, #yiv5762845329 div.yiv5762845329file-title a:visited {text-decoration:none;}#yiv5762845329 div.yiv5762845329photo-title a, #yiv5762845329 div.yiv5762845329photo-title a:active, #yiv5762845329 div.yiv5762845329photo-title a:hover, #yiv5762845329 div.yiv5762845329photo-title a:visited {text-decoration:none;}#yiv5762845329 div#yiv5762845329ygrp-mlmsg #yiv5762845329ygrp-msg p a span.yiv5762845329yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv5762845329 .yiv5762845329green {color:#628c2a;}#yiv5762845329 .yiv5762845329MsoNormal {margin:0 0 0 0;}#yiv5762845329 o {font-size:0;}#yiv5762845329 #yiv5762845329photos div {float:left;width:72px;}#yiv5762845329 #yiv5762845329photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv5762845329 #yiv5762845329photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv5762845329 #yiv5762845329reco-category {font-size:77%;}#yiv5762845329 #yiv5762845329reco-desc {font-size:77%;}#yiv5762845329 .yiv5762845329replbq {margin:4px;}#yiv5762845329 #yiv5762845329ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv5762845329 #yiv5762845329ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv5762845329 #yiv5762845329ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv5762845329 #yiv5762845329ygrp-mlmsg select, #yiv5762845329 input, #yiv5762845329 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv5762845329 #yiv5762845329ygrp-mlmsg pre, #yiv5762845329 code {font:115% monospace;}#yiv5762845329 #yiv5762845329ygrp-mlmsg * {line-height:1.22em;}#yiv5762845329 #yiv5762845329ygrp-mlmsg #yiv5762845329logo {padding-bottom:10px;}#yiv5762845329 #yiv5762845329ygrp-msg p a {font-family:Verdana;}#yiv5762845329 #yiv5762845329ygrp-msg p#yiv5762845329attach-count span {color:#1E66AE;font-weight:700;}#yiv5762845329 #yiv5762845329ygrp-reco #yiv5762845329reco-head {color:#ff7900;font-weight:700;}#yiv5762845329 #yiv5762845329ygrp-reco {margin-bottom:20px;padding:0px;}#yiv5762845329 #yiv5762845329ygrp-sponsor #yiv5762845329ov li a {font-size:130%;text-decoration:none;}#yiv5762845329 #yiv5762845329ygrp-sponsor #yiv5762845329ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv5762845329 #yiv5762845329ygrp-sponsor #yiv5762845329ov ul {margin:0;padding:0 0 0 8px;}#yiv5762845329 #yiv5762845329ygrp-text {font-family:Georgia;}#yiv5762845329 #yiv5762845329ygrp-text p {margin:0 0 1em 0;}#yiv5762845329 #yiv5762845329ygrp-text tt {font-size:120%;}#yiv5762845329 #yiv5762845329ygrp-vital ul li:last-child {border-right:
Masih dengan contoh kasus yang sama, untuk merekap Debits dan Kredits.Bagaimana penulisan macronya bila yang ingin ditampilkan adalah details dari Account tertentu ?Saya coba seperti ini (dengan dua apostroph mengapit Account yang menjadi Criteria),sSQL = sSQL & "Select Account, Description, Debit, Credit From " & oLr.Range(1) & vbCr & "WHERE Account = ""240"""
Tapi ketika dijalankan ada error mesaage "No Value given for one or more required parameters"
Untuk lebih jelasnya saya lampirkan kembali .zip filenya (Consolidate(Detail_ERR) beserta file2 sumbernya), yang macronya telah saya ubah seperti di atas.Mohon dapat diberikan petunjuk lebih lanjut.
Terima kasih.
Salam,HK
----- Forwarded Message -----
From: "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com>
To: BeExcel <belajar-excel@yahoogroups.com>
Sent: Thursday, 1 October 2015, 11:19
Subject: Re: [belajar-excel] Perintah SQL untuk menggabungkan data sekaligus menjumlahkan
loh...
kan tentang datatype string ada disini. Mulai dari cara penyimpanan data teks (string) ke sebuah variabel, menggabungkan (concatenate) banyak data teks (string), menggabungkan (concatenate) variabel bertipe string dengan suatu data teks, dan berbagai contoh lainnya. Termasuk untuk datatype lainnya.
sedangkan untuk penambahan Description, adalah sekedar mengikuti logika.
Coba deh dibayangkan, ada data produk dan tahun pembuatannya, beserta nilai penjualannya.
Produk Th_Prod Nilai
A 1990 100
A 1990 500
A 2000 300
B 1990 250
B 2015 350
B 2015 150
C 2014 30
C 2014 10
1. Bagaimana hasil total nilai per produk ?
2. Bagaimana hasil total nilai per tahun pembuatan ?
3. Bagaimana hasil total nilai per produk per tahun pembuatan ?
4. Coba buat tabel outputnya secara manual, apa beda dari ke-3 output di atas ?
5. Bisakah menampilkan total nilai per produk soal nomor 1 di atas tapi disertai informasi tahun pembuatannya yang per record output nomor 1 hanya memuat 1 nilai tahun pembuatan tertentu ?
6. Kenapa pada kasus Anda ditambahkan Description ?
dari alur logika di atas, maka muncullah struktur query group by yang dengan tegas menyatakan bahwa bagian group by diisi dengan your_key_columns_without_columns_aliasses dan bukan your_tables_or_views_keys
Regard,
Kid
2015-10-01 11:02 GMT+07:00 hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>:
Terima kasih Mr. Kid.
Berhasil....Jadi harus ada tambahan tanda &, ""(string) dan Description (untuk grupnya).
Salam.
HK
From: "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com>
To: BeExcel <belajar-excel@yahoogroups.com>
Sent: Thursday, 1 October 2015, 10:42
Subject: Re: [belajar-excel] Perintah SQL untuk menggabungkan data sekaligus menjumlahkan
Pak HK,
sSQL = sSQL & "Select Account, Description, Sum(Debits) as Total_Debit, Sum(Credits) as Total_Credit From " & oLr.Range(1) & vbCr & "GROUP BY Account,Description"
Regard,
Kid
2015-10-01 10:11 GMT+07:00 hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>:
Mr. Kid,
Terima kasih atas penjelasannya.
Saya coba ganti perintah :sSQL = sSQL & "Select * From " & oLr.Range(1)
dengan
sSQL = sSQL & "Select Account, Description, Sum(Debits) as Total_Debit, Sum(Credits) as Total_Credit From " & oLr.Range(1) & vbCrGROUP BY Account
Ketika macro dijalankan keluar message "Syntax Error" pada huruf yang berwarna merah. Dimana salahnya ya ?
Terima kasih.
Salam,HK
From: "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com>
To: BeExcel <belajar-excel@yahoogroups.com>
Sent: Thursday, 1 October 2015, 8:58
Subject: Re: [belajar-excel] Perintah SQL untuk menggabungkan data sekaligus menjumlahkan
Hai Pak HK,
1. Query dasar agregat yang memiliki keys (agregat per anything) tanpa filter terhadap hasil agregat
SELECT your_key_columns, your_aggregat_ecpression
FROM your_source
GROUP BY your_key_columns_without_columns_aliasses
contoh : total penjualan per tahun (berdasar tanggal invoice) per produk
SELECT produk_id, year(tgl_invoice) as tahun, sum(penjualan) as total_jual
FROM dataINV
GROUP BY produk_id, year(tgl_invoice) --> tanpa aliasses
2. Query dasar UNION [ALL]
Query1
UNION [ALL]
Query2
UNION [ALL]
.
.
UNION [ALL]
QueryN
dengan setiap Query# berupa select query yang memiliki susunan sesuai kebutuhan.
Urutan kolom dan tipe datanya dari setiap Query# adalah tetap, dengan definisi kolom di Query1 yang menjadi nama kolom output
3. Susunan select query dasar
SELECT your_columns [, your_aggregate_expressions]
FROM your_source
[
[JOIN your_join1 ON your_join1_relations]
.
.
[JOIN your_joinN ON your_joinN_relations]
]
[
WHERE your_filter_expressions
]
[
GROUP BY your_columns_except_aggregate_expressions_without_columns_aliasses
[HAVING your_aggregate_filter_expressions] --> berisi filter terhadap kolom-kolom agregat, dan bukan terhadap key columns
]
[
UNION [ALL]
your_another_query2
.
.
UNION [ALL]
your_another_queryN
]
[
ORDER BY your_sort_expressions
]
gunakan klausa ORDER BY secara bijak dan usahakan dihindari kecuali penting sekali diseakhir mungkin suatu proses, karena klausa ORDER BY termasuk computer resources eater
4. source dari query lain (subquery di bagian FROM)
SELECT your_dataset_alias#.your_columns
FROM
(
queryS
) as your_dataset_alias1
[another query clauses]
queryS bisa berisi select query dasar seperti di-nomor 3 tanpa klausa ORDER BY
subquery suatu query seperti queryS juga bisa diletakkan pada bagian sumber data yang di-JOIN
setiap Query# dalam UNION [ALL] bisa berisi subquery suatu query seperti queryS
-----------------------
Prinsip dasar ber-query :
1. ketahui sumber data yang akan diproses
2. pahami alur komputasi yang dibutuhkan
3. susun query berdasar 1 dan 2
-----------------------
Jadi, menggabungkan data hasil agregat adalah hal yang berbeda dengan mengagregat hasil gabungan data
> menggabungkan data hasil agregat
SELECT your_key_columns, your_aggregate_expressions
FROM your_source1
GROUP BY your_key_columns_without_columns_aliasses
UNION [ALL]
SELECT your_key_columns, your_aggregate_expressions
FROM your_source2
GROUP BY your_key_columns_without_columns_aliasses
.
.
UNION [ALL]
SELECT your_key_columns, your_aggregate_expressions
FROM your_sourceN
GROUP BY your_key_columns_without_columns_aliasses
hasilnya bisa jadi ada your_columns yang sama dengan nilai your_aggregate apa saja jika dengan [ALL] atau ada hasil aggregate yang hilang jika tanpa [ALL]
> mengagregat hasil gabungan dataSELECT your_key_columns, your_aggregate_expressionsFROM
(
SELECT your_key_columns
FROM your_source1
UNION [ALL]
SELECT your_key_columns
FROM your_source2
.
.
UNION [ALL]
SELECT your_key_columns
FROM your_sourceN
) as your_dataset_alias
GROUP BY your_key_columns_without_columns_aliasses
Regard,
Kid
On Wed, Sep 30, 2015 at 5:36 PM, hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
Dear Be-Excelers,
Berikut adalah perintah Macro yang saya dapat dari internet (file terlampir) untuk menggabungkan data (non unique) dari beberapa file yang ada dalam satu folder (Path),
Sub Consolidate(
Dim sSQL As String 'SQL String Dim oLr As ListRow 'Worksheets Row Dim cn As Object 'Connection Dim rs As Object 'Recordset
' Create SQL For Each oLr In Sheet1.ListObjects(
cn.Open "Provider=
If Sheet1.ListObjects.
rs.Close cn.Close
Set rs = Nothing Set cn = Nothing
End Sub
Yang ingin saya tanyakan adalah bagaimana bunyi perintah SQL nya (warna biru) jika yang ingin ditampilkan adalah total per no rek (bukan detailnya).
Terima kasih.
Salam,HK
#yiv5762845329 #yiv5762845329 -- #yiv5762845329ygrp-