Rabu, 14 Januari 2015

[belajar-excel] Digest Number 3261

15 Messages

Digest #3261
1a
Bls: [belajar-excel] Membuat fungsi IF by "Haris Rifai" haris.rifai
1b
Re: Membuat fungsi IF by "Mr. Kid" nmkid.family@ymail.com
1c
Re: Membuat fungsi IF by "Maya Nurdin" maya_reski
1e
Re: Membuat fungsi IF [1 Attachment] by "Mr. Kid" nmkid.family@ymail.com
1g
Re: Membuat fungsi IF by "Mr. Kid" nmkid.family@ymail.com
1h
Re: Membuat fungsi IF by "Mr. Kid" nmkid.family@ymail.com
5a
Re: Tanya - Pivotable [1 Attachment] by "Mr. Kid" nmkid.family@ymail.com
6a
Re: Combine PO-INV [1 Attachment] by "Mr. Kid" nmkid.family@ymail.com

Messages

Tue Jan 13, 2015 4:07 am (PST) . Posted by:

"Haris Rifai" haris.rifai

Met malem mbak Maya.
Coba formulasi ini +IF(AND(B3>3543750,B3<4725000),3543750*5%,IF(B3>4724999,4725000*5%,0))Kita anggap Gaji ada pada kolom B.
Semoga bisa membantu.
Salam Belajar Excel.Haris

Pada Selasa, 13 Januari 2015 18:37, "Jack Carmelo jackcarmelo@yahoo.co.id [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:


  Mat mlam mbak Maya
