from:"Jan Raisin"

Hai Fefe,

jika sheet didelete maka tidak bisa dikembalikan lagi,
kecuali jika setelah didelete, file tidak disave.. langsung diclose tanpa
disimpan.. maka jika dibuka lagi sheet yang didelete masih bisa muncul

Wassalam,

-Miss Jan Raisin-


Pada 26 Maret 2014 13.30, Febrian Yoshi febr...@gmail.com menulis:



 Dear All Master,

 Mau tanya, apakah sheet yang sudah kedelete bisa dimunculkan kembali?
 Bagaimana ya caranya?

 Terima kasih.
 Salam,
 Fefe

Re: [belajar-excel] Cara mengecilkan File Size

Hai Danu,

banyak hal yang menyebabkan kalkulasi menjadi lama, antara lain:
 array formula
 formula Volatile (formula yang dihitung jika ada cel yang berubah di
lokasi antah berantah), misalnya fungsi Today, Now, Rand, OffSet
 Conditional Formating

solusi:
 mengganti array formula dengan formula biasa
 mengganti fungsi Volatile dengan fungsi Non Volatile atau VBA
 memasang CF hanya jika benar2 dibutuhkan

untuk masalah ukuran file, jika sudah menggunakan Office 2007 ke atas maka
bisa disimpan dalam ekstensi xlsx, biasanya ukurannya sepertiga dari ukuran
xls
atau bisa disimpan dengan ekstensi xlsb biasanya ukurannya akan menjadi
sepersepuluh dari ukuran file xlsx

cmiiw,

-Miss Jan Raisin-


Pada 26 Maret 2014 10.26, Danu Purboyo danu.purb...@yahoo.com menulis:



 Kakak semua...

 Mau tanya donk...
 Ada cara-cara khusus yang bisa ngecilin File ngga yah...
 Laptop saya sering keberatan kalo saya nggunain banyak rumus seperti
 vlookup atau sumif.
 Tiap di enter processingnya makan waktu sampe diatas 2detik, belum kalau
 kadang calculatenya agak lama...
 Jadi kalau kita enter datanya ngga langsung berubah, tapi calculate dulu
 kadang makan waktu sampai 1 menit lebih dulu baru berubah (calculate).

 Ada yang punya problem serupa ngga yah? Terus solvenya gimana...?

 Thx,
 Danu

Re: [belajar-excel] Tanggal 6 bulan Kedepan

Ni hao Rahas,

asumsi tanggal awal ada di cel A1,

cara 1: =Date( Year(A1) , Month(A1) + 6 , Day(A1) )
cara 2: =EDate(A1 , 6 )

yang warna merah:
nilai positif untuk jumlah bulan berikutnya
nilai negatif untuk jumlah bulan sebelumnya

Bu Xie,

-Miss Jan Raisin-


Pada 26 Maret 2014 16.08, Rahasus Pae rahasus@gmail.com menulis:



 Dea Be-exceler,

 Saya diminta untuk membuat laporan setiap semester dimulai dari tanggal
 keluarnya CiGF.

 Misalnya saya pilih CiGF 34704 tanggalnya 26/03/2014 (tanggal ini sudah
 otomatis muncul saya pilih CiGF 34704), maka hasil yang diinginkan secara
 otomatis akan keluar tanggal 26/09/2014. bagaimana rumus fungsi excel-nya
 yach

 Scheme : CiGF 34704
 Periode : 26/03/2014 to 26/09/2014

 Xie-xie.
 Rahas

Re: [belajar-excel] tanya membagi Masa kerja Tahun dan Bulan

Hai Boy,

penyelesaian kasus anda sbb:
asumsi 1: Jumlah tahun di cel A1
asumsi 2: Jumlah bulan di cel A2
asumsi 3: Pembagi di cel A3

solusi:
Step 1: samakan satuan hitungnya dahulu menjadi bulan semua, berarti Jumlah
tahun harus dikali dengan Jumlah bulan dalam 1 tahun  ( asumsi_1 * 12)
Step 2: jumlahkan tahun yang sudah diubah menjadi bulan dengan jumlah bulan
 ( asumsi_1 * 12) + asumsi_2
Step 3: bagi dengan nilai pembagi yang telah ditetapkan  Step_2 / asumsi_3
Step 4: untuk mendapatkan jumlah Tahun setelah pembagian gunakan fungsi
Quotient
syntax: =Quotient( nilai_yang_akan_dibagi ,
(nilai_pembagi)_:_jumlah_bulan_dalam_1_tahun )
fungsi ini digunakan untuk menghitung berapa kali suatu angka
dapat dibagi dengan angka yang lain
 Quotient( Step_3 , jumlah_bulan_dalam_1_tahun )
Step 5:  untuk mendapatkan jumlah bulan setelah pembagian gunakan fungsi Mod
 syntax: =Mod( nilai_yang_akan_dibagi ,
(nilai_pembagi)_:_jumlah_bulan_dalam_1_tahun )
 fungsi ini digunakan untuk menghitung jumlah sisa setelah
dilakukan pembagian
  Mod( Step_3 , jumlah_bulan_dalam_1_tahun )

jika sudah paham langkah2 pembuatan solusinya, maka formula dapat ditulis
dalam 1 cel, jika belum paham bolehlah dipecah dahulu ke dalam beberapa cel
^_^

Berhubung pertanyaannya gak pakai sample workbook, jadi gak salah juga kan
kalo Jan kasih solusi gak pakai workbook ^_^

Wassalam,

-Miss Jan Raisin-


Pada 27 Maret 2014 08.07, boypeace...@gmail.com menulis:



 saya punya kasus membagi tahun dan bulan

 saya punya masa kerja 5 tahun 4 bulan
 ingin saya bagi 2 (dikalikan 1/2), yang saya harapkan hasilnya
 2 tahun 8 bulan


 padahal jika dibagi 2, yang dihasilkan 2,5 tahun 2 bulan, gimana caranya
 agar hasilnya 2 tahun 8 bulan, mohon bantuannya dan terima kasih

Re: [belajar-excel] Cara mengecilkan File Size

Allow juga Danu..

boleh dishare sample workbooknya gak? mungkin aja nanti ada BeExceller yang
berbaik hati memberikan solusi kira2 formula apa saja yang bisa diganti..
gak perlu data kerja asli kok.. yang penting mewakili kasus yang ditanyakan.

xlsb biasa juga disebut personal workbook, hanya saja disimpannya dalam
bentuk format binary..
karena disimpan dalam format binary inilah maka ukuran file akan menjadi
lebih kecil, selain itu proses buka tutup file akan menjadi lebih cepat
daripada jika disimpan dalam bentuk xls atau xlsx

satu kekurangannya adalah, file yang disimpan dalam bentuk binary (xlsb)
tidak dapat dilakukan modifikasi pada ribbonnya, jadi jika ingin melakukan
modifikasi ribbon harus diubah dahulu ke bentuk xlsx atau xlsm. kira2
begitu dek Danu

Cemungut ^_^

-Miss Jan Raisin-


Pada 27 Maret 2014 08.54, Danu Purboyo danu.purb...@yahoo.com menulis:



 Hallow Kak Jan,

 Wah, saya baru denger itu untuk xlsb.
 Perbedaanya apa yah kak, dengan xlsx?

 Soalnya untuk formula, semuanya dibutuhin soalnya, huhuhu

 Thx,
 Danu

 
 On Wed, 3/26/14, Jan Raisin miss.jan.rai...@gmail.com wrote:

 Subject: Re: [belajar-excel] Cara mengecilkan File Size
 To: belajar-excel@yahoogroups.com
 Date: Wednesday, March 26, 2014, 7:27 AM



 Hai Danu,


 banyak hal yang menyebabkan kalkulasi menjadi lama, antara
 lain:
 array formula

  formula Volatile (formula yang dihitung jika ada
 cel yang berubah di lokasi antah berantah), misalnya fungsi
 Today, Now, Rand, OffSet
  Conditional Formating

 solusi:

  mengganti array formula dengan formula
 biasa
 mengganti fungsi Volatile dengan fungsi Non Volatile atau
 VBA

  memasang CF hanya jika benar2 dibutuhkan
 untuk masalah
 ukuran file, jika sudah menggunakan Office 2007 ke atas maka
 bisa disimpan dalam ekstensi xlsx, biasanya ukurannya
 sepertiga dari ukuran xls

 atau bisa
 disimpan dengan ekstensi xlsb biasanya ukurannya akan
 menjadi sepersepuluh dari ukuran file xlsx


 cmiiw,


 -Miss Jan Raisin-

 Pada 26 Maret 2014
 10.26, Danu Purboyo danu.purb...@yahoo.com
 menulis:




 Kakak semua...



 Mau tanya donk...

 Ada cara-cara khusus yang bisa ngecilin File ngga yah...

 Laptop saya sering keberatan kalo saya nggunain banyak rumus
 seperti vlookup atau sumif.

 Tiap di enter processingnya makan waktu sampe diatas 2detik,
 belum kalau kadang calculatenya agak lama...

 Jadi kalau kita enter datanya ngga langsung berubah, tapi
 calculate dulu kadang makan waktu sampai 1 menit lebih dulu
 baru berubah (calculate).



 Ada yang punya problem serupa ngga yah? Terus solvenya
 gimana...?



 Thx,

 Danu

Re: [belajar-excel] Mencari angka yang sama

Hai Emi,

tabel_referensi: cel K11 sampai K24, bisa dibuat sebagai named_range atau
ditulis $K$11:$K:24

formula di cel J6 =IfError( If( Match( I6, tabel_referensi , 0) , I6 ) , 
)
copas ke bawah

urutan logikanya sbb:
1. cari nilai I6 pada tabel_referensi yang sama persis, jika ditemukan
angka yang sama akan menghasilkan nilai baris, jika tidak ditemukan akan
menghasilkan Error Value
Match( I6 , tabel_referensi , 0 )

2. Hasil pencarian point_1 di uji dengan If, jika point 1 menghasilkan
suatu nilai positif dari baris tabel_referensi maka dianggap TRUE, selain
itu akan akan dianggap FALSE
If( point_1 , I6 )

3. Hasil point_2 diuji dengan Trap Error, jika error maka diberikan nilai
null string
IfError( point_2 ,  )

Wassalam,

-Miss Jan Raisin-


2014-03-27 10:06 GMT+07:00 Emi emilestarik...@yahoo.com:



 Emi Lestari
 Teman BeExcel,
 Gimana caranya jika value di kolum K sama seperti kolum I, maka value itu
 dimasukkan di kolum J.
 Terima kasih
 Emi Lestari

Re: [belajar-excel] sim-salabim cari-input-print-edit-print_lagi

2014-03-23 Terurut Topik Jan Raisin

Pak Triyoso,

coba ganti pastenya menjadi Paste:=xlPasteValuesAndNumberFormats

btw, scriptnya dari hasil rekam macro bukan?
jika benara, coba juga cari-cari di postingan lama tentang rekam macro dari
mas Aji Mumpung,
di sana pernah dijelaskan tentang cara rekam macro untuk mengcopy nilai
dari satu sheet ke sheet lainnya
dengan alamat relatif, jadi data berikutnya tidak akan menimpa data
sebelumnya.

Wassalam,

-Miss Jan Raisin-



