Kamis, 31 Oktober 2013

[belajar-excel] Digest Number 2615

9 New Messages

Digest #2615
1a
Re: transpose [1 Attachment] by "lapendosol opik" lapendosol
1b
Re: transpose [1 Attachment] by "Mr. Kid" nmkid.family@ymail.com
2a
Re: Macro Excel [1 Attachment] by "lapendosol opik" lapendosol
3a
Bls: [belajar-excel] Macro Excel by "Andre Rahmaidy" andree_bpdsumbar
4a
Re: Macro Excel by "Mr. Kid" nmkid.family@ymail.com
6b
Re: Chart otomatis di ambil 10 besarnya saja [1 Attachment] by "Heri Pamungkas ( Gmail )" dchoosen88

Messages

Wed Oct 30, 2013 10:03 am (PDT) . Posted by:

"lapendosol opik" lapendosol

Dear CodeName
Pertanyaannya saya kira kurang jelas mengenai pemilihan data
tersebut berdasarkan apa, apakah yg dipilih loncat satu baris satu baris (Gery
ke Agra ke Mukti)? Atau gimana ya?
Urun rembug dikit ya, mengenai penggabungan cell di vba
Sheet1.Range("e3").Value =
Range("d2").Value & ", " &
Range("d4").Value & ", " &
Range("d6").Value
Selanjutnya bisa dikembangkan sendiri menurut keinginan
hehehe
Wassalam,

On Wednesday, October 30, 2013 4:38 PM, "frade_way@yahoo.com" <frade_way@yahoo.com> wrote:

 
Salam Hangat semua, 

Salam Kenal,saya member baru yang ingin banyak belajar mengenai excel dan vba/macro. Mohon bantuan para suhu dan master sekalian. 
Saya ingin menggabungkan beberapa baris data dan 2 kolom yang dipilih (kolom A dan B) menjadi 1 baris dan 1 kolom. Berikut ini saya sertakan ccontohnya. Mungkin pertanyaan saya pernah ditanyakan atau dibahas sebelumnya,saya ingin menggunakan vba/macro dalam kasus ini dimana data yang dipilih kemudian dengan menggunakan commandbutton akan berubah menjadi 1baris dan 1 kolom(kolom E). Prosesnya bisa di excel atau di visual basic editor. 
Mohon bantuan codenya,, 
terima kasih,, 

salam, 
codename 

Wed Oct 30, 2013 5:02 pm (PDT) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Hai Frade,

File terlampir mencoba dengan formula. Ketika mencoba dengan formula, harus
diketahui detil kriterianya, sehingga dapat disusun formula yang sesuai
kriteria.
Untuk penggunaan VBA, dilakukan oleh prosedur Gabungkan. Batasannya adalah
data kolom A yang tidak kosong yang dipilih oleh user. Hasil penggabungan
ditulis di cell G1. Rujukan ke sheet dilakukan terhadap object sheet dan
bukan dengan ( nama sheet atau nomor indeks sheet )

File terlampir.

Wassalam,
Kid.

2013/10/30 <frade_way@yahoo.com>

> **
>
>
> Salam Hangat semua,
>
> Salam Kenal,saya member baru yang ingin banyak belajar mengenai excel dan
> vba/macro. Mohon bantuan para suhu dan master sekalian.
> Saya ingin menggabungkan beberapa baris data dan 2 kolom yang dipilih
> (kolom A dan B) menjadi 1 baris dan 1 kolom. Berikut ini saya sertakan
> ccontohnya. Mungkin pertanyaan saya pernah ditanyakan atau dibahas
> sebelumnya,saya ingin menggunakan vba/macro dalam kasus ini dimana data
> yang dipilih kemudian dengan menggunakan commandbutton akan berubah menjadi
> 1baris dan 1 kolom(kolom E). Prosesnya bisa di excel atau di visual basic
> editor.
> Mohon bantuan codenya,,
> terima kasih,,
>
> salam,
> codename
>
>

Wed Oct 30, 2013 3:31 pm (PDT) . Posted by:

"lapendosol opik" lapendosol