Mohon di koreksi sedikit. Bukannya dari contoh yang diberikan sama saja dengan semuanya dikali 5%? Karena >=3.543.750 /<4.725.000 dan >=4.725.000 berarti sama saja dengan >=3.543.750?
Jadi 2 kriteria sbnrx bisa dibuatkan 1 kriteria dan semuanya *5%.
Mohon koreksinya.--
Salam Sehat Selalu Dari Papua Timika
Jack
Selasa, 13 Januari 2015, 07:04PM +0900 dari "maya nurdin maya.nurdin@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com>: 
Dear para master excel,Mohon bantuannya..
saya kesulitan membuat rumus untuk BPJS dalam 1 kolom untuk keterangan berikut :jika gaji + tunjangan lebih besar datau sama dengan 3.543.750 atau lebih kecil dari 4.725.000, maka 3.543.750*5% dan jika gaji + tunjangan lebih besar atau sama dengan 4.725.000 maka 4.725.000*5%Terima kasih atas bantuannya
#yiv0201423876 #yiv0201423876 -- #yiv0201423876ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv0201423876 #yiv0201423876ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv0201423876 #yiv0201423876ygrp-mkp #yiv0201423876hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv0201423876 #yiv0201423876ygrp-mkp #yiv0201423876ads {margin-bottom:10px;}#yiv0201423876 #yiv0201423876ygrp-mkp .yiv0201423876ad {padding:0 0;}#yiv0201423876 #yiv0201423876ygrp-mkp .yiv0201423876ad p {margin:0;}#yiv0201423876 #yiv0201423876ygrp-mkp .yiv0201423876ad a {color:#0000ff;text-decoration:none;}#yiv0201423876 #yiv0201423876ygrp-sponsor #yiv0201423876ygrp-lc {font-family:Arial;}#yiv0201423876 #yiv0201423876ygrp-sponsor #yiv0201423876ygrp-lc #yiv0201423876hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv0201423876 #yiv0201423876ygrp-sponsor #yiv0201423876ygrp-lc .yiv0201423876ad {margin-bottom:10px;padding:0 0;}#yiv0201423876 #yiv0201423876actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv0201423876 #yiv0201423876activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv0201423876 #yiv0201423876activity span {font-weight:700;}#yiv0201423876 #yiv0201423876activity span:first-child {text-transform:uppercase;}#yiv0201423876 #yiv0201423876activity span a {color:#5085b6;text-decoration:none;}#yiv0201423876 #yiv0201423876activity span span {color:#ff7900;}#yiv0201423876 #yiv0201423876activity span .yiv0201423876underline {text-decoration:underline;}#yiv0201423876 .yiv0201423876attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv0201423876 .yiv0201423876attach div a {text-decoration:none;}#yiv0201423876 .yiv0201423876attach img {border:none;padding-right:5px;}#yiv0201423876 .yiv0201423876attach label {display:block;margin-bottom:5px;}#yiv0201423876 .yiv0201423876attach label a {text-decoration:none;}#yiv0201423876 blockquote {margin:0 0 0 4px;}#yiv0201423876 .yiv0201423876bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv0201423876 .yiv0201423876bold a {text-decoration:none;}#yiv0201423876 dd.yiv0201423876last p a {font-family:Verdana;font-weight:700;}#yiv0201423876 dd.yiv0201423876last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv0201423876 dd.yiv0201423876last p span.yiv0201423876yshortcuts {margin-right:0;}#yiv0201423876 div.yiv0201423876attach-table div div a {text-decoration:none;}#yiv0201423876 div.yiv0201423876attach-table {width:400px;}#yiv0201423876 div.yiv0201423876file-title a, #yiv0201423876 div.yiv0201423876file-title a:active, #yiv0201423876 div.yiv0201423876file-title a:hover, #yiv0201423876 div.yiv0201423876file-title a:visited {text-decoration:none;}#yiv0201423876 div.yiv0201423876photo-title a, #yiv0201423876 div.yiv0201423876photo-title a:active, #yiv0201423876 div.yiv0201423876photo-title a:hover, #yiv0201423876 div.yiv0201423876photo-title a:visited {text-decoration:none;}#yiv0201423876 div#yiv0201423876ygrp-mlmsg #yiv0201423876ygrp-msg p a span.yiv0201423876yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv0201423876 .yiv0201423876green {color:#628c2a;}#yiv0201423876 .yiv0201423876MsoNormal {margin:0 0 0 0;}#yiv0201423876 o {font-size:0;}#yiv0201423876 #yiv0201423876photos div {float:left;width:72px;}#yiv0201423876 #yiv0201423876photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv0201423876 #yiv0201423876photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv0201423876 #yiv0201423876reco-category {font-size:77%;}#yiv0201423876 #yiv0201423876reco-desc {font-size:77%;}#yiv0201423876 .yiv0201423876replbq {margin:4px;}#yiv0201423876 #yiv0201423876ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv0201423876 #yiv0201423876ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv0201423876 #yiv0201423876ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv0201423876 #yiv0201423876ygrp-mlmsg select, #yiv0201423876 input, #yiv0201423876 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv0201423876 #yiv0201423876ygrp-mlmsg pre, #yiv0201423876 code {font:115% monospace;}#yiv0201423876 #yiv0201423876ygrp-mlmsg * {line-height:1.22em;}#yiv0201423876 #yiv0201423876ygrp-mlmsg #yiv0201423876logo {padding-bottom:10px;}#yiv0201423876 #yiv0201423876ygrp-msg p a {font-family:Verdana;}#yiv0201423876 #yiv0201423876ygrp-msg p#yiv0201423876attach-count span {color:#1E66AE;font-weight:700;}#yiv0201423876 #yiv0201423876ygrp-reco #yiv0201423876reco-head {color:#ff7900;font-weight:700;}#yiv0201423876 #yiv0201423876ygrp-reco {margin-bottom:20px;padding:0px;}#yiv0201423876 #yiv0201423876ygrp-sponsor #yiv0201423876ov li a {font-size:130%;text-decoration:none;}#yiv0201423876 #yiv0201423876ygrp-sponsor #yiv0201423876ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv0201423876 #yiv0201423876ygrp-sponsor #yiv0201423876ov ul {margin:0;padding:0 0 0 8px;}#yiv0201423876 #yiv0201423876ygrp-text {font-family:Georgia;}#yiv0201423876 #yiv0201423876ygrp-text p {margin:0 0 1em 0;}#yiv0201423876 #yiv0201423876ygrp-text tt {font-size:120%;}#yiv0201423876 #yiv0201423876ygrp-vital ul li:last-child {border-right:none !important;}#yiv0201423876

Tue Jan 13, 2015 4:28 am (PST) . Posted by:

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

Hai Maya,

(seluruh bunyi gaji_n_tunj dalam formula diganti dengan rujukan ke cell
nilai data berupa nilai gaji dan tunjangan)

A. Andai persentasenya sama-sama 5%, bisa dengan formula :
=( gaji_n_tunj >= 3543750) * 5% * gaji_n_tunj