Pada 23 Maret 2014 16.39, Triyoso Rustamaji trustam...@yahoo.com menulis:



 assalamualaikum,
 mr. Kid, dan be exeller
 sudah seminggu lebih dikit juga mubeng muser cari dan baca.
 ternyata tidak masuk di otak. :(
 saya coba berlogika dan menyederhanakan langkah.
 dg bantuan kolom samping kanan, biar bisa di tangkap oleh si trasnspose.
 dg sedikit keberanian hasilnya masih diluar yg dharapkan.
 mohon di koreksi file terlampir.
 mohon maaf jika tidak berkenan.
 wassalamualaikum
 triyoso rustamaji

Re: [belajar-excel] mengatur ukuran kertas dengan vba

2014-03-23 Terurut Topik Jan Raisin

Oh.. begitu ya..

maaf Jan yang salah kalo gitu xixixixi ^_^
yuk kita bandingkan script antara cetak Folio dengan cetak A4

script untuk cetak Folio:
Sub Rectangle1_Click()
Worksheets(Sheet1).PageSetup.PrintArea = $C$4:$I$322
With Worksheets(Sheet1).PageSetup
.Orientation = xlPortrait
.PaperSize = 220
.FirstPageNumber = xlAutomatic
.Zoom = 100
.RightMargin = Application.InchesToPoints(0.2)
.LeftMargin = Application.InchesToPoints(0.6)
.TopMargin = Application.InchesToPoints(0.4)
.BottomMargin = Application.InchesToPoints(0.2)
End With
End Sub

script untuk cetak A4:
Sub Rectangle2_Click()
Worksheets(Sheet1).PageSetup.PrintArea = $C$4:$H$22
Worksheets(Sheet1).PageSetup.PaperSize = xlPaperA4
End Sub

setiap 1 buah titik mewakili 1 buah tugas yang harus dikerjakan oleh Excel
pada script yang untuk cetak A4 hanya ada 4 buah titik yang berarti ada 4
buah tugas yang dikerjakan oleh Excel, yaitu:
1. masuk ke page setup
2. atur print area mulai cel C4 sampai H22
3. masuk ke page setup
4. pilih ukuran kertas menjadi A4

sekarang bandingkan dengan script yang folio.. kelihatan kan yang
menyebabkan perbedaan

berikutnya adalah luas area yang mau dicetak,
 Awal |  Akhir
A4:  C4   |  H22
Folio :  C4   |  I322

posisi cel awal sama.. tetapi posisi Cel ahirnya berbeda, yang satu di
kolom H sedangkan yang satunya lagi di kolom I
yang satu cuma sampai baris 22 (puluhan), sedangkan yang satunya lagi
sampai baris 322 (ratusan)

kira-kira begitu kali ya.. [?][?][?]

Wassalam,

-Miss Jan Raisin-


Pada 24 Maret 2014 11.29, prazt praztm...@gmail.com menulis:



 Maaf mis Jan jika salah persepsi, yang saya maksud bukan kecepatan
 cetaknya, tapi kecepatan loading macronya, jika saya ceklik untuk tombol
 yang F4 (folio) loading macronya agak lambat sedangkan jika saya ceklik
 pada tombol yang A4 dengan scribd seperti yang tadi saya lampirkan kok
 cepat, nah pertanyaan bagaimana supaya jika di ceklik tombol F4 (folio)
 loading macronya tidak terlalu lama ya minimal secepat yang tombol A4



inline: 35C.png

Re: [belajar-excel] Sambung (Gabung) Sheet.

2014-03-21 Terurut Topik Jan Raisin

Hai Liem,

berikutnya tolong disertakan sumber script yang digunakan karena hal
tersebut adalah salah satu bentuk akhlak yang baik.
Jan coba modifikasi script yang sudah ada..  Untuk Be-Exceller yang merasa
scriptnya digunakan, Jan izin modifikasi sedikit ya ^_^

Public Sub GabungData(Optional bState As Boolean = False)
Dim lSht As Long, lRec As Long
Dim rngRes As Range, rngDT As Range
' Dim bDifCol As Boolean

'Set rngRes = Range(q3)
Set rngRes = Range(a4)
With rngRes
.CurrentRegion.Offset(1).Delete xlShiftUp
lRec = 1
' bDifCol = False
For lSht = 1 To ActiveSheet.Index - 1
' Set rngDT = Sheets(lSht).Range(b4).CurrentRegion
Set rngDT = Sheets(lSht).Range(b4).CurrentRegion.Offset(1)
' rngDT.Offset(0, 1).Resize(, 1).Copy .Offset(lRec, 1)
' rngDT.Copy .Offset(lRec, 1)
rngDT.Copy .Offset(lRec)
' rngDT.Offset(0, 2).Copy .Offset(lRec, 2 + 6 -
rngDT.Columns.Count)
' bDifCol = bDifCol Or (rngDT.Columns.Count = 6)
lRec = .CurrentRegion.Rows.Count
Next lSht
If lRec - 1  0 Then
'.Offset(1).Resize(lRec - 1).Formula = =row()-3
.Offset(1).Resize(lRec - 1).Formula = =row()-4
' If bDifCol Then
' .CurrentRegion.SpecialCells(xlCellTypeBlanks).FormulaR1C1
= =RC[1]
' End If
ActiveSheet.Calculate
' .CurrentRegion.Copy
.CurrentRegion.Resize(, 1).Copy
.PasteSpecial xlPasteValues
End If
.Select
End With
Application.CutCopyMode = False
MsgBox Done., vbInformation, GabungData
End Sub

yang warna hitam adalah script asli yang tidak dimodifikasi
yang warna merah adalah script yang dihapus
yang warna hijau adalah script yang diganti
yang warna biru adalah pengganti script yang warna hijau

Wassalam,

-Miss Jan Raisin-


Pada 21 Maret 2014 13.58, hendrik karnadi hendrikkarn...@yahoo.commenulis:



 Hai Liem,

 Coba macro dalam file terlampir (Judul sdh disediakan).

 Salam,
 HK


   On Friday, 21 March 2014, 9:02, Liem Suliem liemsul...@yahoo.co.id
 wrote:

  selamat pagi , salam be exceler.

 begini ceritanya..
 saya punya data di sheet by tanggal jadi ada sekitar 31 sheet saya ingin
 shet tersebut di gabung
 dalam 1 sheet.
 sudah coba makro yang pernah muncul di milis dan sudah saya otak atik tapi
 masih debug, debun soal offsetnya sepertinya.
 karena ketidak tauan saya tentang makro, akirrnya mentok dimilis.

 file terlampir

 salam
 liem

Re: [belajar-excel] Tanda hijau di pojok kiri atas Cell

Hai Risyanto,

tanda hijau tersebut menunjukkan bahwa isi cel yang seolah-olah adalah
angka tetapi sebenarnya tipe datanya adalah Text
itu sebabnya kenapa cel tersebut tidak mau dilakukan operasi matematika
seperti penambahan, pengurangan, perkalian, pembagian dsb.

Penyebabnya bisa bermacam-macam, antara lain:

   1. sejak awal cel tersebut sudah diformat sebagai Text, solusi: ubah
   format cel menjadi General sebelum memindahkan nilai dari form.
   2. nilai yang di cel tersebut berasal dari Text Box yang berada pada
   sebuah form VBA, secara default properti dari Text box adalah Text, jika
   nilai tersebut langsung dipindahkan ke cel akan menghasilkan data bertipe
   Text. solusi: ubah tipe data dari Text menjadi tipe data lainnya, misal:
   Integer, Long, Single, Double tergantung dengan kebutuhan.

Salah satu cara untuk mengubah tipe Text menjadi Angka adalah dengan cara:
 ketik angka 1 di sembarang cel kosong
 copy cel yang berisi angka 1 tersebut
 blok seluruh area yang muncul tanda segitiga hijau
 klik kanan, pilih Paste Special , Multiply , klik OK

semoga bermanfaat.

Wassalam,

-Miss Jan Raisin-


Pada 20 Maret 2014 09.03, Ratri Risyanto risyant...@yahoo.com menulis:



  Dear All Master Excell

 Mohon penjelasannya...  saya pakai form vba untuk input data ke excel, dan
 hasilnya ada (foto) tanda hijau pojok kiri atas cell. itu kenapa ya? hasil
 inputan nya kan angka kalau saya sum tidak bisa dikarenakan tanda hijau
 tadi, tp kalau tak rename (arahakan ke cell tekan F2), tandanya hilang.
 bagaimana agar tidak terjadi tanda tersebut, atau otomatis hilang sendiri?

 Terima kasih.

 Hs,

 R. Risyanto

Re: [belajar-excel] Combobox by category

pembahasan mengenai Combo Box bisa dibaca mulai dari
sinihttp://b-excel.blogspot.com/2014/02/belajarvba-102-combobox-01.html

sayang kan kalo blog milis gak ditengok :)

Wassalam,

-Miss Jan Raisini-


2014-03-20 15:53 GMT+07:00 Andy Ajhis Ramadhan andyajhisramad...@ymail.com
:



 Dear,
 Be-Exceller,
  Bagiaman ya kalau seandainya andy mau buat combobox dengan sub item
 berikut :

 Category
 Hebat
 Hebat
 Hebat
 Keren
 Banget
 Keren
 Hebat
 Lucu
 Banget
 Lucu

 Anggap saja tabelnya seperti itu, lalu bagaimana ya dari tabel berikut di
 combobox hanya terdapat item Banget, Hebat, Keren, Lucu.
 Terima kasih Be-Exceller.

 Sincerely,
 Andy

Re: [belajar-excel] Sortir Data dengan Macro VBA

Pagi pak Heru,

mau coba pakai fitur Pivot Table (PT) gak?
cukup hanya bikin 1 buah PT, lalu pivot tersebut di copas ke sheet yang
lainnya, jika ada perubahan data hanya cukup melakukan refresh pada 1 buah
PT maka PT pada sheet yang lain pun akan ikut ter-UpDate.

kalo mau silakan baca2 blog mr Kid mulai dari
sinihttp://excel-mr-kid.blogspot.com/2013/04/pivot-table-1-kenalan.html

Wassalam,

-Miss Jan Raisin-


Pada 20 Maret 2014 18.33, Heru Adi hr_a...@yahoo.com menulis:



 Selamat malam para suhu,
 Mohon bantuannya untuk menyelesaikan masalah mengenai sortir data dengan
 macro VBA, file terlampir :)

Re: [belajar-excel] Bagaimana membuat sheet REKAP PENJUALAN yang otomatis?

Hai mbak Nora,

tidak ada yang salah dengan script vba-nya,
kolom D pada sheet Rekap Penjualan diisi berdasarkan perintah yang melekat
pada tombol Simpan di sheet Invoice dan nilainya berasal dari cel H23 di
sheet invoice.

itu sebabnya mengapa saat mbak Nora mengubah jumlah pada kolom C di sheet
Penjualan secara manual maka jumlah kolom D pada sheet Rekap tidak ikut
berubah.
Hubungan antara sheet Penjualan dengan sheet Rekap Penjualan hanya sebatas
pengetahuan yang dimiliki oleh manusia, sedangkan excel yang merupakan
program buatan manusia tidak memiliki pengetahuan seperti yang dimiliki
oleh manusia yang diciptakan oleh Tuhan.

Bagaimana caranya supaya si Excel juga tau kalo sheet Penjualan dan sheet
Rekap memiliki hubungan?
caranya adalah dengan memberi tahu si Excel melalui sebuah perintah
tertentu,
misalnya dengan cara membuat script untuk melakukan edit data di sheet
Penjualan lalu melakukan update ke sheet Rekap,
atau... memasukkan sebuah formula di sheet Rekap yang merujuk kepada sheet
Penjualan,
atau... membuat Pivot Table di sheet Rekap untuk menggantikan rekap yang
sudah ada dan melakukan update otomatis setiap kali terjadi perubahan di
sheet Penjualan,
atau... (Jan kebanyakan atau-nya nih..)

