4 Messages
Digest #2864
Messages
Sun Apr 6, 2014 1:40 am (PDT) . Posted by:
"ferry_hr"
Dear Bexcelers,
Mohon bantuannya, saya lagi buat rumus vba untuk range nilai antara, kira2 formula utk vbanya gmn ya?
Gaji adalah x rupiah.
Jd maksudnya begini :
Untuk nilai inputan 1-3 dengan gaji, maka hasilnya adalah 1*gajix,
Untuk nilai inputan 4-6 dengan gaji maka hasilnya adalah 2*gaji.
Untuk nilai inputan 7-9 dengan gaji, maka hasilnya adalah 3*gaji.
Mohon sharringnya ya. Trims semua
Warm Rgds,
Ferry Alexander
Ferry_hr@yahoo.com
Insanity is doing the same over & over again and expecting a different result <Einstein>
Mohon bantuannya, saya lagi buat rumus vba untuk range nilai antara, kira2 formula utk vbanya gmn ya?
Gaji adalah x rupiah.
Jd maksudnya begini :
Untuk nilai inputan 1-3 dengan gaji, maka hasilnya adalah 1*gajix,
Untuk nilai inputan 4-6 dengan gaji maka hasilnya adalah 2*gaji.
Untuk nilai inputan 7-9 dengan gaji, maka hasilnya adalah 3*gaji.
Mohon sharringnya ya. Trims semua
Warm Rgds,
Ferry Alexander
Ferry_hr@yahoo.com
Insanity is doing the same over & over again and expecting a different result <Einstein>
Sun Apr 6, 2014 3:12 am (PDT) . Posted by:
firmanpake_syah
Mas fery,
Mungkin mas Fery bisa buatkan sample tablenya. Buat memudahkan
Kita2 untuk bisa merealisasikan keinginan mas fery
From BB gemini Jadul
-----Original Message-----
From: ferry_hr <ferry_hr@yahoo.com>
Sender: belajar-excel@yahoogroups.com
Date: Sun, 06 Apr 2014 07:23:17
To: Belajar Excel<belajar-excel@yahoogroups.com>
Reply-To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] Mohon bantuan
Dear Bexcelers,
Mohon bantuannya, saya lagi buat rumus vba untuk range nilai antara, kira2 formula utk vbanya gmn ya?
Gaji adalah x rupiah.
Jd maksudnya begini :
Untuk nilai inputan 1-3 dengan gaji, maka hasilnya adalah 1*gajix,
Untuk nilai inputan 4-6 dengan gaji maka hasilnya adalah 2*gaji.
Untuk nilai inputan 7-9 dengan gaji, maka hasilnya adalah 3*gaji.
Mohon sharringnya ya. Trims semua
Warm Rgds,
Ferry Alexander
Ferry_hr@yahoo.com
Insanity is doing the same over & over again and expecting a different result <Einstein>
Mungkin mas Fery bisa buatkan sample tablenya. Buat memudahkan
Kita2 untuk bisa merealisasikan keinginan mas fery
From BB gemini Jadul
-----Original Message-----
From: ferry_hr <ferry_hr@yahoo.com>
Sender: belajar-excel@yahoogroups.com
Date: Sun, 06 Apr 2014 07:23:17
To: Belajar Excel<belajar-excel@yahoogroups.com>
Reply-To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] Mohon bantuan
Dear Bexcelers,
Mohon bantuannya, saya lagi buat rumus vba untuk range nilai antara, kira2 formula utk vbanya gmn ya?
Gaji adalah x rupiah.
Jd maksudnya begini :
Untuk nilai inputan 1-3 dengan gaji, maka hasilnya adalah 1*gajix,
Untuk nilai inputan 4-6 dengan gaji maka hasilnya adalah 2*gaji.
Untuk nilai inputan 7-9 dengan gaji, maka hasilnya adalah 3*gaji.
Mohon sharringnya ya. Trims semua
Warm Rgds,
Ferry Alexander
Ferry_hr@yahoo.com
Insanity is doing the same over & over again and expecting a different result <Einstein>
Sun Apr 6, 2014 3:13 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Hai Ferry,
ndak ada contoh workbooknya ya... baiklah (padahal contoh workbook bisa
memudahkan calon penanggap, sehingga potensi mendapat reply yang sesuai
kebutuhan akan menjadi lebih tinggi)
Asumsi : inputan dari 0 sampai 250
dim lInput as long, decGaji as variant, decRupiah as variant
decrupiah=1000000
1. jika dengan if-if-an
if linput>9 then
decgaji=0
elseif linput>=7 then
decgaji=3*decrupiah
elseif linput>=4 then
decgaji=2*decrupiah
elseif linput>=1 then
decgaji=decrupiah
else
decgaji=0
endif
2. jika dengan select case
select case linput
case 1 to 3
decgaji=decrupiah
case 4 to 6
decgaji=2*decrupiah
case 7 to 9
decgaji=3*decrupiah
case else
decgaji=0
end select
3. bisa juga dengan :
if linput<1 or linput>9 then
decgaji=0
else
decgaji=int((linput+2)/3)*decrupiah
endif
4. jika dengan fungsi lookup bawaan Excel melalui Evaluate :
decgaji=decrupiah*evaluate("lookup(" & linput &
",{-99999,1,4,7,9.000001},{0,1,2,3,0})")
--> bagian evaluate berisi bunyi formula lookup yang jika ditulis di cell
untuk linput bernilai 4 akan menjadi :
=Lookup(4,{-99999,1,4,7,9.000001},{0,1,2,3,0})
Silakan dipilih dari 4 opsi yang tersebut dari sekian banyak opsi yang
mungkin digunakan untuk kasus ini.
Wassalam,
Kid.
2014-04-06 7:23 GMT+07:00 ferry_hr <ferry_hr@yahoo.com>:
>
>
> Dear Bexcelers,
> Mohon bantuannya, saya lagi buat rumus vba untuk range nilai antara, kira2
> formula utk vbanya gmn ya?
>
> Gaji adalah x rupiah.
>
> Jd maksudnya begini :
> Untuk nilai inputan 1-3 dengan gaji, maka hasilnya adalah 1*gajix,
> Untuk nilai inputan 4-6 dengan gaji maka hasilnya adalah 2*gaji.
> Untuk nilai inputan 7-9 dengan gaji, maka hasilnya adalah 3*gaji.
>
> Mohon sharringnya ya. Trims semua
>
> Warm Rgds,
> Ferry Alexander
> Ferry_hr@yahoo.com
> Insanity is doing the same over & over again and expecting a different
> result <Einstein>
>
>
ndak ada contoh workbooknya ya... baiklah (padahal contoh workbook bisa
memudahkan calon penanggap, sehingga potensi mendapat reply yang sesuai
kebutuhan akan menjadi lebih tinggi)
Asumsi : inputan dari 0 sampai 250
dim lInput as long, decGaji as variant, decRupiah as variant
decrupiah=1000000
1. jika dengan if-if-an
if linput>9 then
decgaji=0
elseif linput>=7 then
decgaji=3*decrupiah
elseif linput>=4 then
decgaji=2*decrupiah
elseif linput>=1 then
decgaji=decrupiah
else
decgaji=0
endif
2. jika dengan select case
select case linput
case 1 to 3
decgaji=decrupiah
case 4 to 6
decgaji=2*decrupiah
case 7 to 9
decgaji=3*decrupiah
case else
decgaji=0
end select
3. bisa juga dengan :
if linput<1 or linput>9 then
decgaji=0
else
decgaji=int((linput+2)/3)*decrupiah
endif
4. jika dengan fungsi lookup bawaan Excel melalui Evaluate :
decgaji=decrupiah*evaluate("lookup(" & linput &
",{-99999,1,4,7,9.000001},{0,1,2,3,0})")
--> bagian evaluate berisi bunyi formula lookup yang jika ditulis di cell
untuk linput bernilai 4 akan menjadi :
=Lookup(4,{-99999,1,4,7,9.000001},{0,1,2,3,0})
Silakan dipilih dari 4 opsi yang tersebut dari sekian banyak opsi yang
mungkin digunakan untuk kasus ini.
Wassalam,
Kid.
2014-04-06 7:23 GMT+07:00 ferry_hr <ferry_hr@yahoo.com>:
>
>
> Dear Bexcelers,
> Mohon bantuannya, saya lagi buat rumus vba untuk range nilai antara, kira2
> formula utk vbanya gmn ya?
>
> Gaji adalah x rupiah.
>
> Jd maksudnya begini :
> Untuk nilai inputan 1-3 dengan gaji, maka hasilnya adalah 1*gajix,
> Untuk nilai inputan 4-6 dengan gaji maka hasilnya adalah 2*gaji.
> Untuk nilai inputan 7-9 dengan gaji, maka hasilnya adalah 3*gaji.
>
> Mohon sharringnya ya. Trims semua
>
> Warm Rgds,
> Ferry Alexander
> Ferry_hr@yahoo.com
> Insanity is doing the same over & over again and expecting a different
> result <Einstein>
>
>
Sun Apr 6, 2014 4:06 am (PDT) . Posted by:
"ferry_hr"
Thx mr.kid...
Ini td sudah trial n error pake if...elseif dan sdh solved...
Dim nilai as integer
'Besar gaji ada di cell B2
If (nilai=1) and (nilai>=3) then
Hasil = 1*B2
Elseif (nilai=4) and (nilai>=6) then
Hasil = 2*B2
End if
...dst
Itu yg saya coba td dan sdh solved
Trims all
Warm Rgds,
Ferry Alexander
Ferry_hr@yahoo.com
Insanity is doing the same over & over again and expecting a different result <Einstein>
"Mr. Kid" <mr.nmkid@gmail.com> menulis:
>HaiFerry,ndakadacontohworkbooknyaya...baiklah(padahalcontohworkbookbisamemudahkancalonpenanggap,sehinggapotensimendapatreplyyangsesuaikebutuhanakanmenjadilebihtinggi)Asumsi:inputandari0sampai250dimlInputaslong,decGajiasvariant,decRupiahasvariantdecrupiah=10000001.jikadenganif-if-aniflinput9thendecgaji=0elseiflinput=7thendecgaji=3*decrupiahelseiflinput=4thendecgaji=2*decrupiahelseiflinput=1thendecgaji=decrupiahelsedecgaji=0endif2.jikadenganselectcaseselectcaselinputcase1to3decgaji=decrupiahcase4to6decgaji=2*decrupiahcase7to9decgaji=3*decrupiahcaseelsedecgaji=0endselect3.bisajugadengan:iflinput1orlinput9thendecgaji=0elsedecgaji=int((linput2)/3)*decrupiahendif4.jikadenganfungsilookupbawaanExcelmelaluiEvaluate:decgaji=decrupiah*evaluate(lookup(linput,{-99999,1,4,7,9.000001},{0,1,2,3,0}))--bagianevaluateberisibunyiformulalookupyangjikaditulisdicelluntuklinputbernilai4akanmenjadi:=Lookup(4,{-99999,1,4,7,9.000001},{0,1,2,3,0})Silakandipilihdari4opsiyangtersebutdarisekianbanyakopsiyangmungkindigunakanuntukkasusini.Wassalam,Kid.2014-04-067:23GMT07:00ferry_hrferry_hr@yahoo.com:DearBexcelers,Mohonbantuannya,sayalagibuatrumusvbauntukrangenilaiantara,kira2formulautkvbanyagmnya?Gajiadalahxrupiah.Jdmaksudnyabegini:Untuknilaiinputan1-3dengangaji,makahasilnyaadalah1*gajix,Untuknilaiinputan4-6dengangajimakahasilnyaadalah2*gaji.Untuknilaiinputan7-9dengangaji,makahasilnyaadalah3*gaji.Mohonsharringnyaya.TrimssemuaWarmRgds,FerryAlexanderFerry_hr@yahoo.comInsanityisdoingthesameoveroveragainandexpectingadifferentresultEinsteinReplyviawebpostReplytosender
Ini td sudah trial n error pake if...elseif dan sdh solved...
Dim nilai as integer
'Besar gaji ada di cell B2
If (nilai=1) and (nilai>=3) then
Hasil = 1*B2
Elseif (nilai=4) and (nilai>=6) then
Hasil = 2*B2
End if
...dst
Itu yg saya coba td dan sdh solved
Trims all
Warm Rgds,
Ferry Alexander
Ferry_hr@yahoo.com
Insanity is doing the same over & over again and expecting a different result <Einstein>
"Mr. Kid" <mr.nmkid@gmail.com> menulis:
>HaiFerry,ndakadacontohworkbooknyaya...baiklah(padahalcontohworkbookbisamemudahkancalonpenanggap,sehinggapotensimendapatreplyyangsesuaikebutuhanakanmenjadilebihtinggi)Asumsi:inputandari0sampai250dimlInputaslong,decGajiasvariant,decRupiahasvariantdecrupiah=10000001.jikadenganif-if-aniflinput9thendecgaji=0elseiflinput=7thendecgaji=3*decrupiahelseiflinput=4thendecgaji=2*decrupiahelseiflinput=1thendecgaji=decrupiahelsedecgaji=0endif2.jikadenganselectcaseselectcaselinputcase1to3decgaji=decrupiahcase4to6decgaji=2*decrupiahcase7to9decgaji=3*decrupiahcaseelsedecgaji=0endselect3.bisajugadengan:iflinput1orlinput9thendecgaji=0elsedecgaji=int((linput2)/3)*decrupiahendif4.jikadenganfungsilookupbawaanExcelmelaluiEvaluate:decgaji=decrupiah*evaluate(lookup(linput,{-99999,1,4,7,9.000001},{0,1,2,3,0}))--bagianevaluateberisibunyiformulalookupyangjikaditulisdicelluntuklinputbernilai4akanmenjadi:=Lookup(4,{-99999,1,4,7,9.000001},{0,1,2,3,0})Silakandipilihdari4opsiyangtersebutdarisekianbanyakopsiyangmungkindigunakanuntukkasusini.Wassalam,Kid.2014-04-067:23GMT07:00ferry_hrferry_hr@yahoo.com:DearBexcelers,Mohonbantuannya,sayalagibuatrumusvbauntukrangenilaiantara,kira2formulautkvbanyagmnya?Gajiadalahxrupiah.Jdmaksudnyabegini:Untuknilaiinputan1-3dengangaji,makahasilnyaadalah1*gajix,Untuknilaiinputan4-6dengangajimakahasilnyaadalah2*gaji.Untuknilaiinputan7-9dengangaji,makahasilnyaadalah3*gaji.Mohonsharringnyaya.TrimssemuaWarmRgds,FerryAlexanderFerry_hr@yahoo.comInsanityisdoingthesameoveroveragainandexpectingadifferentresultEinsteinReplyviawebpostReplytosender
=====================================================================
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
---------------------------------------------------------------------
Untuk memudahkan tim penyusun materi Belajar Excel yang lebih sesuai kebutuhan member, silakan ungkapkan permasalahan yang kerap ditemui dalam menggunakan Excel sehari-hari atau hal-hal yang ingin dipelajari dalam jangka dekat ini. Mohon diprioritaskan dari yang sering ditemui sampai yang ingin dipelajari.
Isi sesuai kelompoknya (fitur-fitur, formula-formula tertentu yang masih membingungkan, otomasi atau pemrograman dalam Excel [Macro - VBA], hal lainnya yang membuat Anda kesulitan dalam mempelajari Excel).
Boleh mengisi berulang kali untuk menambah uneg-uneg yang ingin diungkapkan.
Link untuk menuangkan seluruh uneg-uneg tersebut ada di :
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
=====================================================================
Langkah kecil Anda dalam mengisi database bisa menjadi langkah pertama yang bermanfaat besar untuk kita semua.
=====================================================================
---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com
posting ke milis, kirimkan ke:
belajar-excel@yahoogroups.com
berkunjung ke web milis
http://tech.groups.yahoo.com/group/belajar-excel/messages
melihat file archive / mendownload lampiran
http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/
menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com
keluar dari membership milis (UnSubscribe):
kirim mail kosong ke belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------
Tidak ada komentar:
Posting Komentar