Dear Andre
Berikutnya mohon dipatuhi peraturan milis mengenai besarnya file yg dilampirkan ya.
Mengikuti aturan itu indah loh hehehehe
Biar sheet yg ga di klik ga muncul, sebaiknya disembunyikan sheet selain daftar laporan terlebih dahulu. Bisa menggunakan sub berikut:
Sub HideAllSheets()
   Dim w As Worksheet
   Sheets("Daftar_Laporan&quot;).Visible = -1
   For Each w In Worksheets
      If w.Name <> "Daftar_Laporan" Then w.Visible = 2
   Next w
End Sub

Kemudian jangan lupa tiap kliknya disisipkan sub tersebut
Sub Info_Pelapor()
HideAllSheets
Sheets("Info_Pelapor&quot;).Visible = xlSheetVisible
Sheets("Info_Pelapor&quot;).Select
End Sub

Selebihnya tinggal disisipkan hideallsheetnya
Wassalam,

On Wednesday, October 30, 2013 1:55 PM, Andre Rahmaidy Teeza <andre_teeza_bn@yahoo.com> wrote:

 
Dear Be Exceller

saya mau tanya mengenai coding vba untuk vba yang saya buat.  di kertas kerja excel saya ada sekitar 5 tombol ketika saya mengklik  tombol 1 akan muncul sheet yang diinginkan, setelah itu klik tombol 2   muncul sheet yang di inginkan, tapi sheet dengan tombol 1 tadi masih muncul. 
yang mau saya tanyakan gimana kode vbanya ketika tombol 2 di clik yang muncul hanya sheet yang sesuai dengan tombol 2 ,sedang kan sheet yang sesuai dengan tombol 1 tidak muncul (file terlampir).
 

wassalam
Andree

Wed Oct 30, 2013 3:34 pm (PDT) . Posted by:

"Andre Rahmaidy" andree_bpdsumbar

thanks mas heru saya juga baru belajar tentang vba.. berhubung file yang saya kirim melebihi kuota dari ketentuan milis ini dan kita sama2 menghargai aturan main milis ini serta pemberian kartu kuning dari mas dwint (terima kasih mas udah di ingatkan) hehehe.. mohon kiranya mas heru bisa menampilkan link downloadnya atau kirim file tidak  melebihi dari aturan milis ini dan bisa juga mas kirim ke email saya Andree_BpdSumbar@yahoo.co.id. to tambah ilmu tentang vba juga mas heru.. terima kasih sebelumnya

Regards
Andree

Pada Rabu, 30 Oktober 2013 16:50, dwint ruswanto <dwint.ruswanto@gmail.com> menulis:

 
Mas Andree,

mas Andree kena kartu kuning dulu ya.. karena melampirkan file melebihi batas yang diperbolehkan di milis sebesar max 250KB
statusnya sekarang di kembalikan dulu ke moderasi, jadi setiap email dari mas Andree akan melaui proses sortir dahulu,

status akan dikembalikan menjadi Un-Moderated jika dinilai sudah layak kembali oleh moderator.

Salam,

-dwint-

Pada 30 Oktober 2013 13.55, Andre Rahmaidy Teeza <andre_teeza_bn@yahoo.com> menulis:


>Dear Be Exceller
>
>
>saya mau tanya mengenai coding vba untuk vba yang saya buat.  di kertas kerja excel saya ada sekitar 5 tombol ketika saya mengklik  tombol 1 akan muncul sheet yang diinginkan, setelah itu klik tombol 2   muncul sheet yang di inginkan, tapi sheet dengan tombol 1 tadi masih muncul. 
>yang mau saya tanyakan gimana kode vbanya ketika tombol 2 di clik yang muncul hanya sheet yang sesuai dengan tombol 2 ,sedang kan sheet yang sesuai dengan tombol 1 tidak muncul (file terlampir).

>
>
>wassalam
>Andree
>

Wed Oct 30, 2013 4:14 pm (PDT) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Hai Andree,

Dari script nya Pak Bagus, proses hide sheet bisa diletakkan pada sebuah
prosedur tersendiri dan dipanggil berulang-ulang oleh setiap prosedur milik
si tombol. Hal ini sudah dicontohkan oleh masOpik dan Pak Heru.

Andaikan bersedia mengamati lagi dongeng belajarVBA tentang prosedur
berargumen<http://b-excel.blogspot.com/2013/07/belajarvba-005-procedure-seri-2.html>,
maka bisa disusun seperti ini : (letakkan disebuah general module)

Public Sub HideSheetSelainSheet( *sNamaSheet *as string )
dim sht as worksheet

on error resume next

'trap error kalau user mengganti nama sheet karena tidak diprotect
structure workbooknya
set sht=sheets( sNamaSheet )
if err.number <> 0 then
err.clear
on error goto 0
exit sub
end if

'buat visible dulu yang tidak boleh di-hide,
'sehingga pasti ada 1 sheet yang sudah visible
sheets( snamasheet ).visible= xlsheetvisible

'loop semua sheet selain nama sheet yang tidak boleh di-hide
for each sht in thisworkbook.worksheets
if sht.name<>snamasheet then
sht.visible = xlsheetveryhidden
endif
next sht

err.clear
on error goto 0
end sub

kemudian, disetiap prosedur milik si tombol (ketika di click gitu), seperti
milik si Info Pelapor yang harus menampilkan Info Pelapor tapi meng-hide
yang lain. Pada tombol ini, nama sheet yang tidak boleh di-hide adalah
'Info Pelapor'.

Sub Info_Pelapor()

'panggil prosedur tukang hide sheet selain sheet tertentu
HideSheetSelainSheet *"Info_Pelapor"*

End Sub

nilai yang berbunyi *"Info_Pelapor"* adalah nama sheet yang tidak boleh
di-hide
jika memperhatikan bagian VBAExplorer (project explorer) di VBE, sheet
bernama *Info_Pelapor* memiliki nama object tertentu, misal di VBE bagian
project explorer ada daftar nama object sheet berbunyi begini :
Sheet123 (*Info_Pelapor*)

maka nama sheet yang berbunyi *Info_Pelapor *bisa didapatkan dengan bunyi
kode :
Sheet123*.Name*

artinya, baris kode
HideSheetSelainSheet *"Info_Pelapor"*

bisa diganti dengan bunyi kode :
HideSheetSelainSheet Sheet123*.Name*

Dengan demikian, misalkan nama sheet di workbook diganti namanya oleh user,
script tidak akan error walau tidak ada bagian trap error dalam prosedur
HideSheetSelainSheet selama si sheet gak di delete oleh user.

silakan dikembangkan untuk prosedur tombol yang lain yang berisi
pemanfaatan prosedur HideSheetSelainSheet

Wassalam,
Kid.

2013/10/30 Bagus <bagus@kingjim.co.id>

> **
>
>
> **
> Dear Andre;
>
> Coba pada module1
>
> Sub Info_Pelapor()
> Sheets("Info_Jaringan_Kantor").Visible = xlSheetVeryHidden
> Sheets("Info_Manajemen&quot;).Visible = xlSheetVeryHidden
> Sheets("Info_Ketenagakerjaan").Visible = xlSheetVeryHidden
> Sheets("Info_Debitur&quot;).Visible = xlSheetVeryHidden
> Sheets("Info_Pelapor&quot;).Visible = xlSheetVisible
> Sheets("Info_Pelapor&quot;).Select
> End Sub
>
> Sub Info_Jaringan_Kantor()
> Sheets("Info_Pelapor&quot;).Visible = xlSheetVeryHidden
> Sheets("Info_Manajemen&quot;).Visible = xlSheetVeryHidden
> Sheets("Info_Ketenagakerjaan").Visible = xlSheetVeryHidden
> Sheets("Info_Debitur&quot;).Visible = xlSheetVeryHidden
> Sheets("Info_Jaringan_Kantor").Visible = xlSheetVisible
> Sheets("Info_Jaringan_Kantor").Select
> End Sub
>
> Sub Info_Manajemen()
> Sheets("Info_Pelapor&quot;).Visible = xlSheetVeryHidden
> Sheets("Info_Jaringan_Kantor").Visible = xlSheetVeryHidden
> Sheets("Info_Ketenagakerjaan").Visible = xlSheetVeryHidden
> Sheets("Info_Debitur&quot;).Visible = xlSheetVeryHidden
> Sheets("Info_Manajemen&quot;).Visible = xlSheetVisible
> Sheets("Info_Manajemen&quot;).Select
> End Sub
>
> Sub Info_Ketenagakerjaan()
> Sheets("Info_Manajemen&quot;).Visible = xlSheetVeryHidden
> Sheets("Info_Pelapor&quot;).Visible = xlSheetVeryHidden
> Sheets("Info_Jaringan_Kantor").Visible = xlSheetVeryHidden
> Sheets("Info_Debitur&quot;).Visible = xlSheetVeryHidden
> Sheets("Info_Ketenagakerjaan").Visible = xlSheetVisible
> Sheets("Info_Ketenagakerjaan").Select
> End Sub
>
> Sub Info_Debitur()
> Sheets("Info_Ketenagakerjaan").Visible = xlSheetVeryHidden
> Sheets("Info_Manajemen&quot;).Visible = xlSheetVeryHidden
> Sheets("Info_Pelapor&quot;).Visible = xlSheetVeryHidden
> Sheets("Info_Jaringan_Kantor").Visible = xlSheetVeryHidden
> Sheets("Info_Debitur&quot;).Visible = xlSheetVisible
> Sheets("Info_Debitur&quot;).Select
> End Sub
>
>
> Wassalam
>
> ~ Bagus ~
>
>
> ----- Original Message -----
> *From:* Andre Rahmaidy Teeza <andre_teeza_bn@yahoo.com>
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Wednesday, October 30, 2013 1:55 PM
> *Subject:* [belajar-excel] Macro Excel [1 Attachment]
>
>
>
> Dear Be Exceller
>
> saya mau tanya mengenai coding vba untuk vba yang saya buat. di kertas
> kerja excel saya ada sekitar 5 tombol ketika saya mengklik tombol 1 akan
> muncul sheet yang diinginkan, setelah itu klik tombol 2 muncul sheet
> yang di inginkan, tapi sheet dengan tombol 1 tadi masih muncul.
> yang mau saya tanyakan gimana kode vbanya ketika tombol 2 di clik yang
> muncul hanya sheet yang sesuai dengan tombol 2 ,sedang kan sheet yang
> sesuai dengan tombol 1 tidak muncul (file terlampir).
>
>
> wassalam
> Andree
>
>
>

Thu Oct 31, 2013 12:42 am (PDT) . Posted by:

"Jan Raisin"

Thread ini sudah 4 hari belum ada yang menyentuh..
kelihatannya om momod dan Be-Exceller yang aktif di millis sedang sibuk
semua di dunia nyata jadi belum sempat menjawab..

Jan bantu dengan Pivot Table ya..
agar hasil sama persis dengan yang diminta, maka harus dilakukan
penyesuaian di sumber data. meliputi:
1. header kolom
2. penambahan kolom kredit
3. penambahan saldo awal
4. penambahan saldo akhir

file terlampir belum dilakukan penyesuaian tersebut, silakan disesuaikan
sumber datanya.
ada baiknya tabel data dibuat menggunakan fitur List (versi 2003 ke bawah)
atau format table (versi 2007 ke atas), sehingga saat terjadi perubahan
data (edit, delete, add) cukup melakukan refresh pada Pivot Table-nya.

referensi dari blog-nya mr Kid:
cara penyusunan data base yang baik bisa dibaca di link berikut
ini<http://excel-mr-kid.blogspot.com/2011/02/susun-data-sebagai-tabel-yang-baik.html>
cara pembuatan Pivot Table bisa dibaca mulai dari
sini<http://excel-mr-kid.blogspot.com/2013/04/pivot-table-1-kenalan.html>

Salam,

-Miss Jan Raisin-

Pada 28 Oktober 2013 11.10, <harry.salim@smartfren.blackberry.com> menulis:

> **
>
>
> Dear Master XL,
>
> Mohon bantuannya dari para master bgmn ya cara membuat link data mentah ke
> GL jadi sehingga jalannya menjadi otomatis.
>
> Thanks
> Harry
>

Thu Oct 31, 2013 2:29 am (PDT) . Posted by:

Terima kasih miss jan,

Sy ingin buat format yg lebih simple, seperti yg saya yg ada di accurate,

Jika ada penambahan seperti format default dr perusahaan berubah lg.

terima kasih atas bantuan, mungkin agak susah, sy agak bingung jika buat otomatisnya.

Harry
Sent from my BlackBerry� via Smartfren EVDO Network

***** Mods *****
coba cari file dari pak Hendrik Karnadi di arsip milis,
diperlukan Yahoo! ID untuk dapat mengunduhnya,
berisi tentang pembuatan laporan keuangan dari awal sampai akhir
******************

From: Jan Raisin
Sender: belajar-excel@yahoogroups.com
Date: Thu, 31 Oct 2013 14:42:32 +0700
To:
ReplyTo: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Link utk data ke GL [1 Attachment]


Thread ini sudah 4 hari belum ada yang menyentuh..
kelihatannya om momod dan Be-Exceller yang aktif di millis sedang sibuk semua di dunia nyata jadi belum sempat menjawab..

Jan bantu dengan Pivot Table ya..
agar hasil sama persis dengan yang diminta, maka harus dilakukan penyesuaian di sumber data. meliputi:
1. header kolom
2. penambahan kolom kredit
3. penambahan saldo awal
4. penambahan saldo akhir�


file terlampir belum dilakukan penyesuaian tersebut, silakan disesuaikan sumber datanya.
ada baiknya tabel data dibuat menggunakan fitur List (versi 2003 ke bawah) atau format table (versi 2007 ke atas), sehingga saat terjadi perubahan data (edit, delete, add) cukup melakukan refresh pada Pivot Table-nya.


referensi dari blog-nya mr Kid:
cara penyusunan data base yang baik bisa dibaca di link berikut ini http://excel-mr-kid.blogspot.com/2011/02/susun-data-sebagai-tabel-yang-baik.html
cara pembuatan Pivot Table bisa dibaca mulai dari sini http://excel-mr-kid.blogspot.com/2013/04/pivot-table-1-kenalan.html


Salam,


-Miss Jan Raisin-




Pada 28 Oktober 2013 11.10, <harry.salim@smartfren.blackberry.com mailto:harry.salim@smartfren.blackberry.com> menulis:
� Dear Master XL,

Mohon bantuannya dari para master bgmn ya cara membuat link data mentah ke GL jadi sehingga jalannya menjadi otomatis.

Thanks
Harry�










Thu Oct 31, 2013 1:52 am (PDT) . Posted by:

"Jan Raisin"

thread ini sudah 3 hari belum ada yang menyentuh..
sebetulnya Jan belum bisa bikin chart.. masih harus banyak belajar dulu
xixixi ^_^
#curcol

Jan bantu cara penyusunan datanya saja ya..
formula yang digunakan dapat berjalan dengan baik di excel 2003 ke bawah
maupun 2007 ke atas, tetapi di versi 2007 dapat dibuat lebih singkat dengan
mengganti formula If(IsErr(..), ...) dengan formula IfError(..)

semoga file terlampir membuka jalan untuk Be-Exceller yang lain yang lebih
paham tentang pembuatan chart yang dinamis.
hayo.. yang punya ilmu.. bagi-bagi ya.. jangan disimpan sendiri ^_^

Salam,

-Miss Jan Raisin-

Pada 29 Oktober 2013 15.03, KESI VIZZIANTI <kesi.vizzianti@gmail.com>menulis:

> **
>
>
> Selamat siang semua
>
> Saya mau bikin chart untuk tiga kategory seperti lampiran dengan hanya
> mengambil 10 besar tertinggi dan terendah saja dari data tsb.
> Mohon pencerahan cara yang paling efektif untuk masalah tsb. sekaligus
> saran untuk type chart yang paling elegan berdasarkan pengalaman dari
> teman-teman semua
>
> Terima kasih
> Salam
>
>
>

Thu Oct 31, 2013 2:40 am (PDT) . Posted by:

"Heri Pamungkas ( Gmail )" dchoosen88

Semangat pagi,

Nanya boleh mba ?!

Yang diambil data ranking kolom yang mana ??
Terus kalau dilihat yang terendah kan 0 ada 12 record, yang dipakai yang
mana ??

# sampaikan masalah yang sering anda temui saat menggunakan Excel pada
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3

Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut sangat berharga untuk Be-Exceler yang lain

Salam Excell-ent

On 29/10/2013 15:03, KESI VIZZIANTI wrote:
> Selamat siang semua
>
> Saya mau bikin chart untuk tiga kategory seperti lampiran dengan hanya
> mengambil 10 besar tertinggi dan terendah saja dari data tsb.
> Mohon pencerahan cara yang paling efektif untuk masalah tsb. sekaligus
> saran untuk type chart yang paling elegan berdasarkan pengalaman dari
> teman-teman semua
>
> Terima kasih
> Salam
>
>
>
>

GROUP FOOTER MESSAGE
=====================================================================
Untuk memudahkan tim penyusun materi Belajar Excel yang lebih sesuai kebutuhan member, silakan ungkapkan permasalahan yang kerap ditemui dalam menggunakan Excel sehari-hari atau hal-hal yang ingin dipelajari dalam jangka dekat ini. Mohon diprioritaskan dari yang sering ditemui sampai yang ingin dipelajari.
Isi sesuai kelompoknya (fitur-fitur, formula-formula tertentu yang masih membingungkan, otomasi atau pemrograman dalam Excel [Macro - VBA], hal lainnya yang membuat Anda kesulitan dalam mempelajari Excel).
Boleh mengisi berulang kali untuk menambah uneg-uneg yang ingin diungkapkan.
Link untuk menuangkan seluruh uneg-uneg tersebut ada di :
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
=====================================================================
Langkah kecil Anda dalam mengisi database bisa menjadi langkah pertama yang bermanfaat besar untuk kita semua.
=====================================================================

---------------------------------------------------------------------
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
---------------------------------------------------------------------

Tidak ada komentar:

Posting Komentar