jadi mbak Nora mau milih cara yang seperti apa? mungkin ada cara lain yang
belum Jan sebutkan.

Kira2 seperti itu mbak.. oia, ini yang Jan dapat selama bergabung di milis
ini.. bahwa tidak semua kasus harus diselesaikan dengan vba.. selama bisa
diselesaikan dengan formula dan fitur yang ada, kenapa tidak tidak
dimanfaatkan secara maksimal.

maaf jika kebanyakan mendongeng tetapi belum bisa memberikan solusi ^_^

Wassalam,

-Miss Jan Raisin-


Pada 20 Maret 2014 21.06, Nora Ismanti noraisma...@yahoo.com menulis:



 Mohon bantuan kepada para master dan segenap anggota milis.

 Saya punya invoice sederhana. Ada sedikit problem dalam invoice saya ini,
 yaitu pada kolom D (TOTAL PEMBELIAN) di sheet REKAP PENJUALAN tidak
 berubah secara otomatis mengikuti keadaan di sheet PENJUALAN. Mungkin
 yang perlu diubah adalah kode VBA-nya. Selengkapnya mohon dilihat pada
 lampiran. Penjelasan masalah ada di sheet PENJUALAN.

 Atas perhatian dan bantuannya, saya ucapkan terima kasih.

Re: [belajar-excel] Program reminder dgn excel

Hai mas Yoni,

jika remindernya berdasarkan data yang tampil pada sheet Excel, coba intip
arsip milis yang
inihttp://milis-belajar-excel.1048464.n5.nabble.com/belajar-excel-SYSTEM-REMINDER-PENGINGAT-td5100276.html^_^
tetapi jika yang dimaksud adalah pop up yang otomatis muncul pada saat
komputer dihidupkan, maka caranya kira2 seperti ini:

1. siapkan sebuah file excel yang kosong
2. buat sebuah tabel pada sebuah worksheet yang minimal berisi kolom
tanggal dan kolom keterangan
3. buka VBE dengan cara menekan tombol ALT F11 atau klik kanan nama
sheet lalu pilih View Code atau klik Visual Basic yang terletak pada ribbon
Developer group Code
4. buat sebuah event pada saat workbook dibuka
5. pada event tersebut lakukan pengecekan tanggal komputer terhadap
tanggal pada tabel yang sudah dibuat
- jika tanggal komputer = tanggal tabel maka lakukan kegiatan seperti
ini munculkan reminder dengan menggunakan message box atau user form
- jika tanggal komputer tanggal tabel maka lakukan kegiatan
seperti itu tutup filenya
6. simpan file tersebut dengan tipe macro enable, lalu close
7. buka kembali file tersebut dan Enable-kan macro untuk berjalan pada
komputer tersebut
8. simpan dan close kembali file tersebut
9. buat sebuah sort-cut pada Start Up yang merujuk kepada file yang tadi
telah dibuat

Kira-kira langkahnya adalah seperti di atas,

Wassalam,

-Miss Jan Raisin-

*Sent from my Motorola C200*

Pada 21 Maret 2014 09.07, Yoni Wibawa Abdillah yoniwib...@yahoo.co.idmenulis:

Dear Mod rekans,
Mohon infonya, topik-topik tentang program reminder ada di file nomor
berapa saja?

Terima kasih
yoni

Sent from Yahoo Mail on
Androidhttp://overview.mail.yahoo.com/mobile/?.src=Android

Re: [belajar-excel] Filter angka

2014-03-19 Terurut Topik Jan Raisin

Wa'alaikumsalam wr. wb.,

pak Arie,

Quote

Tapi ada yang STK warnanya PINK. Kriterianya apa iaa ?!

Reply knp ada STK jg warna pink dikarenakan “item no” sama jadi tidak
dibutuhkan.
/Quote

yang di baris 29, 30, 31 itu STK dan no. item nya sama semua.. kenapa
tidak dibuat jadi pink ya?
demikian juga dengan baris 50 51, serta baris 55 sampai dengan 58 nomer
itemnya sama semua.

Apa yang membedakannya dengan STK lain yang memiliki nomer item yang sama?

@_@

Wassalam,

-Miss Jan Raisin-

Pada 19 Maret 2014 17.19, Arieyanto arieya...@osielectronics.com menulis:

Pak Heri,

Maaf teman2 agak membingungkan. Begini Pak maksudnya

1. Kolom “Item No” yg dibutuhkan hanya under STK saja yg ada pada
kolom “Location”
2. Jika ada “Item No” yg sama muncul under WIP pada kolom “location”
seharusnya tidak dibutuhkan juga. Maka dari itu yg dibutuhkan hanya yg
benar2 hanya ada pada lokasi STK dan tidak ada pada location WIP.

Tapi ada yang STK warnanya PINK. Kriterianya apa iaa ?!

Reply knp ada STK jg warna pink dikarenakan “item no” sama jadi tidak
dibutuhkan.

Kira2 msh bingung gak ya.. J

Wassalam

Arie
--

*From:* belajar-excel@yahoogroups.com [mailto:
belajar-excel@yahoogroups.com] *On Behalf Of *Heri Pamungkas ( Gmail )
*Sent:* Wednesday, March 19, 2014 4:49 PM
*To:* belajar-excel@yahoogroups.com
*Subject:* Re: [belajar-excel] Filter angka

السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

Semangat pagi,.

Maaf mas,

saya kok agak bingung tentang :

Yg dibutuhkan hanya item no yg murni under location STK

Tapi ada yang STK warnanya PINK. Kriterianya apa iaa ?!

وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

Warm Regards,

On 19/03/2014 16:17, Arieyanto wrote:

Assalamualaikum,

Dear Para Master,

Butuh bantuannya nih untuk memecahkan masalah terlampir jika data yg kita
punya terlalu banyak.

Terima kasih

Wassalam

Arie

Re: [belajar-excel] Kenapa Pilih Fill Warna Harus 2 Kali Klik Baru Cell Berubah Warna

2014-03-19 Terurut Topik Jan Raisin

Hai Ivan,

mungkin begini ya:
1. ada Conditional Format (CF) pada cel tersebut, coba cek CF yang ada
2. ada formula di suatu cel di lokasi lain yang mempengerahi cel tersebut,
biasanya mungkin kombinasi dengan yang nomer 3
3. ada VBA (macro) yang mempengaruhi kelakuan pada cel tersebut

mungkin mr Kid, pak Anton, pak Hendrik dan Be-Exceller lain bisa
menambahkan kemungkinan yang lain.

Wassalam,

-Miss Jan Raisin-


Pada 20 Maret 2014 07.44, ivanst...@yahoo.com menulis:



  Sent from my BlackBerry®
 powered by Sinyal Kuat INDOSAT
 --
 *From: * ivan budiman ivanst...@yahoo.com
 *Sender: * belajar-excel@yahoogroups.com
 *Date: *Tue, 18 Mar 2014 09:44:22 -0700 (PDT)
 *To: *belajar excelbelajar-excel@yahoogroups.com
 *ReplyTo: * belajar-excel@yahoogroups.com
 *Subject: *[belajar-excel] Kenapa Pilih Fill Warna Harus 2 Kali Klik Baru
 Cell Berubah Warna



 Dear Para Master,
 Saya agak aneh dengan excel saya. Ketika saya mau rubah2 warna dengan
 menggunakan fill warna pada cell, ketika memilih warna, cell tidak langsung
 berubah warna sesuai dengan warna yang dikehendaki. Harus diklik sekali
 lagi, baru warna nya berubah.
 Kenapa bisa begitu ya? Biasanya sih saya tidak pernah mengalami seperti
 itu. Mohon petunjuknya dari para master ya.
 Thanks alot

 Ivan


 Regards,
 M I B

 - thankfulness -

   _

Re: [belajar-excel] vba/ Macro excell

2014-03-19 Terurut Topik Jan Raisin

Hai Jackie,

coba jalan2 ke blog milis di http://b-excel.blogspot.com/
banyak tulisan dari mr. Kid tentang vba
silakan baca mulai dari yang paling dasar di
http://b-excel.blogspot.com/2013/06/belajarvba-000-kenalan.html sampai ke
bagian2 selanjutnya

Wassalam,

-Miss Jan Raisin-


Pada 19 Maret 2014 20.56, jackie yunianto tanfidzula...@yahoo.co.idmenulis:




 dear all rekan rekan,

 mohon bantuan nya,
 saya bermaksud mendalami dan belajar vba excell/ macro.
 apakah di antara rekan rekan ada yg dapat memberikan rekomendasi tempat
 belajar/ kursus di bekasi/ jakarta timur?
 atau mungkin ada diantara rekan rekan yang bisa memberikan modul/ tutorial
 nya
 atau mungkin juga memberikan rekomendasi link situs/ blog
 atau ada dari moderator/ admin yang mau berbaik hati mengajari, saya akan
 sangat berterima kasih

 terimakasih banyak atas bantuannya

 regards,

 jackie

  _

Re: [belajar-excel] Nama Yang tidak disebut tidak dapat Gaji

2014-03-14 Terurut Topik Jan Raisin

Wa'alaikumsalam wr. wb.,

coba di cel AN10 diisi dengan formula
=IsNumber(Search(AN8;$D10))*$AL10

 Search berfungsi untuk mencari nama di dalam cel yang berisi nama
karyawan yang masuk, jika ditemukan maka akan menampilkan posisi huruf di
dalam cel tersebut (hasil adalah angka), tetapi jika tidak ditemukan maka
akan memunculkan error value
 Hasil pencarian dengan fungsi Search dilakukan proses pengujian apakah
hasilnya berupa angka atau bukan menggunakan fungsi IsNumber, jika hasilnya
adalah angka maka akan menghasilkan nilai TRUE yang setara dengan 1, dan
jika bukan angka akan menghasilkan nilai FALSE yang setara dengan 0
 nilai 1 atau 0 ini dikalikan dengan nilai Total

Semoga bermanfaat

Wassalam,

-Miss Jan Raisin-


Pada 14 Maret 2014 16.40, Lazuardi Biru lazuardi_bir...@yahoo.com menulis:



 dh
 salam be excelent
 asalamualaikum wr. wb

 begini master sy punya data terlampir.
 nama yang tidak di sebut dalam satu kolom tidak dapat gaji.

 wes judeg coba, tidak berhasil

 file terlampir

 wasalam

 lb

Re: [belajar-excel] Nama Yang tidak disebut tidak dapat Gaji

2014-03-14 Terurut Topik Jan Raisin

ternyata sudah dijawab duluan dengan cara yang mirip oleh pak Heri
xixixix.. ^_^

Wassalam,

-Miss Jan Raisin-


2014-03-14 16:48 GMT+07:00 Heri Pamungkas ( Gmail ) ghery.dha...@gmail.com
:



 Semangat pagi,

 Mungkin If If an berikut bisa membantu...

  Salam Excell-ent

 On 14/03/2014 16:40, Lazuardi Biru wrote:


  dh
 salam be excelent
 asalamualaikum wr. wb

  begini master sy punya data terlampir.
 nama yang tidak di sebut dalam satu kolom tidak dapat gaji.

  wes judeg coba, tidak berhasil

  file terlampir

  wasalam

  lb

Re: [belajar-excel] WARNING JATUH TEMPO

2014-03-13 Terurut Topik Jan Raisin

Hai Fendik,

coba lihat formula di cel H13, bunyinya adalah:
=Date(Year(G13) , Month(G13) + F13 , Day(G13))

yang warna biru menunjukkan tahun dari Next Due
yang warna merah menunjukkan bulan dari Next Due
yang warna hijau menunjukkan tanggal dari Next Due