B. Andai persentasenya berbeda, seperti lebih dari sama dengan 3543750 dan
kurang dari 4725000 adalah 3% dan yang lebih dari sama dengan 4725000
adalah 5%, bisa dengan IF seperti yang disarankan Pak Haris atau dengan
beberapa cara lain yang diantaranya seperti :
1. fungsi LookUp
>> jika regional setting komputer setempat adalah English :
=LookUp( gaji_n_tunj , {0,3543750,4725000} , {0,0.03,0.05} )
>> jika regional setting komputer setempat adalah Indonesian :
=LookUp( gaji_n_tunj ; {0\3543750\4725000} ; {0\0,05\0,05} )

2. tabel referensi dan fungsi vLookUp dengan match type true
>> misal di cell X1 sampai Y4 dibuat suatu tabel referensi :
batas_gaji_n_tunj persentase
0 0
3543750 3%
4725000 5%

>> di cell hasil diberi formula :
=vLookUp( gaji_n_tunj , $x$2:$y$4 , 2 , TRUE )
atau
=vLookUp( gaji_n_tunj , $x$2:$y$4 , 2 , 1 )
atau
=vLookUp( gaji_n_tunj , $x$2:$y$4 , 2 )

*** jika regional setting komputer setempat adalah Indonesian, ganti
karakter koma dalam formula menjadi titik koma

3. tabel referensi dan fungsi LookUp
>> misal di cell X1 sampai Y4 dibuat suatu tabel referensi :
batas_gaji_n_tunj persentase
0 0
3543750 3%
4725000 5%

>> di cell hasil diberi formula :
=LookUp( gaji_n_tunj , $x$2:$x$4 , $y$2:$y$4 )

*** jika regional setting komputer setempat adalah Indonesian, ganti
karakter koma dalam formula menjadi titik koma

Kira-kira demikian...

Selamat mencoba.

Wassalam,
Kid.

On Tue, Jan 13, 2015 at 10:51 PM, Haris Rifai haris.rifai@yahoo.co.id
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:

>
>
> Met malem mbak Maya.
>
> Coba formulasi
> ini +IF(AND(B3>3543750,B3<4725000),3543750*5%,IF(B3>4724999,4725000*5%,0))
> Kita anggap Gaji ada pada kolom B.
>
> Semoga bisa membantu.
>
> Salam Belajar Excel.
> Haris
>
>
> Pada Selasa, 13 Januari 2015 18:37, "Jack Carmelo
> jackcarmelo@yahoo.co.id [belajar-excel]" <belajar-excel@yahoogroups.com>
> menulis:
>
>
>
> Mat mlam mbak Maya
> Mohon di koreksi sedikit. Bukannya dari contoh yang diberikan sama saja
> dengan semuanya dikali 5%? Karena >=3.543.750 /<4.725.000 dan >=4.725.000
> berarti sama saja dengan >=3.543.750?
> Jadi 2 kriteria sbnrx bisa dibuatkan 1 kriteria dan semuanya *5%.
> Mohon koreksinya.
> --
> Salam Sehat Selalu Dari Papua Timika
> Jack
> Selasa, 13 Januari 2015, 07:04PM +0900 dari "maya nurdin
> maya.nurdin@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com>:
>
> Dear para master excel,
> Mohon bantuannya..
> saya kesulitan membuat rumus untuk BPJS dalam 1 kolom untuk keterangan
> berikut :
> jika gaji + tunjangan lebih besar datau sama dengan 3.543.750 atau lebih
> kecil dari 4.725.000, maka 3.543.750*5% dan jika gaji + tunjangan lebih
> besar atau sama dengan 4.725.000 maka 4.725.000*5%
> Terima kasih atas bantuannya
>
>
>
>

Tue Jan 13, 2015 6:13 pm (PST) . Posted by:

"Maya Nurdin" maya_reski

Dear Master excel,

mohon maaf atas kebingungan saya heheheh.. mungkin lebih tepatnya
pertanyaan saya seperti berikut (file terlampir)

Terima kasih

Tue Jan 13, 2015 8:02 pm (PST) . Posted by:

"Nang Agus"

Dear Maya Nurdin

Sebaiknya untuk pertanyaan baru membuat threat baru, jangan mereply threat
yang sudah ada.

Coba di E6 diketik formula: =MIN(C6+D6,4725000)
sedangkan di F6, formulanya: =MIN(C6+D6,4725000)*0.05

salam

NangAgus

2015-01-14 9:13 GMT+07:00 Maya Nurdin maya.nurdin@gmail.com [belajar-excel]
<belajar-excel@yahoogroups.com>:

>
>
> Dear Master excel,
>
> mohon maaf atas kebingungan saya heheheh.. mungkin lebih tepatnya
> pertanyaan saya seperti berikut (file terlampir)
>
> Terima kasih
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>

