[belajar-excel] Digest Number 2573

Milis Belajar Microsoft Excel Group

14 New Messages

Digest #2573

1a

Re: Membuat Nomor Urut Invoice by "Jan Raisin"

1b

Re: Membuat Nomor Urut Invoice by "dwi mulyaningsih" upiet29

1c

Re: Membuat Nomor Urut Invoice by "dwi mulyaningsih" upiet29

1d

Bls: [belajar-excel] Membuat Nomor Urut Invoice by "dwint ruswanto" dwint.ruswanto

1e

Re: Bls: [belajar-excel] Membuat Nomor Urut Invoice by "dwi mulyaningsih" upiet29

2a

Re: Rumus Index Match tidak bisa dicopy ke cell lain (muncul reff) by "ivan budiman" ivanstats

3a

Re: Rumus Index Match tidak bisa dicopy ke cell lain (muncul reff) [ by "Bagus" bagus4bls

4a

Re: gimana caranya memindahkan dan merubah suatu kolom yang berisi d by dwint.ruswanto

5a

Bls: [belajar-excel] warning data sama dan tampilkan data sama sebel by "dwint ruswanto" dwint.ruswanto

6a

cara membuar coding pada combobox dan text box by "Iga Aprilia" iga.april

6b

Re: cara membuar coding pada combobox dan text box [1 Attachment] by "hendrik karnadi" hendrikkarnadi

6c

Re: cara membuar coding pada combobox dan text box [1 Attachment] by "Jan Raisin"

7a

Re: Langsung masuk ke sheet yang diinginkan [1 Attachment] by "hendrik karnadi" hendrikkarnadi

7b

Re: Langsung masuk ke sheet yang diinginkan [1 Attachment] by "Bagus" bagus4bls

Messages

1a

Re: Membuat Nomor Urut Invoice

Tue Oct 1, 2013 11:55 pm (PDT) . Posted by:

"Jan Raisin"

Hai Dwi,

sesuai dengan saran dari om Momod, coba tolong dilampirkan workbook yang
error tersebut disertai screen shot saat terjadinya error
hal tersebut akan lebih memudahkan Be-Exceller untuk menemukan solusi yang
sesuai..
kalo seperti ini keadaannya.. seperti main tebak-tebak buah manggis
xixixixi ^_^

ditunggu file dan screen shotnya ya..

Salam,

-Miss Jan Raisin-

Pada 2 Oktober 2013 12.07, dwi mulyaningsih <upiet29@yahoo.com> menulis:

> **
>
>
> Miss Jan,
>
> Saya sudah rubah formatnya menjadi General, tapi setelah itu keluar command
> 'formula you type contains an error' dan menunjuk ke nilai " yang ada
> setelah (T1,"000")
>
> ------------------------------
> *From:* Jan Raisin <miss.jan.raisin@gmail.com>
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Wednesday, October 2, 2013 11:21 AM
>
> *Subject:* Re: [belajar-excel] Membuat Nomor Urut Invoice
>
>
> Hai Dwi,
>
> coba pada cel O10 sheet Page 1 diubah dahulu formatnya, dari Text menjadi
> General
> setelah itu masukkan kembali formula dari mr Kid
>
> jika regional setting komputer setempat adalah Indonesian, maka ganti
> seluruh tanda koma
> pada formula tersebut menjadi titik koma
>
> Salam,
>
>
> -Miss Jan Raisin-
>

Reply to sender . Reply to group . Reply via Web Post . All Messages (16) . Top ^

1b

Re: Membuat Nomor Urut Invoice

Tue Oct 1, 2013 11:55 pm (PDT) . Posted by:

"dwi mulyaningsih" upiet29

itu bukan Dim NewFN tapi Dlm NewFN
Saya coba buat otomatis tersimpan ke folder tersebut dengan nama sesuai nomor invoicenya.
Kalau untuk faktur pajak saya sudah berhasil tapi untuk invoice belum bisa karena nomor invoice variabel (bukan cuma angka).
Sekarang lagi mau coba untuk nomor invoicenya.

________________________________
From: lapendosol opik <lapendosol@yahoo.com>
To: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Sent: Wednesday, October 2, 2013 9:43 AM
Subject: Re: [belajar-excel] Membuat Nomor Urut Invoice


 
Makasih penjelasannya,
Dim NewFN nya ga masalah ya?
Biasanya booking Dim selalu diakhiri kartu As, As String, As Kriting, As Sekop dan As As yg lain hehehe.
Wassalam,

________________________________
From: dwi mulyaningsih <upiet29@yahoo.com>
To: belajar-excel@yahoogroups.com
Sent: Wednesday, October 2, 2013 8:44 AM
Subject: Re: [belajar-excel] Membuat Nomor Urut Invoice


 
Dear opik,

saya panggil opik aja ya.
untuk script yang anda sebutkan :
Dlm NewFN = "D:\DWi's FIle\DATA APP 2013\Invoice&#92;Inv" & Range("O10").Value & ".xlsx"
ActiveWorkbook.SaveAs NewFN, FileFormat:=xlOpenXMLWorkbook
ActiveWorkbook.Close
NomorInvoiceOtomatis

Itu untuk save as otomatis dengan nama sesuai nomor invoicenya

Wassalam

________________________________
From: lapendosol opik <lapendosol@yahoo.com>
To: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Sent: Tuesday, October 1, 2013 7:15 PM
Subject: Re: [belajar-excel] Membuat Nomor Urut Invoice


 
Woalah maap yak ga liat tabel Nomer Sales Order, jebulannya ada di sheet1.
Oke ditambahkan di step3
=VLOOKUP('Page 1'!D10,Sheet1!C4:E6,3)

Step5 nya jadi
=TEXT(LEFT(B2,3)+1,"000")&"/"&VLOOKUP(MONTH(NOW()),D2:E13,2)&"/"&VLOOKUP('Page 1'!D10,Sheet1!C4:E6,3)&"/"&RIGHT(YEAR(NOW()),2)

NB:
Tombol simpannya silahkan disesuaikan dengan kebutuhan biar berjalan sesuai keinginan terutama discript:
Dlm NewFN = "D:\DWi's FIle\DATA APP 2013\Invoice&#92;Inv" & Range("O10").Value & ".xlsx"
ActiveWorkbook.SaveAs NewFN, FileFormat:=xlOpenXMLWorkbook
ActiveWorkbook.Close
NomorInvoiceOtomatis

Saya belum paham yg begituan dan ga ngerti maksudnya buat ngapain.

________________________________
From: lapendosol opik <lapendosol@yahoo.com>
To: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Sent: Tuesday, October 1, 2013 6:27 PM
Subject: Re: [belajar-excel] Membuat Nomor Urut Invoice [1 Attachment]


 
Hai Dwi,
Data yg dikirim kurang lengkap, difile yg dikirim ga ada tabel Nomer Sales Order, jadi silahkan utak atik sendiri ya.
Berikut solusi dari saya semoga bisa bermanfaat:
Buatkan sheet bantuan tersendiri untuk pembuatan/pergantian Nomer Invoice
Buatkan tabel bantuan pembuatan kode Romawi
Step 1: pembuatan nomer invoice 3digit
misal nomer invoice lengkap ada di cell B2
=TEXT(LEFT(B2,3)+1,"000")

Step 2: pembuatan romawi bulan sekarang

Buatkan tabel bantuan romawi misal ada di cell D2:E13
=VLOOKUP(MONTH(NOW()),D2:E13,2)

Step 3: pembuatan nomer sales order
Karena ga ada contoh sales order silahkan otak atik sendiri yg ini

Step 4: pembuatan 2digit tahun yg sekarang

=RIGHT(YEAR(NOW()),2)

Step 5: gabungkan step-step diatas
=TEXT(LEFT(B2,3)+1,"000")&"/"&VLOOKUP(MONTH(NOW()),D2:E13,2)&"/039/"&RIGHT(YEAR(NOW()),2)

Step 6: pindahkan dari tabel bantuan pembuatan invoice tersebut ke module simpan
Semoga bermanfaat
Wassalam,

________________________________
From: dwi mulyaningsih <upiet29@yahoo.com>
To: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Sent: Tuesday, October 1, 2013 4:49 PM

Subject: [belajar-excel] Membuat Nomor Urut Invoice [1 Attachment]


 
Dear Pakar Excel,

Saya mau membuat nomor invoice yang secara otomatis nomornya akan berubah pada saat tombol simpan diklik. Permasalahannya bagaimana membuat format nomor invoicenya agar otomatis akan bertambah satu digit. Format nomor invoicenya adalah 002/VIII/041/13 dimana 002 adalah nomor urut invoice, VIII adalah bulan, 041 adalah nomor sales order, dan 13 adalah 2 digit tahun.
untuk customernya bagaimana agar otomatis bisa diisi, master data customer ada di sheet 1.

Salam
Dwi

Reply to sender . Reply to group . Reply via Web Post . All Messages (16) . Top ^

1c

Re: Membuat Nomor Urut Invoice

Wed Oct 2, 2013 1:12 am (PDT) . Posted by:

"dwi mulyaningsih" upiet29

Miss Jan,
Terlampir screen shotnya
Salam

----------------------------------- Mods
------------------------------------------
lampiran dilepas dari email karena ukurannya 445,1KB melebihi
batas
yang diizinkan oleh milis yaitu sebesar 250Kb
silakan kirim screen shoot dengan cara antara lain sbb:
1. ubah tipe file agar ukuran file menjadi lebih kecil
2. hapus data yang tidak diperlukan
3. masukkan ss ke dalam body email
4. kompres file dengan WinRar, WinZip, 7Zip dsb sehingga mencapai
    ukuran yang diperbolehkan
5. berikan link unduh pada situs penyimpanan data online seperti
box.com
-----------------------------------------------------------------&#92;
-------------------------


From: Jan Raisin
To: belajar-excel@yahoogroups.com
Sent: Wednesday, October 2, 2013 1:55 PM
Subject: Re: [belajar-excel] Membuat Nomor Urut Invoice

  Hai Dwi,
sesuai dengan saran dari om Momod, coba tolong dilampirkan
workbook yang error tersebut disertai screen shot saat terjadinya
errorhal tersebut akan lebih memudahkan Be-Exceller untuk
menemukan solusi yang sesuai.. kalo seperti ini keadaannya..
seperti main tebak-tebak buah manggis xixixixi ^_^
ditunggu file dan screen shotnya ya..
Salam,


-Miss Jan Raisin-

Pada 2 Oktober 2013 12.07, dwi mulyaningsih <upiet29@yahoo.com
<mailto:upiet29@yahoo.com> > menulis:
  Miss Jan,
Saya sudah rubah formatnya menjadi General, tapi setelah itu
keluar command 'formula you type contains an error' dan
menunjuk ke nilai " yang ada setelah (T1,"000")
From: Jan Raisin <miss.jan.raisin@gmail.com
<mailto:miss.jan.raisin@gmail.com> >
To: belajar-excel@yahoogroups.com
<mailto:belajar-excel@yahoogroups.com>
Sent: Wednesday, October 2, 2013 11:21 AM
Subject: Re: [belajar-excel] Membuat Nomor Urut Invoice

  Hai Dwi,
coba pada cel O10 sheet Page 1 diubah dahulu formatnya, dari Text
menjadi Generalsetelah itu masukkan kembali formula dari mr Kid
jika regional setting komputer setempat adalah Indonesian, maka
ganti seluruh tanda koma pada formula tersebut menjadi
titik koma
Salam,

-Miss Jan Raisin-
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496 --
#ygrps-yiv-2793100yiv4250481496ygrp-mkp { border:1px solid
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-mkp hr { border:1px solid
#d8d8d8;} #ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-mkp
#ygrps-yiv-2793100yiv4250481496hd {
color:#628c2a;font-size:85%;font-weight:700;line-height:122%;marg&#92;
in:10px 0;} #ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-mkp
#ygrps-yiv-2793100yiv4250481496ads { margin-bottom:10px;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-mkp
.ygrps-yiv-2793100yiv4250481496ad { padding:0 0;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-mkp
.ygrps-yiv-2793100yiv4250481496ad p { margin:0;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-mkp
.ygrps-yiv-2793100yiv4250481496ad a {
color:#0000ff;text-decoration:none;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-sponsor
#ygrps-yiv-2793100yiv4250481496ygrp-lc { font-family:Arial;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-sponsor
#ygrps-yiv-2793100yiv4250481496ygrp-lc
#ygrps-yiv-2793100yiv4250481496hd { margin:10px
0px;font-weight:700;font-size:78%;line-height:122%;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-sponsor
#ygrps-yiv-2793100yiv4250481496ygrp-lc
.ygrps-yiv-2793100yiv4250481496ad { margin-bottom:10px;padding:0
0;} #ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496actions {
font-family:Verdana;font-size:11px;padding:10px 0;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496activity {
background-color:#e0ecee;float:left;font-family:Verdana;font-size&#92;
:10px;padding:10px;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496activity span { font-weight:700;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496activity span:first-child {
text-transform:uppercase;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496activity span a {
color:#5085b6;text-decoration:none;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496activity span span {
color:#ff7900;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496activity span
.ygrps-yiv-2793100yiv4250481496underline {
text-decoration:underline;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
.ygrps-yiv-2793100yiv4250481496attach {
clear:both;display:table;font-family:Arial;font-size:12px;padding&#92;
:10px 0;width:400px;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
.ygrps-yiv-2793100yiv4250481496attach div a {
text-decoration:none;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
.ygrps-yiv-2793100yiv4250481496attach img {
border:none;padding-right:5px;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
.ygrps-yiv-2793100yiv4250481496attach label {
display:block;margin-bottom:5px;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
.ygrps-yiv-2793100yiv4250481496attach label a {
text-decoration:none;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496 blockquote { margin:0 0 0 4px;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
.ygrps-yiv-2793100yiv4250481496bold {
font-family:Arial;font-size:13px;font-weight:700;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
.ygrps-yiv-2793100yiv4250481496bold a { text-decoration:none;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
dd.ygrps-yiv-2793100yiv4250481496last p a {
font-family:Verdana;font-weight:700;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
dd.ygrps-yiv-2793100yiv4250481496last p span {
margin-right:10px;font-family:Verdana;font-weight:700;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
dd.ygrps-yiv-2793100yiv4250481496last p
span.ygrps-yiv-2793100yiv4250481496yshortcuts { margin-right:0;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
div.ygrps-yiv-2793100yiv4250481496attach-table div div a {
text-decoration:none;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
div.ygrps-yiv-2793100yiv4250481496attach-table { width:400px;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
div.ygrps-yiv-2793100yiv4250481496file-title a,
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
div.ygrps-yiv-2793100yiv4250481496file-title a:active,
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
div.ygrps-yiv-2793100yiv4250481496file-title a:hover,
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
div.ygrps-yiv-2793100yiv4250481496file-title a:visited {
text-decoration:none;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
div.ygrps-yiv-2793100yiv4250481496photo-title a,
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
div.ygrps-yiv-2793100yiv4250481496photo-title a:active,
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
div.ygrps-yiv-2793100yiv4250481496photo-title a:hover,
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
div.ygrps-yiv-2793100yiv4250481496photo-title a:visited {
text-decoration:none;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
div#ygrps-yiv-2793100yiv4250481496ygrp-mlmsg
#ygrps-yiv-2793100yiv4250481496ygrp-msg p a
span.ygrps-yiv-2793100yiv4250481496yshortcuts {
font-family:Verdana;font-size:10px;font-weight:normal;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
.ygrps-yiv-2793100yiv4250481496green { color:#628c2a;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
.ygrps-yiv-2793100yiv4250481496MsoNormal { margin:0 0 0 0;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496 o {
font-size:0;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496photos div {
float:left;width:72px;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496photos div div { border:1px solid
#666666;height:62px;overflow:hidden;width:62px;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496photos div label {
color:#666666;font-size:10px;overflow:hidden;text-align:center;wh\
ite-space:nowrap;width:64px;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496reco-category { font-size:77%;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496reco-desc { font-size:77%;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
.ygrps-yiv-2793100yiv4250481496replbq { margin:4px;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-actbar div a:first-child {
margin-right:2px;padding-right:5px;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-mlmsg {
font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-mlmsg table {
font-size:inherit;font:100%;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-mlmsg select,
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496 input,
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496 textarea {
font:99% Arial, Helvetica, clean, sans-serif;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-mlmsg pre, #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496 code { font:115% monospace;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-mlmsg * {
line-height:1.22em;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-mlmsg
#ygrps-yiv-2793100yiv4250481496logo { padding-bottom:10px;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-msg p a {
font-family:Verdana;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-msg
p#ygrps-yiv-2793100yiv4250481496attach-count span {
color:#1E66AE;font-weight:700;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-reco
#ygrps-yiv-2793100yiv4250481496reco-head {
color:#ff7900;font-weight:700;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-reco {
margin-bottom:20px;padding:0px;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-sponsor
#ygrps-yiv-2793100yiv4250481496ov li a {
font-size:130%;text-decoration:none;} #ygrps-yiv-2793100
#ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-sponsor
#ygrps-yiv-2793100yiv4250481496ov li {
font-size:77%;list-style-type:square;padding:6px 0;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-sponsor
#ygrps-yiv-2793100yiv4250481496ov ul { margin:0;padding:0 0 0
8px;} #ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-text { font-family:Georgia;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-text p { margin:0 0 1em 0;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-text tt { font-size:120%;}
#ygrps-yiv-2793100 #ygrps-yiv-2793100yiv4250481496
#ygrps-yiv-2793100yiv4250481496ygrp-vital ul li:last-child {
border-right:none !important;}

Reply to sender . Reply to group . Reply via Web Post . All Messages (16) . Top ^

1d

Bls: [belajar-excel] Membuat Nomor Urut Invoice

Wed Oct 2, 2013 1:32 am (PDT) . Posted by:

"dwint ruswanto" dwint.ruswanto

Hai Dwi,

ini adalah formula dari mr Kid
 =TEXT(T1,"000")&"/"&ROMAN(MONTH(O12))&"/"&IFERROR(VLOOKUP(D10,Sheet1!$C$4:$E$6,3,0),"")&"/"&TEXT(O12,"YY")

dan ini adalah formula dari screen shot yang ibu Dwi kirimkan
 =TEXT(T1,"000")"/"&ROMAN(MONTH(O12))&"/"&IFERROR(VLOOKUP(D10,Sheet1!$C$4:$E$6,3,0),"")&"/"&TEXT(O12,"YY")

perbedaannya terletak pada hilangnya tanda & yang berwarna merah

Salam,

-dwint-

________________________________
Dari: dwi mulyaningsih <upiet29@yahoo.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Rabu, 2 Oktober 2013 15:01
Judul: Re: [belajar-excel] Membuat Nomor Urut Invoice


 
Miss Jan,

Terlampir screen shotnya

Salam

----------------------------------- Mods ------------------------------------------
lampiran dilepas dari email karena ukurannya 445,1KB melebihi batas
yang diizinkan oleh milis yaitu sebesar 250Kb
silakan kirim screen shoot dengan cara antara lain sbb:
1. ubah tipe file agar ukuran file menjadi lebih kecil
2. hapus data yang tidak diperlukan
3. masukkan ss ke dalam body email
4. kompres file dengan WinRar, WinZip, 7Zip dsb sehingga mencapai
    ukuran yang diperbolehkan
5. berikan link unduh pada situs penyimpanan data online seperti box.com
----------------------------------------------------------

________________________________
From: Jan Raisin
To: belajar-excel@yahoogroups.com
Sent: Wednesday, October 2, 2013 1:55 PM
Subject: Re: [belajar-excel] Membuat Nomor Urut Invoice


 
Hai Dwi,

sesuai dengan saran dari om Momod, coba tolong dilampirkan workbook yang error tersebut disertai screen shot saat terjadinya error
hal tersebut akan lebih memudahkan Be-Exceller untuk menemukan solusi yang sesuai..
kalo seperti ini keadaannya.. seperti main tebak-tebak buah manggis xixixixi ^_^

ditunggu file dan screen shotnya ya..

Salam,

-Miss Jan Raisin-

Reply to sender . Reply to group . Reply via Web Post . All Messages (16) . Top ^

1e

Re: Bls: [belajar-excel] Membuat Nomor Urut Invoice

Wed Oct 2, 2013 2:33 am (PDT) . Posted by:

"dwi mulyaningsih" upiet29

Dear Dwint,

Oh iya, kok bisa hilang ya padahal saya copy paste rumusnya.
sudah berhasil.
Terima kasih Mr. Kid, Opik, Miss Jan dan Dwint 

Salam

________________________________
From: dwint ruswanto <dwint.ruswanto@yahoo.co.id>
To: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Sent: Wednesday, October 2, 2013 3:32 PM
Subject: Bls: [belajar-excel] Membuat Nomor Urut Invoice


 
Hai Dwi,

ini adalah formula dari mr Kid
 =TEXT(T1,"000")&"/"&ROMAN(MONTH(O12))&"/"&IFERROR(VLOOKUP(D10,Sheet1!$C$4:$E$6,3,0),"")&"/"&TEXT(O12,"YY")

dan ini adalah formula dari screen shot yang ibu Dwi kirimkan
 =TEXT(T1,"000")"/"&ROMAN(MONTH(O12))&"/"&IFERROR(VLOOKUP(D10,Sheet1!$C$4:$E$6,3,0),"")&"/"&TEXT(O12,"YY")

perbedaannya terletak pada hilangnya tanda & yang berwarna merah

Salam,

-dwint-

________________________________
Dari: dwi mulyaningsih <upiet29@yahoo.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Rabu, 2 Oktober 2013 15:01
Judul: Re: [belajar-excel] Membuat Nomor Urut Invoice


 
Miss Jan,

Terlampir screen shotnya

Salam

----------------------------------- Mods ------------------------------------------
lampiran dilepas dari email karena ukurannya 445,1KB melebihi batas
yang diizinkan oleh milis yaitu sebesar 250Kb
silakan kirim screen shoot dengan cara antara lain sbb:
1. ubah tipe file agar ukuran file menjadi lebih kecil
2. hapus data yang tidak diperlukan
3. masukkan ss ke dalam body email
4. kompres file dengan WinRar, WinZip, 7Zip dsb sehingga mencapai
    ukuran yang diperbolehkan
5. berikan link unduh pada situs penyimpanan data online seperti box.com
----------------------------------------------------------

________________________________
From: Jan Raisin
To: belajar-excel@yahoogroups.com
Sent: Wednesday, October 2, 2013 1:55 PM
Subject: Re: [belajar-excel] Membuat Nomor Urut Invoice


 
Hai Dwi,

sesuai dengan saran dari om Momod, coba tolong dilampirkan workbook yang error tersebut disertai screen shot saat terjadinya error
hal tersebut akan lebih memudahkan Be-Exceller untuk menemukan solusi yang sesuai..
kalo seperti ini keadaannya.. seperti main tebak-tebak buah manggis xixixixi ^_^

ditunggu file dan screen shotnya ya..

Salam,

-Miss Jan Raisin-

Reply to sender . Reply to group . Reply via Web Post . All Messages (16) . Top ^

2a

Re: Rumus Index Match tidak bisa dicopy ke cell lain (muncul reff)

Wed Oct 2, 2013 12:17 am (PDT) . Posted by:

"ivan budiman" ivanstats

Terima kasih Pak Bagus,
Tapi kok setelah saya copy ke bawah malah tidak match ya? malah hasilnya 7,51 untuk OTO pada nomor 20. Padahal seharusnya 3,80.
Mohon dibantu.
Terima kasih

Salam

 
Regards,
M I B

- thankfulness -

________________________________
From: Bagus <bagus@kingjim.co.id>
To: belajar-excel@yahoogroups.com
Sent: Wednesday, 2 October 2013, 13:02
Subject: Re: [belajar-excel] Rumus Index Match tidak bisa dicopy ke cell lain (muncul reff)


 
Dear MIB;
 
Bagaimana kalau rumus Index match nya diganti rumus
sumproduct saja..?
Tulis pada cell D21:
=SUMPRODUCT(1*('CEPLOK
SPSS'!$C$48:$C$92)*($C21=&#39;CEPLOK SPSS'!$E$48:$E$92)*(D$18=&#39;CEPLOK
SPSS'!$F$48:$F$92))
 
Copy paste kebawah dan kekanan
 
 
Wassalam
 
~ Bagus ~
 
----- Original Message -----
>From: ivan budiman
>To: belajar excel
>Sent: Wednesday, October 02, 2013 12:05 PM
>Subject: [belajar-excel] Rumus Index Match tidak bisa dicopy ke cell lain (muncul reff) [1 Attachment]
>
> 
>Dear master2,
>Mohon dibantu, saya mengalami kendala ketika copy rumus index match terlampir, hasilnya ko #ref! ya?
>Terima kasih
> 
>Regards,
>M I B
>
>- thankfulness -

Reply to sender . Reply to group . Reply via Web Post . All Messages (3) . Top ^

3a

Re: Rumus Index Match tidak bisa dicopy ke cell lain (muncul reff) [

Wed Oct 2, 2013 12:46 am (PDT) . Posted by:

"Bagus" bagus4bls

Dear MIB

Kayaknya perlu ditambahkan satu kolom pada sheet "CEPLOK SPSS"
yaitu kolom "kategori";

karena hasil yg 7.15 pada OTO itu adalah hasil penjumlahan leasing mobil+leasing motor yg sama2 OTO

Wassalam

~ Bagus ~

----- Original Message -----
From: ivan budiman
To: belajar-excel@yahoogroups.com
Sent: Wednesday, October 02, 2013 2:17 PM
Subject: Re: [belajar-excel] Rumus Index Match tidak bisa dicopy ke cell lain (muncul reff) [1 Attachment]

Terima kasih Pak Bagus,
Tapi kok setelah saya copy ke bawah malah tidak match ya? malah hasilnya 7,51 untuk OTO pada nomor 20. Padahal seharusnya 3,80.
Mohon dibantu.
Terima kasih

Salam

Regards,
M I B

- thankfulness -

----------------------------------------------------------
From: Bagus <bagus@kingjim.co.id>
To: belajar-excel@yahoogroups.com
Sent: Wednesday, 2 October 2013, 13:02
Subject: Re: [belajar-excel] Rumus Index Match tidak bisa dicopy ke cell lain (muncul reff)

Dear MIB;

Bagaimana kalau rumus Index match nya diganti rumus sumproduct saja..?
Tulis pada cell D21:
=SUMPRODUCT(1*('CEPLOK SPSS'!$C$48:$C$92)*($C21=&#39;CEPLOK SPSS'!$E$48:$E$92)*(D$18=&#39;CEPLOK SPSS'!$F$48:$F$92))

Copy paste kebawah dan kekanan

Wassalam

~ Bagus ~

----- Original Message -----
From: ivan budiman
To: belajar excel
Sent: Wednesday, October 02, 2013 12:05 PM
Subject: [belajar-excel] Rumus Index Match tidak bisa dicopy ke cell lain (muncul reff) [1 Attachment]

Dear master2,
Mohon dibantu, saya mengalami kendala ketika copy rumus index match terlampir, hasilnya ko #ref! ya?
Terima kasih

Regards,
M I B

- thankfulness -

Reply to sender . Reply to group . Reply via Web Post . All Messages (3) . Top ^

4a

Re: gimana caranya memindahkan dan merubah suatu kolom yang berisi d

Wed Oct 2, 2013 12:49 am (PDT) . Posted by:

dwint.ruswanto

Hai Ferry,




formula dari Miss Jan dan pak Bagus tidak ada yang salah dan
berlaku untuk penulisan hasil di sheet mana pun juga.




mungkin yang belum dijelaskan secara detail adalah cara
penulisannya.

Jadi, untuk penulisan sort data menggunakan array formula tsb
adalah sbb:

1. Blok 8 baris x 1 kolom, oleh sebab itu formula ini dinamakan
blok array formula sekolom

2. pada formula bar, masukkan formula dari pak Bagus atau Miss
Jan

3. pada formula yang berbunyi Row(..:..) harus diisi dengan angka
1 dan banyaknya baris data

oleh sebab itu maka formula tersebut diisi dengan Row(1:8)

4. tekan tombol CTRL Shift Enter




untuk mengetes bahwa formula pada sampel workbook dari Miss Jan
adalah berupa blok Array Formula, silakan coba hapus salah satu
cel atau beberapa cel pada C2 sampai C9, akan muncul peringatan
bahwa part of array tidak bisa diubah.

Semoga penjelasan ini bermanfaat.




Salam,


-dwint-

---In belajar-excel@yahoogroups.com,
<belajar-excel@yahoogroups.com> wrote:

Terima kasih Miss Jain & Mas Bagus

maaf nambah lagi, jika hasil pada sheet yang berbeda seperti
contoh pada file attach, hasilnya kok beda ya Miss Jain, ?

Reply to sender . Reply to group . Reply via Web Post . All Messages (6) . Top ^

5a

Bls: [belajar-excel] warning data sama dan tampilkan data sama sebel

Wed Oct 2, 2013 1:02 am (PDT) . Posted by:

"dwint ruswanto" dwint.ruswanto

Hai Marone,

Sekedar pendapat pribadi saya, pada kasus ini hanya diperlukan 2 buah tombol saja yaitu Batal dan Lanjut, karena pada saat ada nilai yang sama secara otomatis akan ditampilkan nilai-nilai yang sama, sehingga user hanya perlu untuk melanjutkan atau membatalkan inputan data.

scriptnya sbb:

ditulis pada sheet1:
====================
Private Sub Worksheet_Change(ByVal Target As Range)
Dim rgNilai As Range, celNilai As Range
Dim lRow As Long
Dim iCount As Integer

With Target
    If .Count = 1 Then
        If .Column = 3 And .Row > 2 Then
            lRow = Cells(Rows.Count, 3).End(xlUp).Row
            Set rgNilai = Range(Cells(3, 3), Cells(lRow, 3))
            iCount = Application.WorksheetFunction.CountIf(rgNilai, .Value)
            If iCount > 1 Then
                For Each celNilai In rgNilai
                    If celNilai.Value = .Value Then
                        Range(celNilai.Offset(, -1), celNilai).Font.Size = 15
                        Range(celNilai.Offset(, -1), celNilai).Font.Bold = True
                        Range(celNilai.Offset(, -1), celNilai).Interior.Color = vbYellow
                    End If
                Next celNilai
                UserForm1.Show
            End If
        End If
    End If
End With
End Sub

ditulis pada user form:
=======================
Private Sub cmdLanjut_Click()
NormalLagi
Cells(lRow + 1, 2).Select
Unload Me
End Sub

Private Sub cmdStop_Click()
NormalLagi
Range(Cells(lRow, 2), Cells(lRow, 3)).ClearContents
Cells(lRow, 2).Select
Unload Me
End Sub

ditulis pada sebuah modul:
==========================
Public lRow As Long

Sub NormalLagi()
Dim rgNilai As Range, celNilai As Range

Application.ScreenUpdating = False
lRow = Cells(Rows.Count, 3).End(xlUp).Row
Set rgNilai = Range(Cells(3, 3), Cells(lRow, 3))
For Each celNilai In rgNilai
    If celNilai.Font.Bold = True Then
        Range(celNilai.Offset(, -1), celNilai).Font.Bold = False
        Range(celNilai.Offset(, -1), celNilai).Font.Size = 11
        Range(celNilai.Offset(, -1), celNilai).Interior.Color = vbWhite
    End If
Next celNilai
Application.ScreenUpdating = True
End Sub

semoga sesuai dengan harapan.

Salam,

-dwint-

________________________________
Dari: marone oke <maroneoke940@yahoo.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Rabu, 2 Oktober 2013 11:28
Judul: [belajar-excel] warning data sama dan tampilkan data sama sebelumnya [1 Attachment]


 
Dear pakar Excel...

tolong saya dibantu untuk membuat system untuk bisa memberi warning jika data sama dan menampilkan data sama

sebelumnya... (file terlampir)

terima kasih sebelumnya...

best regard

Reply to sender . Reply to group . Reply via Web Post . All Messages (2) . Top ^

6a

cara membuar coding pada combobox dan text box

Wed Oct 2, 2013 2:08 am (PDT) . Posted by:

"Iga Aprilia" iga.april

dear all

saya coba membuat sebuah user form dengan menambahkan combo box dan textbox apabila saya meng-klik combo box
maka secara otomatis pada text box  glass-name muncul nama yang ada pada database glass name.
yang ingin saya tanyakan bagaimana coding dari program tersebut tanpa menggunakan command button??

terima kasih
iga

Reply to sender . Reply to group . Reply via Web Post . All Messages (3) . Top ^

6b

Re: cara membuar coding pada combobox dan text box [1 Attachment]

Wed Oct 2, 2013 2:27 am (PDT) . Posted by:

"hendrik karnadi" hendrikkarnadi

Coba pelajari warisan si Mbah terlampir.

Salam,
HK

________________________________
From: Iga Aprilia <iga.april@yahoo.com>
To: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Sent: Wednesday, 2 October 2013, 16:05
Subject: [belajar-excel] cara membuar coding pada combobox dan text box [1 Attachment]


 
dear all

saya coba membuat sebuah user form dengan menambahkan combo box dan textbox apabila saya meng-klik combo box
maka secara otomatis pada text box  glass-name muncul nama yang ada pada database glass name.
yang ingin saya tanyakan bagaimana coding dari program tersebut tanpa menggunakan command button??

terima kasih
iga

Reply to sender . Reply to group . Reply via Web Post . All Messages (3) . Top ^

6c

Re: cara membuar coding pada combobox dan text box [1 Attachment]

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

"Jan Raisin"

Hai Iga,

coba script berikut ini:

Private Sub cboGlass_Change()
Dim idx As Integer

idx = cboGlass.ListIndex
txtGlass = Cells(idx + 2, 2).Value
End Sub

Private Sub UserForm_Activate()
Dim rgData As Range, celData As Range
Dim lRow As Long
Dim idx As Integer

lRow = Cells(Rows.Count, 1).End(xlUp).Row
Set rgData = Range(Cells(2, 1), Cells(lRow, 1))
For Each celData In rgData
cboGlass.AddItem celData.Value, idx
idx = idx + 1
Next celData
End Sub

file terlampir

Salam,

-Miss Jan Raisin-

Pada 2 Oktober 2013 16.05, Iga Aprilia <iga.april@yahoo.com> menulis:

> **
>
>
> dear all
>
> saya coba membuat sebuah user form dengan menambahkan combo box dan
> textbox apabila saya meng-klik combo box
> maka secara otomatis pada text box glass-name muncul nama yang ada pada
> database glass name.
> yang ingin saya tanyakan bagaimana coding dari program tersebut tanpa
> menggunakan command button??
>
> terima kasih
> iga
>
> _
>

Reply to sender . Reply to group . Reply via Web Post . All Messages (3) . Top ^

7a

Re: Langsung masuk ke sheet yang diinginkan [1 Attachment]

Wed Oct 2, 2013 3:27 am (PDT) . Posted by:

"hendrik karnadi" hendrikkarnadi

Jawaban terlampir menggunakan macro warisan si Mbah dengan modifikasi sana sini.
Angka2 (kelompok) 1,2,3,4,5 yang ada pada data maupun nama sheet terpaksa saya ganti menjadi jenis biaya yang ada pada Range("A1") masing2 sheet.

Hal tersebut saya lakukan karena fungsi Instr yang dipakai untuk membuat Array Unique Values membutuhkan data string bukan angka

Macronya adalah spt ini:
Sub splittable()
    ' siti Vi (updated by Hendrik)
    ' declarations of variables
    Dim RefTbl As Range
    Dim sNames As String, ArrNames
    Dim r As Long, n As Long, i As Long
    
    ' turn off dialoque
    ' freezing the screen
    Application.DisplayAlerts = False
    Application.ScreenUpdating = False
    
    ' setting data reference
    Set RefTbl = Sheets("Sheet1").Range("B3", Range("B3").End(xlDown))
    Set RefTbl = RefTbl.Resize(RefTbl.Rows.Count - 1, 3)
    
   ' creating unique list of Names
    For r = 1 To RefTbl.Rows.Count
       If InStr(1, sNames, RefTbl(r, 3) & "|") = 0 Then
          sNames = sNames & RefTbl(r, 3) & "|"
       End If
    Next
    ArrNames = Split(sNames, "|")
         
    ' split the data
    For i = LBound(ArrNames) To UBound(ArrNames) - 1
       Sheets(ArrNames(i)).Select
       n = 2
       For r = 1 To RefTbl.Rows.Count
          If RefTbl(r, 3) = ArrNames(i) Then
             n = n + 1
             RefTbl(r, 1).Resize(1, 2).Copy
             Cells(n, 2).PasteSpecial xlPasteValuesAndNumberFormats
          End If
       Next r
       Application.CutCopyMode = False
    Next i
    
    ' turn on dialoque
    ' unfreezing the screen
    Application.DisplayAlerts = True
    Application.ScreenUpdating = True
End Sub

Pertanyaannya;
Bagaimanakah penulisan macro untuk mendapatkan Array Unique Values yang berupa angka ?

Terima kasih.

Salam,
HK

________________________________
From: Topenk Baday <topenk_baday@yahoo.com>
To: belajar-excel@yahoogroups.com
Sent: Wednesday, 2 October 2013, 10:10
Subject: [belajar-excel] Langsung masuk ke sheet yang diinginkan [1 Attachment]


 
Dimohon bantuannya,

Kami lampirkan contoh permasalahan, 
Mohon "rumus excel atau makro"-nya supaya data yang diinginkan dapat masuk langsung sesuai dengan kode yang diinginkan.
Terima kasih sebelumnya.

Reply to sender . Reply to group . Reply via Web Post . All Messages (4) . Top ^

7b

Re: Langsung masuk ke sheet yang diinginkan [1 Attachment]

Wed Oct 2, 2013 4:32 am (PDT) . Posted by:

"Bagus" bagus4bls

Dear Tobad;

File terlampir tanpa macro.

Formula hanya ada pada sheet "1"..
Untuk mengisi sheet selanjutnya formulanya sama dengan yg ada di sheet "1".
(tinggal copy paste aja, dari A3:D22)

block A3:D22 tekan copy / Ctrl+C
pindah ke sheet yang mau diisi..

pada cell A3, tekan paste / Ctrl+V

Wassalam

~ Bagus ~

----- Original Message -----
From: Topenk Baday
To: belajar-excel@yahoogroups.com
Sent: Wednesday, October 02, 2013 10:10 AM
Subject: [belajar-excel] Langsung masuk ke sheet yang diinginkan [1 Attachment]

Dimohon bantuannya,

Kami lampirkan contoh permasalahan,
Mohon "rumus excel atau makro"-nya supaya data yang diinginkan dapat masuk langsung sesuai dengan kode yang diinginkan.
Terima kasih sebelumnya.

Reply to sender . Reply to group . Reply via Web Post . All Messages (4) . Top ^

Visit Your Group

>

View All Topics

>

Create New Topic

>

9 New Members

>

We are making changes based on your feedback, Thank you !

Submit Feedback

>

The Yahoo! Groups Product Blog

Check it out!

>

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

CHANGE SETTINGS

>

TERMS OF USE

>

UNSUBSCRIBE

>