G13 adalah cel yang berisi tanggal GLV
F13 adalah cel yang berisi pembayaran Installment ke sekian

jika misalnya bahwa pada saat pembelian kendaraan pihak Dealer
memberlakukan bahwa angsuran sebanyak n bulan harus dibayar pada saat DP,
maka nilai n ini akan mengurangi nilai formula di atas yang dimerahin.

Nah ternyata yang harus diubah dari formula di atas adalah yang dimerahin..
jadi kira2 formula akhirnya gimana hayo? ^_^

Wassalam,

-Miss Jan Raisin-



Pada 14 Maret 2014 07.25, Fendik Anton Wijaya
fendik.an...@tafinance.commenulis:



  Mohon dibantu...


 Bagaimana caranya saat saya isi kolom F13 INST KE- maka kolom NEXT DUE
 menjadi NEXT DUE DATE berikutnya...
 misal saat saya isi kolom F13 INST KE- menjadi 11 maka NEXT DUE-nya dari
 7/04/2014 menjadi 7/05/2014...
 sedangkan F14 saat saya isi 12 maka NEXT DUE DATE-nya menjadi 8/05/2014
 Jadi gimana yha fungsinya?...

 File terlampir...

 Trima kasih para master...diharapkan bantuannya...

 --- Mods ---
 mbok yao usulan solusi dari miss Jan ditanggapi dulu, baru dilanjutkan
 dengan permasalahan yang timbul berikutnya dari kasus yang sama.
 Setidaknya hal ini bisa menyenangkan hati pemberi urun solusi... Kebaikan
 yang sering dipandang kecil dan diabaikan, tetapi yang sebenarnya suatu
 urusan yang besar karena menjadi bagian dari akhlak seseorang.
 Yuk BeExceller, kita tumbuhkan akhlak yang mulia dan tidak hanya fokus
 pada masalah Excel.
 Niat yang baik dan cara yang baik dan santun Insya Allah akan memberi
 hasil yang optimum.
 --


  *From:* Jan Raisin miss.jan.rai...@gmail.com
 *Sent:* Thursday, March 13, 2014 10:29 AM
 *To:* belajar-excel@yahoogroups.com
 *Subject:* Re: [belajar-excel] WARNING JATUH TEMPO [1 Attachment]



  Hai fendik,

 mungkin seperti file terlampir..

 Wassalam,

 -Miss Jan Raisin-

Re: [belajar-excel] Menggabungkan sheet

2014-03-12 Terurut Topik Jan Raisin

Hai Hera,

coba solusi menggunakan pivot table,
tetapi sebelumnya semua file harus disatukan terlebih dahulu seperti saran
pak Dwint
berhubung ukuran file  250 KB maka Jan berikan link downloadnya saja ya.

https://app.box.com/s/cbuch2ehn0osc16ie1q0

cara membuatnya bisa dibaca melalui link yang sudah disebutkan oleh pak
Dwint

Wassalam,

-Miss Jan Raisin-



Pada 12 Maret 2014 12.28, hera wati hera_skep...@yahoo.co.id menulis:





   Pada , hera wati hera_skep...@yahoo.co.id menulis:


   Pada Rabu, 12 Maret 2014 12:15, hera wati hera_skep...@yahoo.co.id
 menulis:
  Maaf mba...saya coba lagi masih boleh?


   Pada Rabu, 12 Maret 2014 12:09, dwint ruswanto dwint.ruswa...@gmail.com
 menulis:

  Berhubung sdri Hera sudah 3 kali mengirim file ke milis dengan ukuran
 melebihi yang diperbolehkan milis, maka saya bantu untuk merubah ukuran
 filenya menjadi lebih kecil

 Tipe file awal: xls (Excel 2003 ke bawah)
 Tipe file modisikasi: xlsb (2007 ke atas)

 Sebelumnya data di workbook sudah dipotong dan disimpan dalam bentuk xlsx
 tetapi ukuran file tetap lebih besar dari 250 KB

 Silakan Be-Exceller yang ingin membantu memberikan solusi.

 Wassalam,

 -dwint-


 Pada 12 Maret 2014 09.54, dwint ruswanto dwint.ruswa...@gmail.commenulis:

 Selamat pagi menjelang siang,

 sambil menunggu file dari sdri Hera, sedikit saran dari saya:

1. data yang terletak di 3 sheet yang berbeda digabung ke dalam 1 sheet
2. untuk mengelompokan data berdasarkan hasil tes, bisa menggunakan
fitur Pivot Table, sebagai bahan bacaan silakan dibaca materi yang sudah
disusun oleh mr Kid

 Bagian 1:
 http://excel-mr-kid.blogspot.com/2013/04/pivot-table-1-kenalan.html
 Bagian 2:
 http://excel-mr-kid.blogspot.com/2013/05/pivot-table-2-menata-data-source.html
 Bagian 3:
 http://excel-mr-kid.blogspot.com/2013/09/pivot-table-3-pivot-field.html

 Wassalam,

 -dwint-

 Pada 12 Maret 2014 09.38, hera wati hera_skep...@yahoo.co.id menulis:


   Selamat siang Master ^_^ .

 Alhamdulillah ketemu ama ini forum.

 Yang mau saya tanyakan, data terlampir ada 3 sheet Master... di kolom
 'Hasil' ada dimasing2 sheet, ingin saya gabungkan. Ada kategori; kontrak,
 gagal, tidak hadir. Saya ingin ketiga kategori itu digabungkan *duuuh pasti
 bingung ama pertanyaan saya L . Terimakasih y

 - Mods -
 Lampiran dilepas dari email karena melebihi batas yang diperbolehkan milis
 silakan mengirimkan kembali sample workbok = 250 KB dengan cara me-reply
 email ini
 ___

Re: [belajar-excel] if bertingkat berdasarkan kriteria [1 Attachment]

2014-03-12 Terurut Topik Jan Raisin

coba cek file terlampir

Wassalam,

-Miss Jan Raisin-


Pada 12 Maret 2014 15.56, irianto irianto.mand...@yahoo.com menulis:



 Dear master..

 Mohon bantuannya utk memecah kan kasus ini

 File terlampir





 /regard

 irianto

  



re-if bertingkat berdasarkan kriteria.xlsx
Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet

Re: [belajar-excel] Memunculkan kategori catatan [1 Attachment]

2014-03-12 Terurut Topik Jan Raisin

Wa'alaikumsalam wr. wb.,

mungkin seperti file terlampir

Wassalam,

-Miss Jan Raisin-


Pada 12 Maret 2014 17.25, Rizki Agung rizki_fisth...@yahoo.com menulis:



 Assalamualaikum,,, mohon bantuan teman-teman, saya mengalami kesulitan
 dalam menampilkan data kategori catatan. pertanyaannya ada di dalam
 lampiran excel yang saya sertakan dalam SurEl ini. Terima kasih atas semua
 bantuan teman-teman semuanya.

  



re-Penilaian Fiks PSB.xlsx
Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet

Re: [belajar-excel] Memindahkan form input dari worksheet ke Userform

2014-03-10 Terurut Topik Jan Raisin

hai Zuhdi,


   1. coba siapkan prosedur pada sebuah module untuk melakukan hapus data,
   isinya adalah txt_pada_form.Text = vbNullString, yang merujuk ke
   masing-masing textbox pada user form
   2. pada text box nomer diisi dengan event change
  - langkah pertama adalah melakukan pemeriksaan apakah yang diinput ke
  dalam text box tersebut data berupa angka atau bukan, jika inputan bukan
  berupa angka maka panggil prosedur yang sudah dibuat pada nomor 1 di atas
  lalu keluar dari prosedur yang ada, scriptnya kira2 akan berbunyi
 - if not isnumeric(txtno.text) then
- nama_prosedur_nomer_1
- exit sub


   - selain itu berarti inputan pada text box nomer adalah berupa angka,
  simpan nilai txtno ke dalam sebuah variabel untuk selanjutnya digunakan
  mencari data yang sesuai
 - untuk itu diperlukan sebuah variabel untuk menyimpan nilai
 txtno, sebuah variabel bertipe range untuk menyimpan lokasi
pencarian, dan
 variable bertipe range untuk menyimpan range data
- dim variabel_nomer as string, dim variabel_data as range, dim
variabel_pencarian as range
 - simpan nilai txtno ke dalam variabel_nomer
- variabel_nomer = form.txtno.text
 - set lokasi range data pencarian di sheet 1 mulai cel A5 dan
 semua area di sekelilingnya, lalu dipersempit menjadi hanya 1 kolom
- set range_data =
sheets(sheet1).range(a5).currentregion.resize(,1)
 - cari datanya, set variabel_pencarian = range_pencarian.find(
 variabel_nomer , lookat:= xlwhole)
  - setelah itu lakukan pengecekan apakah pencarian data menemukan data
  yang sama atau tidak, jika pencarian data tidak menemukan data
maka panggil
  prosedur hapus data pada nomer 1 di atas lalu keluar dari prosedur
 - if variabel_pencarian is nothing then
 - prosedur_hapus_data
 - exit sub
  - tetapi jika pencarian data berhasil menemukan data yang sama, maka
  simpan nomer baris data ke dalam sebuah variabel, nilai baris ini akan
  digunakan untuk menampilkan data ke masing-masing tetxt box, untuk ini
  diperlukan deklarasi variabel bertipe long
 - dim variabel_nomer_baris as long
  - setelah nomer baris data sudah ditemukan, saatnya memasukann nilai
  data ke dalam setiap text box
 - scriptnya kira-kira akan berbunyi; text_box_yang ini =
 sheets(nama-sheetnya).cells(nomer_baris , nomer_kolom).value
 - ulangi script tersebut untuk setiap text box yang ada

 tombol Prev diisi dengan script textno.text = txtno.text - 1
 tombol Next diisi dengan script txtno.tetxt = txtno.text + 1

Semoga dapat dipahami.

Wassalam,

-Miss Jan Raisin-


2014-03-10 12:36 GMT+07:00 zuhdi_...@yahoo.com:



 Dear Master Excel,
 Saya sudah buat contoh form input di worksheet, dan bagaimana supaya bisa
 saya aplikasikan lewat userform, berikut contoh attachment-nya.
 terima kasih

 Salam
 Zuhdi

Re: [belajar-excel] Cari Data Berdasarkan Kriteria

2014-03-10 Terurut Topik Jan Raisin

maaf pak Andre..

what is de kamsud? (maksudnya apa ya?) xixixi ^_^
Jan belum menangkap maksud dari pertanyaannya.. kriteria yang diinginkan di
sample workbook tersebut yang mana ya? mungkin bisa sedikit diperjelas lagi

Wassalam,

-Miss Jan Raisin-


Pada 10 Maret 2014 14.31, hendrik karnadi hendrikkarn...@yahoo.commenulis:



 Apakah harus pakai formula ?

 Jika tidak, mungkin bisa menggunakan Advance Filter dimana kriterianya
 terdiri dari beberapa item. Jika yang diinginkan adalah A dan D saja maka
 kriterianya menjadi 3 baris (NAMA_SINGKAT, A, D).

 Selamat mencoba.

 Salam,
 HK



   On Monday, 10 March 2014, 14:09, Andre Rahmaidy 
 andree_bpdsum...@yahoo.co.id wrote:

  Siang Beexceller

 saya mau tanya formula untuk mencari data sesuai dengan kriteria yang kita
 inginkan.. file terlampir




 wassalam
 andree

Re: [belajar-excel] add-in Terbilang English Indonesia