Tue Jan 13, 2015 8:02 pm (PST) . Posted by:

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

Hai Maya,

COba kolom Max diisi dengan formula :
=Min( gaji + tunjangan , 4725000 )
*** jika regional setting komputer setemoat adalah Indonesian, maka ganti
karakter koma dalam formula dengan karakter titik koma
*** gaji dirujuk ke cell nilai gaji dan tunjangan dirujuk ke cell nilai
tunjangan

Wassalam,
Kid.

2015-01-14 13:13 GMT+11:00 Maya Nurdin maya.nurdin@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com>:

>
>
> Dear Master excel,
>
> mohon maaf atas kebingungan saya heheheh.. mungkin lebih tepatnya
> pertanyaan saya seperti berikut (file terlampir)
>
> Terima kasih
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>

Tue Jan 13, 2015 8:04 pm (PST) . Posted by:

"Nang Agus"

Dear maya..

mohon maaf ternyata saya salah membaca email.
ternyata email ini terusan dari treat sebelumnya.
Jawaban Mr. Kid sangat jelas dan dapat dengan mudah dipraktikkan.
selamat belajar
salam
NangAgus

2015-01-14 11:01 GMT+07:00 Nang Agus <nangagus@gmail.com>:

> Dear Maya Nurdin
>
> Sebaiknya untuk pertanyaan baru membuat threat baru, jangan mereply
> threat yang sudah ada.
>
> Coba di E6 diketik formula: =MIN(C6+D6,4725000)
> sedangkan di F6, formulanya: =MIN(C6+D6,4725000)*0.05
>
> salam
>
> NangAgus
>
>
> 2015-01-14 9:13 GMT+07:00 Maya Nurdin maya.nurdin@gmail.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>>
>>
>> Dear Master excel,
>>
>> mohon maaf atas kebingungan saya heheheh.. mungkin lebih tepatnya
>> pertanyaan saya seperti berikut (file terlampir)
>>
>> Terima kasih
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>
>

Tue Jan 13, 2015 8:49 pm (PST) . Posted by:

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

oh sudah di-reply mas Agus to... Saya kira belum ada yang reply.

Kalau begitu saya urun alternatif yang pakai IF saja :
=if( gaji + tunjangan >= 4725000 , 4725000 , gaji + tunjangan )

Keuntungan pakai IF, jika ada tambahan kondisi berbunyi andaikan gaji+tunjangan
>= 354750 dan gaji+tunjangan<4725000 diset nilai sebesar 4000000, maka
fungsi IF bertambah 1 kondisi menjadi :
=if( gaji + tunjangan >= 4725000 , 4725000 , if( gaji + tunjangan >=
3543750 , 4000000 , gaji + tunjangan ) )

;)

Wassalam,
Kid.

2015-01-14 15:04 GMT+11:00 Nang Agus nangagus@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> Dear maya..
>
> mohon maaf ternyata saya salah membaca email.
> ternyata email ini terusan dari treat sebelumnya.
> Jawaban Mr. Kid sangat jelas dan dapat dengan mudah dipraktikkan.
> selamat belajar
> salam
> NangAgus
>
> 2015-01-14 11:01 GMT+07:00 Nang Agus <nangagus@gmail.com>:
>
>> Dear Maya Nurdin
>>
>> Sebaiknya untuk pertanyaan baru membuat threat baru, jangan mereply
>> threat yang sudah ada.
>>
>> Coba di E6 diketik formula: =MIN(C6+D6,4725000)
>> sedangkan di F6, formulanya: =MIN(C6+D6,4725000)*0.05
>>
>> salam
>>
>> NangAgus
>>
>>
>> 2015-01-14 9:13 GMT+07:00 Maya Nurdin maya.nurdin@gmail.com
>> [belajar-excel] <belajar-excel@yahoogroups.com>:
>>
>>>
>>>
>>> Dear Master excel,
>>>
>>> mohon maaf atas kebingungan saya heheheh.. mungkin lebih tepatnya
>>> pertanyaan saya seperti berikut (file terlampir)
>>>
>>> Terima kasih
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>
>
>

Tue Jan 13, 2015 8:51 pm (PST) . Posted by:

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

koreksi dikit,
kalimat berbunyi :
"maka fungsi IF bertambah 1 kondisi menjadi :"
seharusnya :
"maka fungsi IF bertambah 1 level menjadi :"

maafkan daku ya...