2014-03-09 Terurut Topik Jan Raisin

coba intip folder di sini https://app.box.com/shared/8b88dryuil
ada 14 file mengenai terbilang warisan dari Alm. pak Masyhud (aka Siti Vi)
semoga ilmu warisan beliau yang bermanfaat akan selalu menjadi Amal Ibadah
yang akan terus mengalir pahalanya. Aamiin.

Wassalam,

-Miss Jan Raisin-


Pada 10 Maret 2014 08.17, iman_ex...@yahoo.com menulis:



 Mas Daffa,

 Terima kasih atas infonya,
 tapi file nya sepertinya sudah ga ada
 :(

Re: [belajar-excel] Mohon Bantuannya, kok saya coba2 buat filter tapi debug terus

2014-03-09 Terurut Topik Jan Raisin

Betul kata pak Bagus,

thread ini sudah dijawab oleh mr Kid pada tanggal 4 Maret 2014
silakan dilihat di
sinihttp://milis-belajar-excel.1048464.n5.nabble.com/belajar-excel-Mohon-Bantuannya-kok-saya-coba2-buat-filter-tapi-debug-terus-td5724047.html#a5724059
post
ketiga pada jam 11:32 PM

Wassalam,

-Miss Jan Raisin-


Pada 10 Maret 2014 10.27, Bagus ba...@kingjim.co.id menulis:



  Kalau gak salah ini sudah dijawab Mr. Kid pada tgl 4.
 Coba di cek kembali..



 Wassalam

 ~ Bagus ~



 - Original Message -
 *From:* Ahmad Habibillah abiel_1...@yahoo.com
 *To:* belajar-excel@yahoogroups.com
 *Sent:* Monday, March 10, 2014 10:16 AM
 *Subject:* [belajar-excel] Mohon Bantuannya, kok saya coba2 buat filter
 tapi debug terus [1 Attachment]




 maaf para suhu terlampir sample datanya

 mohon bantuannya,

 terima kasih atas bantuannya, hal ini sangat membantu pekerjaan saya
 sehari2

 demikian terima kasih


  Pada Selasa, 4 Maret 2014 13:03, Ahmad Habibillah abiel_1...@yahoo.com
 menulis:

Dear Para Sesepuh Suhu,

 mohon bantuannya, saya lagi belajar2 buat filter tapi nggak berhasil2
 debug terus..

 atas bantuannya sangat terima kasih banget dan sangaaat membantu pekerjaan
 saya sehari2..

 salam,
 Ahmad H

 - Mod -
 Lampiran dilepas dari email karena ukuran melebihi 250 KB
 Silakan melampirkan sampel workbook dengan cara mereply thread ini,
 pastikan ukuran file sesuai dengan ketentuan milis
 __





   _

Re: [belajar-excel] membandingkan 2 table

2014-03-05 Terurut Topik Jan Raisin

Hai Tia,

langkah2 pembuatan CF-nya sperti ini:
1. Blok seluruh area tabel 1 yang ada di sebelah kanan
2. Pada ribbon Home, group Styles, klik Conditional Formating, lalu pilih
New Rule
3. Pada rule Type, pilih Use a formula to determine which cells to format
4. Pada kotak Format values where this formula is true diisi formula
seperti berikut ini:
=CountIf( OffSet( $A$1 , 0 ,  0 ,  Counta( $A:$A ) - 1 , 1 ) , $F2 )  1

5. Klik tombol Format
6. Akan terbuka dialog box Format Cell, klik tab Fill, pilih warna yang
anda inginkan lalu klik OK
7. Setelah itu akan kembali ke dialog box sebelumnya, klik OK lagi

Penjelasan formula di atas:
Formula awalnya adalah CountIf yang warna hitam,
syntaxnya =CountIf( area_yang_diuji , kriteria )
digunakan untuk menghitung jumlah data yang sama dengan kriteria yang
ditentukan

Area pengujian pada formula di atas ditandai dengan warna biru dan merah,
yang warna biru digunakan untuk mencari jumlah area dengan tipe dinamis
menggunakan fungsi OffSet
syntaxnya =OffSet( titik_awal , posisi_baris , posisi_kolom , jumlah_baris
, jumlah_kolom )

Titik awal terletak pada cel A1 dan posisinya tidak boleh berubah saat
formula dicopas ke cel yang lain, oleh karena itu ditulis menggunakan
alamat cel absolut yang ditandai dengan penggunaan tanda dollar ($)
Posisi baris dan nomor kolom diisi dengan 0 (nol) karena akan diambil
seluruh data yang ada dengan menghitung jumlah baris data

Jumlah baris dihitung menggunakan fungsi Counta terhadap kolom A lalu
dikurangi dengan 1 yaitu header kolom yang harus dikeluarkan dari
perhitungan
Nilai 1 pada jumlah kolom menunjukkan bahwa hanya 1 kolom yang akan
digunakan sebagai area pengujian

Formula ringkasnya sudah diberikan oleh mas Bagus, berhubung Jan ngetiknya
sudah lama dan sayang kalo dibuang,, maka emailnya tetap Jan kirim xixixixi
^_^

Satu hal lagi, Jan coba menggunakan nama tabel yang sudah ada untuk membuat
alamat range dinamis tetapi selalu error, padahal waktu diuji di sebuah cel
bisa berjalan normal, error hanya muncul saat dipindah ke CF. Mungkin ada
Be-Exceller lain yang dapat menjelaskannya?

Wassalam,

-Miss Jan Raisin-



2014-03-05 15:37 GMT+07:00 gantar dowo takbengkol...@gmail.com:



 salam

 mohon bantuannya membandingkan tgl masuk pada 2 tabel berdasarkan NIK
 dengan menggunakan conditional formatting

 TIA

Re: [belajar-excel] If bertingkat (lebih dari atau kurang dari)

2014-03-05 Terurut Topik Jan Raisin

Hai Aden,

coba buat sebuah tabel referensi dengan jumlah kolom = 2
Kolom pertama adalah batas bawah, berisi nilai minimal yang menjadi
batasan, misalnya range kelasnya adalah 0 sampai 10 maka batas bawahnya
adalah 0
Kolom kedua berisi nilai pengali
tabel harus disort secara Ascending, kecil ke besar, A ke Z

Untuk mengambil nilai pengali, gunakakan fungsi VLookUp dengan range_lookup
= TRUE
syntax-nya :
=VlookUp( nilai_yang_dicari , range_pencarian , nomor_indeks_kolom ,
range_lookup )

setelah diperoleh nilai pengalinya, silakan dikali dengan bobot untuk
memperoleh nilai yang anda cari.

Manfaat dari menggunakan tabel referensi adalah akan menyingkat formula IF
jika memiliki banyak kondisi.

Wassalam,

-Miss Jan Raisin-


Pada 6 Maret 2014 11.30, Aden S adendum...@yahoo.com menulis:



 Dear Excellers,

 Mohon bantuannya untuk membuat rumus if bertingkat atau rumus lain untuk
 membuat perhitungan didalam lampiran email ini

 (Jika kolom D3 (nilai lebih dari 21 maka kolom E3 dikalikan E10, Jika
 nilai lebih dari 10 dan kurang dari 20 maka kolom E3 dikalikan E11,  nilai
 kurang dari 10 maka kolom E3 dikalikan E12)

 Terima kasih

Re: [belajar-excel] Shape Bergeser Saat Diprint

2014-03-04 Terurut Topik Jan Raisin

Hai Agung,

coba simpan file dengan tipe PDF sebelum di print, mungkin ada Be-Exceller
lain yang memiliki saran yang lebih baik.

Wassalam,

-Miss Jan Raisin-


Pada 5 Maret 2014 09.00, agungdotco...@yahoo.com menulis:



 Dear All Master, , ,

 Mau Tanya, Bagaimana ya agar kotak pilahan yang saya buat saat diprint
 tidak bergeser, , ,



 Thanks,B'Regards
 --Agunk--

Re: [belajar-excel] Shape Bergeser Saat Diprint

2014-03-04 Terurut Topik Jan Raisin

Di komputer Jan berhasil pak..

caranya:
1. Blok area yang ingin di print
2. Set print area
3. Atur agar semua masuk dalam 1 halaman (Fit to 1 page)
4. Setelah itu baru save As ke PDF

file PDFnya tidak bisa Jan lampirkan di sini karena ukurannya 348 KB
melebihi batas yang diperbolehkan milis,
PDF dikirim via Japri aja ya..

Wassalam,

-Miss Jan Raisin-


Pada 5 Maret 2014 11.03, agungdotco...@yahoo.com menulis:



 Dear Miss Jan Raisin,

 Udah Sya PDF kan Hasilnya Tetap sama, , Kotak2nya masih bergeser
 Ada Cara Lain Gak ya, , ,


 Thanks,B'Regards
 ---Agung--

Re: [belajar-excel] Comen otomatis

2014-03-03 Terurut Topik Jan Raisin

hai Fendi,

Coba buat sebuah script terhadap perubahan posisi cel pada sheet yang
dikehendaki, dalam hal ini berarti harus dipilih event selection change
pada sheet 2
lakukan pengujian apakah Target cel tersebut hanya 1 cel saja atau tidak,
kira2 scriptnya seperti
if target.cells.count = 1 then
lakukan juga pengujian terhadap posisi baris dan kolom cel tersebut, untuk
yang ini kira2 scriptnya akan berbunyi
if target.row = nomor_baris_cel_yang_telah_ditentukan and target.column =
nomor_kolom_awal and target.column = nomor_kolom_akhir then
jika ingin menyingkat maka setiap object Target bisa dikumpulkan dengan
script yang berbunyi With Target sehingga penulisan scriptnya akan lebih
singkat

Karena koment akan mengambil nilai berdasarkan posisi cel aktif dimana yang
berubah adalah nilai kolomnya, maka diperlukan sebuah variabel untuk
menyimpan nilai kolom tersebut,
untuk ini perlu dideklarasikan sebuah variabel dengan tipe data Integer,
kira2 bunyi scriptnya akan seperti Dim nama_variablenya as Integer

Lalu nilai dari cel di sheet sebelah yang akan dimasukkan ke dalam koment
perlu disimpan ke dalam sebuah variabel yang bertipe String, untuk ini anda
harus mendeklarasikan sebuah variebel, bunyi scriptnya kira2 akan menjadi
Dim nama_variabelnya as String

Setelah tersedia sebuah wadah untuk menyimpan nilai teks komentnya, yang
harus dilakukan adalah mengambil nilainya berdasarkan posisi baris dan
kolom di sheet 1
kira2 scriptnya akan berbunyi: nama_variabel_string =
sheets(nama_sheetnya).cells(
nomor_barisnya_diambil_dari_nilai_indeks_kolom_di_atas , 2).value
nilai 2 di atas dikarenakan posisi data berada di kolom B

Posisi baris dan kolom untuk komen sudah, Teks untuk koment juga sudah,
saatnya memasukkan koment tersebut ke comment box

Tetapi sebelumnya, setiap koment yang ada harus disembunyikan dulu dengan
perintah application.displaycommentindicator = xlnoindicator

Sekarang saatnya memasukan koment-nya ke dalam comment box
Jika sebelumnya sudah fokus bekerja pada cel yang menjadi Target, maka yang
diperlukan adalah menambahkan koment baru, scripnya akan berbunyi seperti
ini:
.addcomment , perhatikan ada 1 buah titik di depan yang menandakan bahwa
kegiatan tersebut milik dari objek yang sudah ditentukan sebelumnya, Jika
sebelumnya nama objek tidak ditentukan terlebih dahulu maka di depan titik
tersebut harus dimasukan nama objeknya yaitu si Target tadi

Lalu, isi comment box dengan variabel bertipe String yang tadi sudah kita
siapkan dan sudah diisi nilainya, scriptnya akan menjadi seperti ini
.comment.text nama_variabelnya

Sekarang tampilkan komennya dengan perintah .comment.visible = true

Oia.. jaga2 saja supaya error yang ada tidak muncul, maka perlu ditambahkan
perintah untuk mengabaikan error dengan script On Error Resume Next tepat 1
baris di atas perintah menyembunyikan koment yang sudah ada.

Kira2 begitu alur ceritanya.. mudah2an tidak membuat bingung..

Wassalam,

-Miss Jan Raisin-





Pada 4 Maret 2014 10.14, Fendi S fen...@rocketmail.com menulis:



 Kepada para master excell.
 Saya kesulitan dalam memberi comen secara otomatis pada sel tertentu.
 Kepada para master mohon kiranya memberi solusi. Terima kasih sebelumnya.
 (file terlmpir

Re: [belajar-excel] RE: WTA: Cara Install NPgSql Power Query untuk Excel 2010

2014-03-01 Terurut Topik Jan Raisin

terima kasih atas responnya pak Anton,

a
kan Jan coba dulu

Wassalam,

-Miss Jan Raisin-



Pada 1 Maret 2014 14.28, summon...@yahoo.com menulis:



 Dear miss Jan,
 Mungkin petunjuk yang ada di link berikut ini bisa membantu:

 http://office.microsoft.com/en-001/excel-help/connect-to-a-postgresql-database-HA104028095.aspx

 semoga bermanfaat


 ---In belajar-excel@yahoogroups.com, miss.jan.rai...@gmail.com wrote:

 Dear Be-Exceller,

 bagaimana cara install NPgSql untuk bisa menjalankan PQ di Excel ? Jan
 sudah download dari http://pgfoundry.org/frs/?group_id=1000140 tetapi
 bingung mau pasangnya.

 Wassalam,

 -Miss Jan Raisin-

  

 https://groups.yahoo.com/group/belajar-excel/post;_ylc=X3oDMTJyN2c3dHBlBF9TAzk3MzU5NzE0BGdycElkAzIwNjI3Njc4BGdycHNwSWQDMTcwODI5ODgyMQRtc2dJZAMzMDY0OQRzZWMDZnRyBHNsawNycGx5BHN0aW1lAzEzOTM2NTg4OTk-?act=replymessageNum=30649

Re: [belajar-excel] Menguhubungkan UserForm dengan Database

2014-02-28 Terurut Topik Jan Raisin

pak Haris,

coba dibaca kembali email balasan dari mr Kid sebelumnya, ini saya kutipkan
secara lengkap:

Quote
hehehe...
kira-kira bunyi script yang Anda gunakan seperti apa ?

Misal ada file bernama Contoh1.xlsx di drive D pada folder bernama Belajar
(pastikan ada file excel bernama contoh1.xlsx dulu ya)
Lalu buat file excel baru, dan bisa di-save misal dengan nama Filenya
dengan type Excel Macro Enabled workbook (.xlsm)
Kemudian dibuat sebuah prosedur sub bernama BukaFile pada sebuah general
module (code module)
Prosedur tersebut diisi dengan script :

dim wbkApp as workbook, wbkTarget as workbook
set wbkapp=thisworkbook
set wbktarget=workbooks.open( d:\belajar\contoh1.xlsx,2)
wbkapp.activate

sehingga bunyi prosedur sub bernama BukaFile menjadi :
public sub BukaFile()

   dim wbkApp as workbook, wbkTarget as workbook
   set wbkapp=thisworkbook
   set wbktarget=workbooks.open( d:\belajar\contoh1.xlsx,2)
   wbkapp.activate
end sub

Demikian contoh filenya.

Wassalam,
Kid.
/Quote

petunjuknya ada di tulisan yang dimerahin ^_^

jika memakai tombol yang terletak di suatu form atau sheet, maka script
yang di dalam tombol tersebut isinya adalah perintah memanggil prosedur
yang tadi ditulis di modul
kira2 bunyinya seperti ini

Call nama_prosedurnya

Wassalam,

-Miss Jan Raisin-




Pada 28 Februari 2014 14.33, Haris Rifai haris.ri...@yahoo.co.id menulis:



 Dear Mis. Jan Raisin.

 Sudah saya coba arahan dari Mis. Jan, tapi hasilnya masih sama yaitu file
 yang saya buka hanya nongol di taskbar tidak terbuka langsung, saya coba
 klik pada taskbar tetep aza ga kebuka.
 ini script yang saya buat pada commond button DATABASE

  Private Sub DataBase_Click()
Dim wbkApp As Workbook, wbktarget As Workbook
 Set wbkApp = ThisWorkbook
Set wbktarget = Workbooks.Open(J:\Belajar VBA\Coba1.xlsx,2)
ActiveWorkbook.Sheet(DATABASE).Activate
 End Sub

 terimakasih.
 haris

[belajar-excel] WTA: Cara Install NPgSql Power Query untuk Excel 2010

2014-02-28 Terurut Topik Jan Raisin

Dear Be-Exceller,

bagaimana cara install NPgSql untuk bisa menjalankan PQ di Excel ? Jan
sudah download dari http://pgfoundry.org/frs/?group_id=1000140 tetapi
bingung mau pasangnya.

Wassalam,

-Miss Jan Raisin-

Re: [belajar-excel] Menguhubungkan UserForm dengan Database

2014-02-27 Terurut Topik Jan Raisin

izin ikutan ya..

agar file langsung terbuka dan merujuk ke sheet tertentu yang telah
ditentukan maka script yang ini
wbkapp.activate
harus diganti menjadi
ActiveWorkbook.Sheet(nama_sheetnya).Activate

Untuk melakukan update saat Open workbook seharusnya nilai untuk updatenya
adalah 3, dan jika tidak ingin melakukan update maka nilainya harus 0,

cmiiw

Wassalam,

-Miss Jan Raisin-



Pada 28 Februari 2014 08.57, Haris Rifai haris.ri...@yahoo.co.id menulis:



 Selamat pagi Mr. Kid.

 Terimaksih arahanya.
 Sudah saya coba dan berhasil, tapi mo nanya lagi nih Mr. Kid.

 File yang sudah tebuka kenapa tidak langsung nongol di monitor ya... saya
 tau kalo file tersebut sudah terbuka saat saya open manual dari windows
 explorer, disitu muncul pertanyaan apakah kita mau re-open file Coba2.

 1. Bagaimana coding yang mesti saya buat agar proses open file bisa
 langsung nongol di layar file yang kita buka tersebut seperti kita buka
 file dari windows explorer.
 Kalo bisa langsung ke sheet yang kita inginkan gimana codingnya.

 2. Mr. Kid jelasin kalo angka 2 yang ada sebelum kurung tutup artinya
 file yang kita buka tidak melakukan edit link, bagaimana klo kita ingin
 file yang kita buka melakukan edit link.


 Terimakasih.
 Haris




   Pada Kamis, 27 Februari 2014 15:45, Mr. Kid mr.nm...@gmail.com
 menulis:

  hehehe...
 kira-kira bunyi script yang Anda gunakan seperti apa ?

 Misal ada file bernama Contoh1.xlsx di drive D pada folder bernama Belajar
 (pastikan ada file excel bernama contoh1.xlsx dulu ya)
 Lalu buat file excel baru, dan bisa di-save misal dengan nama Filenya
 dengan type Excel Macro Enabled workbook (.xlsm)
 Kemudian dibuat sebuah prosedur sub bernama BukaFile pada sebuah general
 module (code module)
 Prosedur tersebut diisi dengan script :
 dim wbkApp as workbook, wbkTarget as workbook
 set wbkapp=thisworkbook
 set wbktarget=workbooks.open( d:\belajar\contoh1.xlsx,2)
 wbkapp.activate

 sehingga bunyi prosedur sub bernama BukaFile menjadi :
 public sub BukaFile()
dim wbkApp as workbook, wbkTarget as workbook
set wbkapp=thisworkbook
set wbktarget=workbooks.open( d:\belajar\contoh1.xlsx,2)
wbkapp.activate
 end sub

 Demikian contoh filenya.

 Wassalam,
 Kid.




 2014-02-27 15:36 GMT+07:00 Krisan Flower krisan_flo...@rocketmail.com:


  Salam, Mr Kid,

 Sory ikut nimbrung saya sedang coba2 dari masalah yang disajikan Pak haris,
 saya coba kenapa masih error Pak Kid. Bisa gak disertakan dengan contoh.

 Terimaksih.

 Krisan



   Pada Kamis, 27 Februari 2014 15:55, Mr. Kid mr.nm...@gmail.com
 menulis:

  Hai Haris,

 1. set wbktarget=workbooks.open(DATA (J:)\\BelajarVBA\COBA2,2)
  set wbktarget=workbooks.open(J:\BelajarVBA\COBA2.xlsx,2)
  nama drive ditulis seperti J:\ diikuti folder dan seterusnya
  nama file disertai ekstensi filenya yang dapat dilihat saat membuka
 file tersebut di Excel atau di Windows Explorer.
   nilai 2 pada ,2 berarti tidak melakukan update link

 3. setelah bisa membuka workbook, maka pelajari cara menyusun item pilihan
 dalam combobox mulai dari 
 sinihttp://b-excel.blogspot.com/2014/02/belajarvba-102-combobox-01.html
 .

 Wassalam,
 Kid.



 2014-02-27 8:37 GMT+07:00 Haris Rifai haris.ri...@yahoo.co.id:


   Dear Mr. Kid.

 Terimaksih atas arahanya.

 Untuk nomor 1.
 Saya sudah coba seperti ini pada point membuka workbook;
  set wbktarget=workbooks.open(DATA (J:)\\BelajarVBA\COBA2,2)

 Tapi saat dijalankan muncul debug yang mengarah pada script tersebut,
 Mungkin kesalahan pada penulisan script alamat file, karena memang saya
 belum tau bagaimana cara penulisannya.

 File yang saya maksud ada di partisi/drive D pada folder BelajarVBA.
 Berada satu folder dengan file kerjanya (userform).

 Dalam penulisan alamat file target terdpat angka 2 sebelum tanda kurung
 penutup, apa arti angka tersebut Mr. Kid.

 Untuk nomor 3.
 Yang saya maksud adalah saya ingin membuka/menampilkan sebuah sheet dari
 suatu file dengan cara klik pada sebuah commond button.
 Misalnya sheet tersebut berada di partisi/drive D pada folder
 BelajarVBA nama file Coba3 sheet Database. Bagaimana coding yang
 harus saya tuliskan pada commond button yang saya maksud.

 Mohon maaf klo saya kurang bisa cepat faham, tapi saya pengen bisa.
 Insya Allah saya akan share aplikasi vba yang sedang saya buat, dengan
 harapan minimal bisa buat referensi bagi para pemula seperti saya.

 Terimakasih.

 Haris.


   Pada Sabtu, 22 Februari 2014 15:44, Mr. Kid mr.nm...@gmail.com
 menulis:

  Wa'alaikumussalam Wr. Wb.

 Hai Haris,

 1. Bagaimana caranya (teknis  coding) bila sheet DATABASE berada di file
 yang berbeda.
  sebelum proses save, lakukan kegiatan membuka file target
 dim wbkApp as workbook, wbkTarget as workbook
 set wbkapp=thisworkbook
 set wbktarget=workbooks.open( alamat lengkap si file target,2)
 wbkapp.activate

  proses penulisan ke sebuah cell target ditambahkan dengan object
 workbook target dan sheet targetnya
 wbktarget.sheets(nama sheet target).range(alamat range target).value

Re: [belajar-excel] Hubungan Antara ComboBox dengan TextBox (Edited by Mod)

2014-02-25 Terurut Topik Jan Raisin

Wa'alaikumsalam wr. wb.,

coba tambahkan script On Error Resume Next tepat di atas script yang
berbunyi If CboJns.Text =  Then

Wassalam,

-Miss Jan Raisin-


Pada 26 Februari 2014 11.13, aisyah zahrah aisyahzahra...@gmail.commenulis:



 Assalamu`alaikum.
 Dear Be Excel-er
 saya mempunyai data,dimana data tersebut masing-masing mempunyai kriteria
 dan masing-masing kriteria memiliki jumlah data yang tidak sama
 Umpama ada kriteria Hewan Pemakan Daging (Carnivora), Hewan Pemakan
 Tumbuhan (Herbivora),
 Hewan Pemakan Daging dan Tumbuhan (Omnivora) dan yang terakhir dan Hewan
 Pemakan Uang (yang ini apa ya? rayap kali ya..) [ misal :-) ]
 masing-masing jumlahnya 5:5:5:4

 jadi saya membuat Textbox,dimana Textbox tersebut saya hubungkan dengan
 ComboBox
 banyaknya Textbox yang saya buat berdasarkan jumlah kriteria yang paling
 banyak ( dalam kasus ini berarti 5 )
 sewaktu ComboBox berbunyiHewan Pemakan Uuang,otomatis TextBox yang
 terakhir akan kosong
 Masalahnya semua textbox tersebut ada yang di sangkutpautkan dengan
 TextBox yang lain,dan TextBox yang lain inilah yang jadi masalah,beliau
 selalu Debug jika ada salah satu textbox yang kosong
 apa karna jumlah dari masing-masing kriteria tidak sama ??ataukah ada yang
 keliru di script-nya ??
 Atas bantuannya saya ucapkan terima kasih
 Wassalamu`alaikum...


 Untuk lebih Jelasnya,saya lampirkan File tersebut

 - Mods -
 Dilarang menuliskan pertanyaan dan judul dengan huruf besar semua,
 pastikan tombol Caps Lock di komputer anda tidak rusak saat menulis email
 :)

 Penulisan dengan huruf besar di dumay seolah2 anda berteriak kepada yang
 lain
 ___

Re: [belajar-excel] Apa rumus yang tepat untuk penjumlahan ini?

2014-02-24 Terurut Topik Jan Raisin

hai Tjahya H.,

coba manfaatkan fitur Pivot table,
silakan dibaca2 cara pembuatannya dari tulisan di blognya mr Kid di
sinihttp://excel-mr-kid.blogspot.com/2013/04/pivot-table-1-kenalan.html,
inihttp://excel-mr-kid.blogspot.com/2013/05/pivot-table-2-menata-data-source.html,
dan yan 
inihttp://excel-mr-kid.blogspot.com/2013/09/pivot-table-3-pivot-field.html

Wassalam,

-Miss Jan Raisin-


Pada 25 Februari 2014 09.14, Tjahya Hartono tjahyahart...@yahoo.co.idmenulis:



  Dear master excel,

  mau bertanya untuk kasus penjumlahan sekali lagi,berikut terlampir.


 Tjahya Hartono

Re: [belajar-excel] mengatur agar lebar cell menyesuaikan isinya

Hai Liem,

jawabnya bisa,
coba gunakan event Change milik si worksheet, scriptnya seperti ini:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range(*b4:b5*)) Is Nothing Then
Target.WrapText = True
Target.EntireRow.AutoFit
End If
End Sub

ganti yang warna hijau dengan area yang akan ditulis datanya

Wassalam,

-Miss Jan Raisin-


Pada 20 Februari 2014 14.57, Liem Suliem liemsul...@yahoo.co.id menulis:



 dh
 dear suhu (tanya lagi)
 bisa gak ya mengatur lebar cel otomatis menyesuaikan isinya (cell dalam
 format wrap text)
 file terlampir


 wasalam
 liem

Re: [belajar-excel] mengatur agar lebar cell menyesuaikan isinya

Hai Liem,

maaf tadi Jan gak begitu memperhatikan sample workbooknya..
ternyata ada rumusnya ya..

coba scriptnya ditambahin .Offset(, 1) sehingga menjadi:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range(*b3*)) Is Nothing Then
Target.Offset(, 1).WrapText = True
Target.Offset(, 1).EntireRow.AutoFit
End If
End Sub