Wassalam,
Kid.

2015-01-14 15:49 GMT+11:00 Mr. Kid <mr.nmkid@gmail.com>:

> oh sudah di-reply mas Agus to... Saya kira belum ada yang reply.
>
> Kalau begitu saya urun alternatif yang pakai IF saja :
> =if( gaji + tunjangan >= 4725000 , 4725000 , gaji + tunjangan )
>
> Keuntungan pakai IF, jika ada tambahan kondisi berbunyi andaikan gaji+tunjangan
> >= 354750 dan gaji+tunjangan<4725000 diset nilai sebesar 4000000, maka
> fungsi IF bertambah 1 kondisi menjadi :
> =if( gaji + tunjangan >= 4725000 , 4725000 , if( gaji + tunjangan >=
> 3543750 , 4000000 , gaji + tunjangan ) )
>
> ;)
>
> Wassalam,
> Kid.
>
>
>
> 2015-01-14 15:04 GMT+11:00 Nang Agus nangagus@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> Dear maya..
>>
>> mohon maaf ternyata saya salah membaca email.
>> ternyata email ini terusan dari treat sebelumnya.
>> Jawaban Mr. Kid sangat jelas dan dapat dengan mudah dipraktikkan.
>> selamat belajar
>> salam
>> NangAgus
>>
>> 2015-01-14 11:01 GMT+07:00 Nang Agus <nangagus@gmail.com>:
>>
>>> Dear Maya Nurdin
>>>
>>> Sebaiknya untuk pertanyaan baru membuat threat baru, jangan mereply
>>> threat yang sudah ada.
>>>
>>> Coba di E6 diketik formula: =MIN(C6+D6,4725000)
>>> sedangkan di F6, formulanya: =MIN(C6+D6,4725000)*0.05
>>>
>>> salam
>>>
>>> NangAgus
>>>
>>>
>>> 2015-01-14 9:13 GMT+07:00 Maya Nurdin maya.nurdin@gmail.com
>>> [belajar-excel] <belajar-excel@yahoogroups.com>:
>>>
>>>>
>>>>
>>>> Dear Master excel,
>>>>
>>>> mohon maaf atas kebingungan saya heheheh.. mungkin lebih tepatnya
>>>> pertanyaan saya seperti berikut (file terlampir)
>>>>
>>>> Terima kasih
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>
>>
>>
>
>

Tue Jan 13, 2015 4:19 am (PST) . Posted by:

"Nang Agus"

Dear mas Haris
Coba belajar pesen Mr. Kid di sini
<http://b-excel.blogspot.com/2013/07/belajarvba-004-tipe-data-variabel.html>

salam
NangAgus

On Tue, Jan 13, 2015 at 11:23 AM, Haris Rifai haris.rifai@yahoo.co.id
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:

>
>
> Mr. Kid & Nang Agus.
>
> Terimakasih atas arahannya, sudah saya aplikasikan dan berhasil seperti
> yang saya harapkan.
>
> Pak Nang Agus, mohon penjelasan kapan kita mesti menggunakan deklarasi
> *Single* dan kapan kita harus menggunakan *Double.*
>
> Terimaksih.
> haris
>
>
> Pada Selasa, 13 Januari 2015 10:52, "Nang Agus nangagus@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Private Sub TextBox1_Change()
> Dim sKey11 As String, rgFind11 As Range
> Dim Nilai As Integer
>
> Karena nilai dinyatakan sebagai integer maka berapapun hasilnya akan
> ditulis dalam integer.
> Ubahlah menjadi:
> Dim Nilai As single atau
> Dim Nilai As Double
>
> On 1/12/15, Haris Rifai haris.rifai@yahoo.co.id [belajar-excel]
> <belajar-excel@yahoogroups.com> wrote:
> > Dear Master excel.
> > Assalaamu'alaikum
> > Saya membuat formula penghitungan nilai pecahan desimal dengan vba
> > excel.Permasalahannya adalah nilai pecahanya seperti di-RoundUp (untuk
> nilai
> > 0.5 ketas) & di-RoundDown (untuk nilai dibawah 0.5) sehingga hasilnya
> > bilangan bulat (bukan pecahan lagi).
> > Mohon pencerahan para master gimana caranya agar nilai pecahan bisa
> dihitung
> > dan ditampilkan dengan apa adanya pada userform begitu juga hasil
> > perhitungannya yang di-copy dalam worksheet.
> > untuk memperjelas yang saya maksud, berikut lampiran filenya.
> >
> >
> > WassalamHaris
>
>
>
>

Tue Jan 13, 2015 4:28 am (PST) . Posted by:

"Haris Rifai" haris.rifai

Mas Toby.
Terimakasih alternatifnya. Saya sudah coba dan hasilnya seperti yang saya harapkan juga.
Haris.

Pada Selasa, 13 Januari 2015 18:34, "Toby kenzo tobykenzo@yahoo.co.id [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:


  Dear Mas Haris, Ngga apa-apa saya ikutan nimbrung mas.. sama seperti mas Nang Agus, untuk Dim as nilainya bisa di ganti dengan String untuk pecahan. dan untuk menyimpanya dalam database seharusnya mas gunakan: dim ws as worksheet set ws = worksheets("Sheet...") di sini saya gunakan sheet3 untuk irownya bisa di gunakan fungsi = ws.Cells.Find(What:="*", SearchOrder:=xlRows, _
    SearchDirection:=xlPrevious, LookIn:=xlValues).Row + 1 untuk memasukan ke dalam database (Sheet3) jangan lupa sheet3.active With ws
    .Cells(irow, 1).Value = Me.TextBox1.Value
    .Cells(irow, 2).Value = Me.TextBox2.Value
    .Cells(irow, 3).Value = Me.TextBox4.Value
    .Cells(irow, 4).Value = Me.TextBox5.Value
End Withsehinga data bisa masuk ke cell dimana ada cell yang kosong. maaf sebelumnya mas Haris, saya tambahkan satu tombol untuk melihat ke sheet1 biar gampang masukin datanya.(File terlampir) semoga membantu. TerimaKasih.
  #yiv0674445853 #yiv0674445853 -- #yiv0674445853ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv0674445853 #yiv0674445853ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv0674445853 #yiv0674445853ygrp-mkp #yiv0674445853hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv0674445853 #yiv0674445853ygrp-mkp #yiv0674445853ads {margin-bottom:10px;}#yiv0674445853 #yiv0674445853ygrp-mkp .yiv0674445853ad {padding:0 0;}#yiv0674445853 #yiv0674445853ygrp-mkp .yiv0674445853ad p {margin:0;}#yiv0674445853 #yiv0674445853ygrp-mkp .yiv0674445853ad a {color:#0000ff;text-decoration:none;}#yiv0674445853 #yiv0674445853ygrp-sponsor #yiv0674445853ygrp-lc {font-family:Arial;}#yiv0674445853 #yiv0674445853ygrp-sponsor #yiv0674445853ygrp-lc #yiv0674445853hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv0674445853 #yiv0674445853ygrp-sponsor #yiv0674445853ygrp-lc .yiv0674445853ad {margin-bottom:10px;padding:0 0;}#yiv0674445853 #yiv0674445853actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv0674445853 #yiv0674445853activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv0674445853 #yiv0674445853activity span {font-weight:700;}#yiv0674445853 #yiv0674445853activity span:first-child {text-transform:uppercase;}#yiv0674445853 #yiv0674445853activity span a {color:#5085b6;text-decoration:none;}#yiv0674445853 #yiv0674445853activity span span {color:#ff7900;}#yiv0674445853 #yiv0674445853activity span .yiv0674445853underline {text-decoration:underline;}#yiv0674445853 .yiv0674445853attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv0674445853 .yiv0674445853attach div a {text-decoration:none;}#yiv0674445853 .yiv0674445853attach img {border:none;padding-right:5px;}#yiv0674445853 .yiv0674445853attach label {display:block;margin-bottom:5px;}#yiv0674445853 .yiv0674445853attach label a {text-decoration:none;}#yiv0674445853 blockquote {margin:0 0 0 4px;}#yiv0674445853 .yiv0674445853bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv0674445853 .yiv0674445853bold a {text-decoration:none;}#yiv0674445853 dd.yiv0674445853last p a {font-family:Verdana;font-weight:700;}#yiv0674445853 dd.yiv0674445853last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv0674445853 dd.yiv0674445853last p span.yiv0674445853yshortcuts {margin-right:0;}#yiv0674445853 div.yiv0674445853attach-table div div a {text-decoration:none;}#yiv0674445853 div.yiv0674445853attach-table {width:400px;}#yiv0674445853 div.yiv0674445853file-title a, #yiv0674445853 div.yiv0674445853file-title a:active, #yiv0674445853 div.yiv0674445853file-title a:hover, #yiv0674445853 div.yiv0674445853file-title a:visited {text-decoration:none;}#yiv0674445853 div.yiv0674445853photo-title a, #yiv0674445853 div.yiv0674445853photo-title a:active, #yiv0674445853 div.yiv0674445853photo-title a:hover, #yiv0674445853 div.yiv0674445853photo-title a:visited {text-decoration:none;}#yiv0674445853 div#yiv0674445853ygrp-mlmsg #yiv0674445853ygrp-msg p a span.yiv0674445853yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv0674445853 .yiv0674445853green {color:#628c2a;}#yiv0674445853 .yiv0674445853MsoNormal {margin:0 0 0 0;}#yiv0674445853 o {font-size:0;}#yiv0674445853 #yiv0674445853photos div {float:left;width:72px;}#yiv0674445853 #yiv0674445853photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv0674445853 #yiv0674445853photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv0674445853 #yiv0674445853reco-category {font-size:77%;}#yiv0674445853 #yiv0674445853reco-desc {font-size:77%;}#yiv0674445853 .yiv0674445853replbq {margin:4px;}#yiv0674445853 #yiv0674445853ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv0674445853 #yiv0674445853ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv0674445853 #yiv0674445853ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv0674445853 #yiv0674445853ygrp-mlmsg select, #yiv0674445853 input, #yiv0674445853 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv0674445853 #yiv0674445853ygrp-mlmsg pre, #yiv0674445853 code {font:115% monospace;}#yiv0674445853 #yiv0674445853ygrp-mlmsg * {line-height:1.22em;}#yiv0674445853 #yiv0674445853ygrp-mlmsg #yiv0674445853logo {padding-bottom:10px;}#yiv0674445853 #yiv0674445853ygrp-msg p a {font-family:Verdana;}#yiv0674445853 #yiv0674445853ygrp-msg p#yiv0674445853attach-count span {color:#1E66AE;font-weight:700;}#yiv0674445853 #yiv0674445853ygrp-reco #yiv0674445853reco-head {color:#ff7900;font-weight:700;}#yiv0674445853 #yiv0674445853ygrp-reco {margin-bottom:20px;padding:0px;}#yiv0674445853 #yiv0674445853ygrp-sponsor #yiv0674445853ov li a {font-size:130%;text-decoration:none;}#yiv0674445853 #yiv0674445853ygrp-sponsor #yiv0674445853ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv0674445853 #yiv0674445853ygrp-sponsor #yiv0674445853ov ul {margin:0;padding:0 0 0 8px;}#yiv0674445853 #yiv0674445853ygrp-text {font-family:Georgia;}#yiv0674445853 #yiv0674445853ygrp-text p {margin:0 0 1em 0;}#yiv0674445853 #yiv0674445853ygrp-text tt {font-size:120%;}#yiv0674445853 #yiv0674445853ygrp-vital ul li:last-child {border-right:none !important;}#yiv0674445853