yang warna hijau adalah lokasi cel tempat diubahnya angka 1 atau 2
yang merah artinya geser 1 kolom ke arah kanan dari cel B3 tempat menulis
kriteria VLookUp
script ditulis di sheet Tanya

Wassalam,

-Miss Jan Raisin-


Pada 20 Februari 2014 15.49, Liem Suliem liemsul...@yahoo.co.id menulis:



 oke mis jawabanya adalah di tulis di shet ybs. tapi bisa gak mis
 kalo langsung update. kalo makro yang mis berikan.. untuk rumus vlokup
 harus
 di klik di formula bar baru di enter... baru makro akan berjalan..
 maksunya bisa gak kalau otomatis gito lo..

 maaf kalo banyak nanya.

 wasalam
 liem



   Pada , Liem Suliem liemsul...@yahoo.co.id menulis:
  makro ditulis di sheet yang bersangkutan ya mis



   Pada Kamis, 20 Februari 2014 15:21, Jan Raisin 
 miss.jan.rai...@gmail.com menulis:

  Hai Liem,

 jawabnya bisa,
 coba gunakan event Change milik si worksheet, scriptnya seperti ini:

 Private Sub Worksheet_Change(ByVal Target As Range)
 If Not Intersect(Target, Range(*b4:b5*)) Is Nothing Then
 Target.WrapText = True
 Target.EntireRow.AutoFit
 End If
 End Sub

 ganti yang warna hijau dengan area yang akan ditulis datanya

 Wassalam,

 -Miss Jan Raisin-


 Pada 20 Februari 2014 14.57, Liem Suliem liemsul...@yahoo.co.id menulis:


  dh
 dear suhu (tanya lagi)
 bisa gak ya mengatur lebar cel otomatis menyesuaikan isinya (cell dalam
 format wrap text)
 file terlampir


 wasalam
 liem