Tue Jan 13, 2015 5:00 am (PST) . Posted by:

tobykenzo

Dear mas Haris,

Sama-sama mas, senang bisa membantu mas.

TerimaKasih.

Tue Jan 13, 2015 4:40 am (PST) . Posted by:

Hai Jack,

Ini yang saya biasa lakukan : Asumsi tabel sudah berkaidah database, header data berada di row ke 1(A1 berisi "No.", dan B1 berisi "Nama"), dan cara input data namanya hanya menggunakan inputbox:

Sub button1_click()

Dim Nama as string
Dim n As long

N = worksheetfunction.counta(range("A:A")) + 1

Nama = inputbox ("nama : ")
Range("a" & N).select
Activecell.value = activecell.row() - 1
Activecell.offset(0,1).value = Nama

End Sub

Kuncinya ada di variabel N itu. Coba copas code diatas pada sebuah Button (form controls), dan coba liat dulu apakah hasil nya sudah seperti yang diharapkan.

Btw, kalau dengar Timika saya jadi ingat Kuala Kencana.. :D

Salam
Sony


Powered by paid monthly bills®

-----Original Message-----
From: "Jack Carmelo jackcarmelo@yahoo.co.id [belajar-excel]" <belajar-excel@yahoogroups.com>
Sender: belajar-excel@yahoogroups.com
Date: Tue, 13 Jan 2015 06:09:40
To: <belajar-excel@yahoogroups.com>
Reply-To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] autonumber