Re: [belajar-excel] Mari kita do'akan tuk kesembuhan Pak Alif Akbar

ikut ^_^
kalo jadi Jan naik bus way, kebetulan minggu ini bisa ke Jakarta
jarang2 bisa ketemu teman di milis, sekalian nyobain naik bus way ^_^

Wassalam,

-MJR-


Pada 21 Februari 2014 09.55, Ahmad Syaifullah Lubis
syaiful...@hotmail.commenulis:



 Indahnya sebuah kebersamaan, meskipun saya tidak mengetahui sosok beliau,
 namun sebagai bentuk simpati saya pada millis/komunitas BeExcel, mohon
 titip salam saya untuk Pak Alif Akbar ya, semoga cepat sembuh.
 salam,
 ASL

 --
 To: belajar-excel@yahoogroups.com
 From: dwint.ruswa...@gmail.com
 Date: Thu, 20 Feb 2014 21:13:37 +0700
 Subject: Re: [belajar-excel] Mari kita do'akan tuk kesembuhan Pak Alif
 Akbar




 Rekans,
 Ada yang mau jenguk pak Aliif? Insya Allah saya bisa hari sabtu atau hari
 minggu.
 Wassalam,
 -dwint-
 On Feb 20, 2014 9:05 PM, indradjaja8...@yahoo.com 
 indradjaja8...@yahoo.com wrote:



 Dear para member milis excel,

 Mari kita do'akan tuk kesembuhan Pak Alif akbar yg sdh 2 hr ini sedang
 sakit thypus.

 Sy mengetahuinya dr picpro WA beliau. Sptnya beliau dirawat di RS.

 Dikirim dari Yahoo Mail pada 
 Androidhttps://id.overview.mail.yahoo.com/mobile/?.src=Android

Re: [belajar-excel] mengatur agar lebar cell menyesuaikan isinya

waduh.. kalo diMerge susah atuh ko @_@

tapi coba script yang ini ya..

Private Sub Worksheet_Change(ByVal Target As Range)

' (0-0) deklarasi semua variable yang diperlukan
Dim sRowHeight As Single, sColWidth As Single, sMergeWidth As Single
Dim rgCell As Range, rgEachCell As Range, rgMerge As Range

' (1) fokus pada cel 1 kolom di sebelah kanan target
With Target.Offset(, 1)

' (2) cek apakah cel tersebut diMerge
If .MergeCells Then

' (3) jika masuk ke baris ini maka cel diMerge
' set lokasi cel pertama yang diMerge
' yaitu cel paling kiri atas
Set rgCell = .Cells(1, 1)

' (4) simpan lebar kolom ke variabel sColWidth
sColWidth = rgCell.ColumnWidth

' (5) set area yang diMerge
Set rgMerge = rgCell.MergeArea

' (6) simpan lebar kolom hasil Merge
For Each rgEachCell In rgMerge.Cells
sMergeWidth = sMergeWidth + rgEachCell.ColumnWidth
Next

' (7) matikan screen update
Application.ScreenUpdating = False

' (8) hilangkan dahulu Merge Cel-nya
rgMerge.MergeCells = False

' (9) ubah lebar cell yang paling kiri atas
' yang tadi sudah di set pada script (3)
' dengan total lebar kolom Merge Cell pada script (6)
rgCell.ColumnWidth = sMergeWidth

' (10) atur tinggi baris secara otomatis
rgCell.EntireRow.AutoFit

' (11) simpan nilai tinggi baris ke dalam variabel sRowHeight
sRowHeight = rgCell.RowHeight

' (12) kembalikan ukuran lebar kolom yang paling kiri atas
rgCell.ColumnWidth = sColWidth

' (13) kembalikan lagi cel yang diMerge
rgMerge.MergeCells = True

' (14) atur tinggi baris cel yang diMerge sesuai script (11)
rgMerge.RowHeight = sRowHeight

' (15) tampilkan hasil perubahan
Application.ScreenUpdating = True

' (16) akhir pengecekan Merge Cel
End If

' (17) akhir bekerja pada 1 kolom di sebelah kanan target
End With

' (18) akhir dari prosedur event
End Sub


Wassalam,

-Miss Jan Raisin-


Pada 20 Februari 2014 16.19, Liem Suliem liemsul...@yahoo.co.id menulis:



 maaf mis ternyata datanya formatnya marge centre (3 cel jadi 1)
 makro sudah saya rubah


 Private Sub Worksheet_Change(ByVal Target As Range)
 If Not Intersect(Target, Range(D11:D40)) Is Nothing Then
 Target.MergeCells = True

 Target.WrapText = True
 Target.EntireRow.AutoFit
 End If
 End Sub


 masih belum bisa.. mohon pecerahan..

Re: RE: [belajar-excel] Mari kita do'akan tuk kesembuhan Pak Alif Akbar

Wa'alaikumsalam wr. wb.,

Alhamdulillah pak Aliif sudah boleh pulang dari rumah sakit..
semoga cepat pulih dan segera bisa beraktifitas kembali pak.. Aamiin

Wassalam,

-Miss Jan Raisin-