Mat siang para master.
Minta solusinya untuk code autonumber. Maksudnya saya ingin membuat auto number di kolom A tapi berdasarkan perintah inputan dari userform. Supaya setiap data yang mau diinput dibaris kosong di awali dengan penomoran.
--
Salam Sehat Selalu Dari Papua Timika
Jack

Tue Jan 13, 2015 5:25 am (PST) . Posted by:

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

Hai Deny,

Pivot Table sangat tergantung pada susunan tabel sumber datanya. Tabel yang
mengikuti kaidah tabel database akan jauh lebih mudah diolah dengan pivot
table. Contohnya adalah seperti pada file terlampir.

Silakan dibandingkan struktur antar sumbr datanya (tabel sumber data) dari
pivot table yag ada di setiap sheet dalam file terlampir. Akan lebih baik
jika susunan tabel sumber datanya seperti sheet yang diwarna hijau.
Setidaknya, seperti sheet diwarna kuning masih bisa dimanfaatkan dengan
baik dan mudah. Data seperti di sheet yang berwarna biru bisa memberikan
lebih banyak informasi. Sedangkan data di sheet yang berwarna merah akan
sulit diolah dengan pivot table walau masih bisa dengan bantuan sedikit
berepot ria dalam menyusun layout pivot tablenya. Meski masih bisa,
sebaiknya susunan data seperti di sheet warna merah dihindari.

Wassalam,
Kid.

2015-01-13 21:50 GMT+11:00 Deny_AQS agrady_99@yahoo.com [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> Dear all master excel,
>
> Saya terkendala untuk membuat pivotable dari Raw Data yg saya punya.
> Untuk detail pertanyaan dan raw data ada di file attach
>
> Terimakasih
>
>

Tue Jan 13, 2015 5:33 am (PST) . Posted by:

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

Hai Rico,

Untuk yang 1,blabla ya
=SUMIFS(Inv!$K$3:$K$99,Inv!$D$3:$D$99,$C3,Inv!$E$3:$E$99,$D3,Inv!$F$3:$F$99,$E3,Inv!$G$3:$G$99,$F3,Inv!$I$3:$I$99,">=0.6",Inv!$I$3:$I$99,"<=1")
*** sesuaikan nilai 0.6 dan 1 dalam formula dengan batas nilai untuk kolom
0.3,blabla

Jika kolom Uniq dalam sheet PO (kolom B) dan sheet Inv (kolom H) bukan
hasil formula alias berupa values saja, bisa menggunakan formula :
=SUMIFS(Inv!$K$3:$K$99,Inv!$H$3:$H$99,$B3,Inv!$I$3:$I$99,">=0.6",Inv!$I$3:$I$99,"<=1")
*** sesuaikan nilai 0.6 dan 1 dalam formula dengan batas nilai untuk kolom
0.3,blabla

Wassalam,
Kid.

2015-01-13 18:06 GMT+11:00 rico martin ajibataku@yahoo.com [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> Dear Para Master Excel,
>
> Mohon bantuannya, bagaimana formula untuk combine data seperti file
> terlampir.
> Saya perlu memindahkan data pada kolom K pada sheet INV ke kolom G dan H
> pada sheet PO, dengan kriteria line_qty (kolom I) pada sheet inv 1;0.7;0.6
> untuk kolom G.
> Dan 0.3 dan 0.4 untuk kolom H.
>
> Mohon bantuannya.
> Demikian dan terimakasih
>
> Rico
>
>

Wed Jan 14, 2015 12:28 am (PST) . Posted by:

Assalamualaikum wr. wb.


Pak mau tanya tentang penyelesaian kasus seperti ini... saya punya database

Buah Warna

Apel Merah
Mangga Hijau
Anggur Ungu

Kemudian saya berada di sheet lain, misalkan di kolom A2 saya ketik APEL, maka di B2 otomatis muncul MERAH... pertanyaan saya, bagaimana caranya ketika saya ubah warna MERAH mejadi BIRU di kolom B2, secara otomtis database warna apel yang berada di sheet lain akan berubah juga yang tadinya apel berwarna MERAH menjadi BIRU.

Terima kasih
============================================================
Pojok Lowongan Kerja yang disediakan milis :
http://milis-belajar-excel.1048464.n5.nabble.com/Pojok-Lowongan-Kerja-f5725753.html
*** Posting lowongan kerja : ke link tersebut dan klik New Topic
============================================================
bergabung ke milis (subscribe), kirim mail kosong ke: belajar-excel-subscribe@yahoogroups.com

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

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

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

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

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

Tidak ada komentar:

Posting Komentar