Pada 21 Februari 2014 10.21, Aliif Akbar aliif.ak...@yahoo.co.id menulis:



 Assalamualaikum,
 Selamat pagi rekan2 semua,

 Terimakasih untuk doanya, alhamdulillah, dokter visit sudah mengijinkan
 saya pulang dari RS.
 In syaa Allah siang ini bisa pulang dri RS.
 Sekali lagi terimakasih.

 Aliif Akbar
 Sent from Yahoo Mail on 
 Androidhttps://overview.mail.yahoo.com/mobile/?.src=Android

  --
 * From: * Ahmad Syaifullah Lubis syaiful...@hotmail.com;
 * To: * belajar-excel@yahoogroups.com;
 * Subject: * RE: [belajar-excel] Mari kita do'akan tuk kesembuhan Pak
 Alif Akbar
 * Sent: * Fri, Feb 21, 2014 2:55:16 AM



 Indahnya sebuah kebersamaan, meskipun saya tidak mengetahui sosok beliau,
 namun sebagai bentuk simpati saya pada millis/komunitas BeExcel, mohon
 titip salam saya untuk Pak Alif Akbar ya, semoga cepat sembuh.
 salam,
 ASL

 --
 To: belajar-excel@yahoogroups.com
 From: dwint.ruswa...@gmail.com
 Date: Thu, 20 Feb 2014 21:13:37 +0700
 Subject: Re: [belajar-excel] Mari kita do'akan tuk kesembuhan Pak Alif
 Akbar



 Rekans,
 Ada yang mau jenguk pak Aliif? Insya Allah saya bisa hari sabtu atau hari
 minggu.
 Wassalam,
 -dwint-
 On Feb 20, 2014 9:05 PM, indradjaja8...@yahoo.com 
 indradjaja8...@yahoo.com wrote:



 Dear para member milis excel,

 Mari kita do'akan tuk kesembuhan Pak Alif akbar yg sdh 2 hr ini sedang
 sakit thypus.

 Sy mengetahuinya dr picpro WA beliau. Sptnya beliau dirawat di RS.

 Dikirim dari Yahoo Mail pada 
 Androidhttps://id.overview.mail.yahoo.com/mobile/?.src=Android

Re: [belajar-excel] Cara Membuat Struktur Organisasi di Excel

hai Fefe,

Jika tidak memiliki Visio sesuai saran pak Hendrik, silakan coba free ware
yang bernama XMind
bisa diunduh melalui link berikut ini:
http://www.xmind.net/

Untuk yang versi Pro (berbayar) hasilnya bisa diexport ke Excel juga

Wassalam,

-Miss Jan Raisin-



Pada 19 Februari 2014 23.01, hendrik karnadi hendrikkarn...@yahoo.commenulis:



 Hai Fefe,
 Bikin struktur organisasi pake Excel rada ribet untuk nyusun kotaknya,
 Tulis Nama dan Titelnya maupun ngelink ke kotak sub ordinatenya.

 Saran saya, kalau memang mau lebih bagus dan fleksibel, sebaiknya pakai
 Visio yang (setahu saya) memang difokuskan untuk flow chart maupun struktur
 organisasi.

 Mengenai Tutorial, coba iseng2 cari di internet, siapa tahu ada yang
 pernah membuatnya.

 Salam,
 HK


   On Wednesday, 19 February 2014, 22:17, Febrian Yoshi febr...@gmail.com
 wrote:

  Dear Para Master,
 Mohon pencerahannya,adakah tutorial yg mudah dipelajari untuk membuat
 struktur organisasi di excel?

 Terimakasih banyak sebelumnya..

 Regards,
 Fefe

 _._,_.___

Re: [belajar-excel] RE: Makro utk refresh sort data di table

coba copas script ini ke sebuah modul, lalu assign macro ke tombol yang
sudah anda buat sebelumnya:

Sub RefreshData()
Dim rgStuf As Range, xStuf As Range
Dim rgData As Range, rgHelper As Range
Dim lRow As Long

' pasang Helper di kolom A
Range(a3).Value = Helper  ' judul header Helper
Set rgStuf = Range(l4)
Set rgStuf = Range(rgStuf, rgStuf.End(xlDown))' set area sisa
Stuffing
For Each xStuf In rgStuf
With xStuf
lRow = .Row   ' ambil nomor
barisnya dulu
If .Value = -2 And .Value = 0 Then
Cells(lRow, 1).Value = 1  ' ini yang warna merah
ElseIf .Value = -5 And .Value = -3 Then
Cells(lRow, 1).Value = 2  ' ini yang warna
kuning
ElseIf .Value  -5 Then
Cells(lRow, 1).Value = 3  ' ini yang warna hijau
Else
Cells(lRow, 1).Value = 4  ' ini yang gak
diwarnain
End If
End With
Next xStuf

' urutkan datanya
Set rgData = Range(a3).CurrentRegion.Offset(1)
rgData.Sort key1:=Range(a3), order1:=xlAscending, key2:=Range(k3),
order2:=xlDescending, Header:=xlYes

' hapus isi kolom helper
Set rgHelper = Range(a3).CurrentRegion.Offset(1).Resize(, 1)
rgHelper.ClearContents

' refresh pivot tablenya
Sheet1.PivotTables(PivotTable1).PivotCache.Refresh
End Sub

Wassalam,

-Miss Jan Raisin-


Pada 20 Februari 2014 13.27, Mulki mu...@aop.component.astra.co.idmenulis:



  Bisa kasih contoh makronya pak summonery ?
 Saya blm ada gambaran seperti apa dan blm pernah coba makro jg ?

 Sedangkan utk sort berdasarkan warna harapan saya bisa menggunakan makro
 jg pak saat tombol REFRESH dipencet.
 Jadi tombol REFRESH tesbt bisa utk men-SORT data dan me-REFRESH Graphic
 dibawahnya.

 Mohon bantuannya pak summonery.

 Terimakasih atas pencerahannya.


 Wassalam,
 Mulki


 - Original Message -
 *From:* summon...@yahoo.com
 *To:* belajar-excel@yahoogroups.com
 *Sent:* Thursday, February 20, 2014 12:07 PM
 *Subject:* [belajar-excel] RE: Makro utk refresh  sort data di table



 Wlkmslm wr wb.

 Pak Mulki bisa membuat macro dimulai dengan merekamnya.
 Atau dalam hal refresh all bisa menggunakan shortcut key Ctrl+Alt+F5
 Untuk sort berdasarkan warna -- Sort by Color -- Custom Sort -- Sort on
 Cell Color

 semoga bermanfaat

Re: [belajar-excel] Sorting data tanpa filter

hai Kesi,

coba gunakan fitur Pivot table, lalu atur letak datanya seperti ini:
[image: Gambar sisip 3]

lakukan filter dengan menghilangkan tanda cek list pada nilai 0 (Nol)
cara pembuatan Pivot Table yang lengkap bisa dibaca di blognya mr. Kid.

Wassalam,

-Miss Jan Raisin-


Pada 20 Februari 2014 13.24, KESI VIZZIANTI kesi.vizzia...@gmail.commenulis:



 Saya mempunyai data seperti disamping kiri ===,dan akan terus di
 updated, dan bermaksud meringkas di kolom atas ini. TANPA menggunaka filter
 dengan ketentuan

 1.Hanya menampilkan 1 part no saja  dan jumlah akan di totalkan (sumif)

 2. jika hasil dari total penjumlahan adalah kurang dari = 0 maka data
 tidak di tampilkan

 Terima kasih
 Salam



inline: pict-001.png

Re: [belajar-excel] apa arti false atau true dalam vlookup

Hai Liem,

syntax VLookUp adalah sbb:

=VLookUp( nilai_yg_dicari , range_pencarian ,
indeks_kolom_yang_diambil , jenis_lookupnya
)

Jenis lookup ada 2 yaitu:

   1. 0 (nol) atau False
   2. 1 (satu) atau TRUE

Jenis lookup:

   1. FALSE
   - Data boleh tidak diurutkan
  - Akan mencari nilai yang sama persis
  - Jika tidak menemukan nilai yang sama akan menampilkan error #N/A
  - Contoh penggunaan: pencarian Nomer Induk Pegawai
   2. TRUE
   - Data *HARUS* diurutkan secara Ascending (dari kecil ke besar atau dari
  A ke Z)
  - Akan mencari nilai yang sama persis
  - Jika tidak menemukan nilai yang sama akan menampilkan data
  sebelumnya
  - contoh penggunaan: pemberian diskon untuk pembelian dengan jumlah
  tertentu, qty 1 - 10 = 1%, 11 - 30 = 3% dst

Semoga penjelasan ini dapat dipahami.

Wassalam,

-Miss Jan Raisin-




Pada 20 Februari 2014 13.42, Liem Suliem liemsul...@yahoo.co.id menulis:



 salam be exceler

 dear suhu apa ya arti true atau false dalam rumus vlookup

 misal
 =VLOOKUP(B6,E$6:G$11,2,FALSE)


 wasalam
 liem

  _

Re: [belajar-excel] Mapping Data

Hai Agung,

coba download dan pelajari file yang bernama : *MJR-Search Engine_v2.xlsb*
di link :
http://milis-belajar-excel.1048464.n5.nabble.com/belajar-excel-Cara-Membuat-Search-Engine-td5719606.html#a5719615

Wassalam,

-Miss Jan Raisin-


Pada 17 Februari 2014 14.53, agungtrisaks...@yahoo.co.id menulis:



 Dear Para Master,

 Lagi Belajar Excel nih Sambil Kerja, , ,,
 Agak Bingung juga dengan rumus2 excel,,,
 Mohon Bantuan  Penjelasanya, Biar tambah iLmu. . .


 Thanks, B'Regard
 Agung

Re: [belajar-excel] Macro Excel di Web Apps

Hai Kiki,

sependek pengetahuan Jan, skydrive tidak mendukung file dengan maro
embeded, jika ingin tetap melakukan kolaborasi dengan user lain menggunakan
web app mungkin bisa mencoba GDoc, hanya saja macronya harus ditulis ulang
dengan bahasa Java.
cmiiw,

Mungkin mr. Kid, pak Anton, dan pak De Premor yang merupakan para pakar IT
bisa memberikan masukkan tambahan.

Wassalam,

-Miss Jan Raisin-


Pada 15 Februari 2014 15.38, kiek...@yahoo.com menulis:



 Dear BeExceller
 Salam hormat dari saya..
 Mohon petunjuknya, apakah file excel kita yang berisi macro tidak dapat
 running di excel web apps (microsoft skydrive).
 Bagaimana solusinya jika file yang berisi macro itu merupakan file
 kolaborasi beberapa users dan tetap ingin menggunakan excel web apps. Jika
 macro-macro itu di ubah menjadi rumus-rumus formula, maka ukuran file
 menjadi membengkak.
 Demikian pertanyaan saya yang sangat awam ini.
 Thanks so much

Re: [belajar-excel] RE: Mapping Data

hai Agung,

jawabannya : Bisa
tapi inputan yang awalnya di cel harus dipindah ke sebuah Text box yang
memiliki event KeyDown (mendeteksi tombol keyboard yang ditekan)
Key Code untuk tombol Enter adalah 13

scriptnya sbb:

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal
Shift As Integer)
If KeyCode = 13 Then
' di sini adalah prosedur yang akan dilakukan
End If
End Sub

silakan disesuaikan dengan kasus anda

Wassalam,

-Miss Jan Raisin-



Pada 18 Februari 2014 07.37, agungtrisaks...@yahoo.co.id menulis:



 Dear Miss Jan Raisin,
 Thanks, atas solusinya, , ,
 kalau shape/tombol CARI bisa gak diagnti dengan ENTER(Keyborad)
 Kalau bisa gmn caranya??

 Thanks,B'regard
 Agung

Re: Re: Re: [belajar-excel] Sumif vlookup