Kamis, 06 Februari 2014

[belajar-excel] Digest Number 2770

7 New Messages

Digest #2770

Messages

Wed Feb 5, 2014 8:40 pm (PST) . Posted by:

"Jack Rivaldo"

Save page jawaban mas, dan terima kasih atas nasehatnya, sangat
memberi semangat. Manusia berusaha tuhan yang menentukan. Termasuk
belajar programming ini saya cuman berusaha semoga suatu saat nanti
akan berbuah besar.

Pada tanggal 06/02/14, Mr. Kid <mr.nmkid@gmail.com> menulis:
> Hai Jack,
>
> Begini saja,
> 0. pelajari cara menyusun data dan alur proses untuk mendapatkan output.
> Sebuah kasus akan membutuhkan perlakuan yang bisa jadi berbeda dengan kasus
> lain.
> 1. coba pelajari VB/VBA dengan baik hingga paham benar cara menggunakan
> object.
> 2. pelajari penggunaan object ADODB
> 3. pelajari connection string ke MySQL
>
> Hidup itu melangkah setahap demi setahap. Sebuah langkah dilakukan hingga
> mantap diposisi tersebut. Setelah itu baru melangkah ke hal berikutnya.
> Untuk bisa segera mantap disebuah posisi hasil melangkah tersebut,
> berbagilah lebih dulu dan amalkan. Baru melangkah lagi. Ilmu itu pemberian
> Tuhan dan bukan sekedar hasil belajar seseorang. Belajar itu sekedar sebuah
> bukti mahluk kepada Tuhannya bahwa dia membutuhkan ilmu yang bisa
> dimanfaatkannya dengan baik karena bisa memahaminya.
>
> Belajarlah setahap demi setahap. Sesungguhnya satu yang dipahami dengan
> baik akan lebih baik daripada banyak hal yang tingkatnya sekedar tahu saja.
> Satu yang dipahami dengan baik akan membuka pintu ilmu berikutnya yang
> sebaiknya dipahami pada langkah selanjutnya.
>
> Selamat belajar.
>
> Wassalam,
> Kid.
>
>
>
>
> 2014-02-05 Jack Rivaldo <rivaldojack@gmail.com>:
>
>>
>>
>> Bagaimana cara koneksi VBA Excel ke MySQL, bukan tablenya
>> Saya ada kebutuhan mengkombinasikan Database Excel dan MySQL untuk
>> menghasilkan suatu data.
>>
>>
>

Wed Feb 5, 2014 8:43 pm (PST) . Posted by:

"Jack Rivaldo"

Untuk tahap ini saya tidak punya client gan, saya berdasarkan
keinginan tauan dan mencoba. Saya akan berusaha tahap demi tahap
seperti yang dikatakan mas.

Pada tanggal 06/02/14, Mr. Kid <mr.nmkid@gmail.com> menulis:
> Hai Jack,
>
> Begini caranya,
> 0. pelajari cara menyusun data dan alur proses untuk mendapatkan output.
> Sebuah kasus akan membutuhkan perlakuan yang bisa jadi berbeda dengan kasus
> lain.
> 1. coba pelajari VB/VBA dengan baik hingga paham benar cara menggunakan
> object.
> 2. pahami keinginan client dan cari object yang dibutuhkan untuk
> memenuhinya.
> 3. selesai deh.
>
> Wassalam,
> Kid.
>
>
>
> 2014-02-05 Jack Rivaldo <rivaldojack@gmail.com>:
>
>>
>>
>> Sepengalaman mas-mas sekali, bagaimana cara atau langkah-langkah apa
>> yang mas lakukan untuk mempercantik table dan VBA dari from, bottom,
>> textbox dan component lainnya pada pembuatan aplikasi Excel agar
>> terlihat cantik atau enak dipandang. Mungkin mas pernah mengcombi
>> dengan flash, atau bagaimana mas, monggo?
>>
>>
>

Wed Feb 5, 2014 8:54 pm (PST) . Posted by:

"Bagus" bagus4bls

Maaf seharusnya begini:

=MID(LEFT(A1,FIND(" ",A1)-1),FIND("#",LEFT(A1,FIND(" ",A1)-1))+1,9)*(LEN(LEFT(A1,FIND(" ",A1)-1))-LEN(SUBSTITUTE(LEFT(A1,FIND(" ",A1)-1),".",""))+1)+MID(MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1),FIND("#",MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1))+1,9)*(LEN(MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1))-LEN(SUBSTITUTE(MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1),".",""))+1)+MID(RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND(" ",A1)+1)),FIND("#",RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND(" ",A1)+1)))+1,9)*(LEN(RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND(" ",A1)+1)))-LEN(SUBSTITUTE(RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND(" ",A1)+1)),".",""))+1)

Wassalam

~ Bagus ~

----- Original Message -----
From: Bagus
To: belajar-excel@yahoogroups.com
Sent: Thursday, February 06, 2014 11:37 AM
Subject: Re: [belajar-excel] bagaimanakah cara menghitung angka ya diawali tanda # (pagar)



Hai Pukka;

Coba begini:
=MID(LEFT(A1,FIND(" ",A1)-1),FIND("#",LEFT(A1,FIND(" ",A1)-1))+1,9)*(LEN(LEFT(A1,FIND(" ",A1)-1))-LEN(SUBSTITUTE(LEFT(A1,FIND(" ",A1)-1),".",""))+1)+MID(MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1),FIND("#",MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1))+1,9)*(LEN(MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1))-LEN(SUBSTITUTE(MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1),".",""))+1)+MID(RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND(" ",A1)+1)),FIND("#",RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND(" ",A1)+1)))+1,9)*(LEN(RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND(" ",A1)+1)))-LEN(SUBSTITUTE(E1,".",""))+1)

Maaf formulanya panjang banget..
barangkali Mr. Kid atau master yg lain ada yg lebih ringkas..

Wassalam

~ Bagus ~

----- Original Message -----
From: Pukka Hamonangan Pardede
To: belajar-excel@yahoogroups.com
Sent: Thursday, February 06, 2014 10:01 AM
Subject: Bls: [belajar-excel] bagaimanakah cara menghitung angka ya diawali tanda # (pagar)

Dear Bagus and Mr. Kid
PERFECT AGAIN..!!
sekarang puncak permasalahan perhitungan angka yg saya miliki bapak @bagus dan @Mr. kid
sekarang begini bapak excel-lent semua:

bagai mana menghitung angka setelah tanda # namun lebih dari 1 tanda #
contoh data bilangan berikut ada di A1
12.22.70.8.115#20 11.23.101.65.9#20 1300#100

total = 300

Kiranya bapak dapat membantu.
mohon kesabarannya pak.

(angkat saya menjadi muridmu)
:)

----- Mods -----
mungkin kasusnya bisa dijelaskan secara detail dan terperinci
sehingga solusi yang diberikan bisa untuk segala kondisi yang ada
___________

Pada Kamis, 6 Februari 2014 9:40, Bagus menulis:


Hai Pukka;

Coba begini:
Misal data ada di A1.
=MID(A1,FIND("#",A1)+1,9)*(LEN(A1)-LEN(SUBSTITUTE(A1,".",""))+1)

Wassalam
~ Bagus ~

----- Original Message -----
From: Pukka Hamonangan Pardede
To: belajar-excel@yahoogroups.com
Sent: Thursday, February 06, 2014 8:54 AM
Subject: Bls: [belajar-excel] bagaimanakah cara menghitung angka ya diawali tanda # (pagar)

Dear Mr. Kid
PERFECT!!
formulanya bekerja dengan sempurna, 1 masalah saya akhirnya tuntas, jd begini pak, bagaimana dengan penjumlahan angka setelah tanda pagar namun formatnya demikian:

12.22.70.8.115#20

total = 100 (10 = seharga 20, 22 = seharga 20, 70 = seharga 20, 8 = seharga 20, 115 = seharga 20)

mohon bantuannya yah pak.. saya sudah cukup lama mencari pemecahanna namun belum ada hingga saat ini yg mampu memberikan solusi. kiranya bapak dapat membantu.

mohon kesabarannya pak.

(angkat saya menjadi muridmu)
:)

Pada Kamis, 6 Februari 2014 6:40, Mr. Kid menulis:

Hai Angan,

coba formula :

=sum( index( 1*(0&mid( range_datanya ,find("#", range_datanya "#")+1,15)) ,0 ) )

Wassalam,

Kid.

2014-02-06 <angan_lov3@yahoo.co.id>:

saya mau nanya bagaimanakah cara menghitung angka ya diawali tanda # (pagar)
contoh:

10#10
13#10
22#5
13#25
total = 50 (10+10+5+25)

mohon bantuannya saudaraQ setanah air, kasus ini sudah membuat saya sakit usus.. :)

Wed Feb 5, 2014 10:33 pm (PST) . Posted by:

"Pukka Hamonangan Pardede" angan_lov3

Dear Bagus dan Mr. Kid
rumus yg terakhir sebenarnya bekerja tapi nampaknya hanya kepada contoh: 12.22.70.8.115#20 11.23.101.65.9#20 1300#100 (hanya 3 tanda #)
jadi mohon bantuannya sekali lg pak, karena data yg di entri biasanya berubah ( kadang hanya 1 tanda # dan kadang sampai 30 tanda #. artinya formula yg kita inginkan akan bekerja pada unlimited tanda #.

nb: "panjang/pendeknya formula yg dihasilkan tidak menjadi masalah pak"

mohon bimbingan dan kesabarannya ya pak..
(angkat saya jadi muridmu)

Pada Kamis, 6 Februari 2014 11:59, Bagus <bagus@kingjim.co.id> menulis:

 

Maaf seharusnya begini:
 
=MID(LEFT(A1,FIND("
",A1)-1),FIND("#",LEFT(A1,FIND(" ",A1)-1))+1,9)*(LEN(LEFT(A1,FIND("
",A1)-1))-LEN(SUBSTITUTE(LEFT(A1,FIND(" ",A1)-1),".",""))+1)+MID(MID(A1,FIND("
",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1),FIND("#",MID(A1,FIND("
",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1))+1,9)*(LEN(MID(A1,FIND("
",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND("
",A1)-1))-LEN(SUBSTITUTE(MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND("
",A1)+1)-FIND(" ",A1)-1),".",""))+1)+MID(RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND("
",A1)+1)),FIND("#",RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND("
",A1)+1)))+1,9)*(LEN(RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND("
",A1)+1)))-LEN(SUBSTITUTE(RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND("
",A1)+1)),".",""))+1)
 
 
Wassalam
~
Bagus ~
 
----- Original Message -----
>From: Bagus
>To: belajar-excel@yahoogroups.com
>Sent: Thursday, February 06, 2014 11:37 AM
>Subject: Re: [belajar-excel] bagaimanakah cara menghitung angka ya diawali tanda # (pagar)
>

>
>Hai Pukka;

>Coba begini:
>=MID(LEFT(A1,FIND(" ",A1)-1),FIND("#",LEFT(A1,FIND(" ",A1)-1))+1,9)*(LEN(LEFT(A1,FIND(" ",A1)-1))-LEN(SUBSTITUTE(LEFT(A1,FIND(" ",A1)-1),".",""))+1)+MID(MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1),FIND("#",MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1))+1,9)*(LEN(MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1))-LEN(SUBSTITUTE(MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1),".",""))+1)+MID(RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND(" ",A1)+1)),FIND("#",RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND(" ",A1)+1)))+1,9)*(LEN(RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND(" ",A1)+1)))-LEN(SUBSTITUTE(E1,".",""))+1)

>Maaf formulanya panjang banget..
>barangkali
Mr. Kid atau master yg lain ada yg lebih ringkas..


>Wassalam
>~ Bagus ~
>----- Original Message -----
>>From: Pukka Hamonangan Pardede
>>To: belajar-excel@yahoogroups.com
>>Sent: Thursday, February 06, 2014 10:01 AM
>>Subject: Bls: [belajar-excel] bagaimanakah cara menghitung angka ya diawali tanda # (pagar)
>>
>> 
>>Dear Bagus and Mr. Kid
>>PERFECT AGAIN..!!
>>sekarang puncak permasalahan perhitungan angka yg saya miliki bapak @bagus dan @Mr. kid
>>sekarang begini bapak excel-lent semua:
>>
>>
>>bagai mana menghitung angka setelah tanda # namun lebih dari 1 tanda # 
>>contoh data bilangan berikut ada di A1
>>12.22.70.8.115#20 11.23.101.65.9#20 1300#100
>>
>>
>>total = 300
>>
>>
>>Kiranya bapak dapat membantu.
>>mohon kesabarannya pak.
>>
>>
>>(angkat saya menjadi muridmu)
>>:)
>>
>>
>>----- Mods -----
>>mungkin
kasusnya bisa dijelaskan secara detail dan terperinci
>>sehingga solusi
yang diberikan bisa untuk segala kondisi yang ada
>>___________
>>
>>
>>Pada Kamis, 6 Februari 2014 9:40, Bagus menulis:
>>
>> 
>>
>>Hai Pukka;
>> 
>>Coba begini:
>>Misal data ada di A1.
>>=MID(A1,FIND("#",A1)+1,9)*(LEN(A1)-LEN(SUBSTITUTE(A1,".",""))+1)
>> 
>>Wassalam
>>~ Bagus ~
>> 
>>----- Original Message -----
>>>From: Pukka Hamonangan Pardede
>>>To: belajar-excel@yahoogroups.com
>>>Sent: Thursday, February 06, 2014 8:54 AM
>>>Subject: Bls: [belajar-excel] bagaimanakah cara menghitung angka ya diawali tanda # (pagar)
>>>
>>> 
>>>Dear Mr. Kid
>>>PERFECT!!
>>>formulanya bekerja dengan sempurna, 1 masalah saya akhirnya tuntas, jd begini pak, bagaimana dengan penjumlahan angka setelah tanda pagar namun formatnya demikian:
>>>
>>>
>>>12.22.70.8.115#20
>>>
>>>
>>>total = 100   (10 = seharga 20, 22 = seharga 20, 70 = seharga 20, 8 = seharga 20, 115 = seharga 20)
>>>
>>>
>>>mohon bantuannya yah pak.. saya sudah cukup lama mencari pemecahanna namun belum ada hingga saat ini yg mampu memberikan solusi. kiranya bapak dapat membantu.
>>>
>>>
>>>mohon kesabarannya pak.
>>>
>>>
>>>(angkat saya menjadi muridmu)
>>>:)
>>>
>>>
>>>
>>>Pada Kamis, 6 Februari 2014 6:40, Mr. Kid menulis:
>>>
>>> 
>>>Hai Angan,
>>>
>>>coba formula :
>>>=sum( index( 1*(0&mid( range_datanya ,find("#", range_datanya "#")+1,15)) ,0 ) )
>>>
>>>Wassalam,
>>>Kid.
>>>
>>>
>>>
>>>
>>>
>>>2014-02-06 <angan_lov3@yahoo.co.id>:
>>>
>>>
>>>
>>>>saya mau nanya bagaimanakah cara menghitung angka ya diawali tanda # (pagar)
>>>>contoh:
>>>>
>>>>
>>>>10#10
>>>>13#10
>>>>22#5
>>>>13#25
>>>>total = 50 (10+10+5+25)
>>>>
>>>>
>>>>mohon bantuannya saudaraQ setanah air, kasus ini sudah membuat saya sakit usus.. :)
>>>
>>>
>>>
>>
>>

Thu Feb 6, 2014 12:02 am (PST) . Posted by:

"Jan Raisin"

hai pak Pardede,

coba bantu dengan UDF (User Defined Function)

scriptnya ditulis dalam sebuah modul dengan scope Public agar dapat
dipanggil dari worksheet seperti fungsi Excel lainnya

Option Explicit

' =============================================== '
' UDF SumIfSC = Summary With Special Conditions '
' Untuk milis belajar-excel '
' Miss Jan Raisin '
' Di bawah langit yang sama , 06-Feb-2014 '
' =============================================== '

Public Function SUMIFSC(sData As String, sDel As String, sDelPart As
String, sDelVal As String) As Double
Dim sFull As String, sPart As String
Dim iDel As Integer, iPart As Integer
Dim i As Integer, j As Integer, k As Integer
Dim dbVal As Double, dbSum As Double

iDel = Len(sData) - Len(Application.WorksheetFunction.Substitute(sData,
sDel, ""))
sFull = sData
For i = 1 To iDel + 1
For j = 1 To Len(sFull)
If Mid(sFull, j, 1) <> sDel Then
sPart = sPart & Mid(sFull, j, 1)
Else
sFull = Mid(sFull, j + 1, Len(sFull) - j)
Exit For
End If
Next j
iPart = Len(sPart) -
Len(Application.WorksheetFunction.Substitute(sPart, sDelPart, "")) + 1
For k = 1 To Len(sPart)
If Mid(sPart, k, 1) = sDelVal Then
dbVal = CDbl(Mid(sPart, k + 1, Len(sPart) - k))
Exit For
End If
Next k
dbSum = dbSum + (iPart * dbVal)
sPart = vbNullString
Next i
SUMIFSC = dbSum
End Function

syntaxnya:

=SumIfSC( data , delimiter , delimiter_dalam_setiap_bagian , delimiter_nilai
)

untuk setiap delimiter harus ditulis di antara tanda kutip dua

contoh penggunaan dengan data di cel A1
delimiter adalah spasi, ditulis " "
delimiter di dalam setiap bagian adalah titik, ditulis "."
delimiter untuk nilai adalah tanda pagar, ditulis "#"

formula lengkapnya menjadi
=SumIfSC( A1 , " " , "." , "#" )

jika regional setting komputer setempat adalah Indonesian maka ubah seluruh
tanda koma yang berwarna merah menjadi titik koma
file terlampir, pastikan macro diizinkan bekerja di komputer anda

Salam,

-Miss Jan Raisin-

Pada 6 Februari 2014 13.32, Pukka Hamonangan Pardede <angan_lov3@yahoo.co.id
> menulis:

>
>
> Dear Bagus dan Mr. Kid
> rumus yg terakhir sebenarnya bekerja tapi nampaknya hanya kepada
> contoh: 12.22.70.8.115#20 11.23.101.65.9#20 1300#100 (hanya 3 tanda #)
> jadi mohon bantuannya sekali lg pak, karena data yg di entri biasanya
> berubah ( kadang hanya 1 tanda # dan kadang sampai 30 tanda #. artinya
> formula yg kita inginkan akan bekerja pada unlimited tanda #.
>
> nb: "panjang/pendeknya formula yg dihasilkan tidak menjadi masalah pak"
>
> mohon bimbingan dan kesabarannya ya pak..
> (angkat saya jadi muridmu)
>
>
>
>

Thu Feb 6, 2014 12:37 am (PST) . Posted by:

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

Hai Pukka,

Moga-moga formula berikut bisa digunakan untuk sampai 9 price dalam 1 cell.
(nanti dibuat jadi sebaris sendiri ya, sorry nih, media ketiknya ribet)
=SumProduct(
(
Find("|",substitute(a1," ","|",row($1:$9))&"|")
-find("|",substitute(" "&a1," ","|",row($1:$9))&"|")
-find("|",substitute(
Substitute(a1,".","")
," "
,"|"
,row($1:$9)
)&"|")
+find("|",substitute(
" "&Substitute(a1,".","")
," "
,"|"
,row($1:$9)
)&"|")
+1
)
*
Right( substitute( left(a1&" 0#0"
,Find("|"
,Substitute(a1&"
0#0|"," ","|",row($1:$9))
)
-1
)
,"#"
,"00000"
)
,5
)
)

Moga-moga, kalau formula diatas yang telah diganti semua bagian berbunyi
Row($1:$9) menjadi berbunyi :
row(a$1
:Index( a:a
,len(a1)-len(
substitute(a1," ","")
)+1
)
)
bisa digunakan untuk unlimited price dalam 1 cell. (jangan lupa dibuat
sebaris dulu ya)

*(apa iya gak ada maksimalnya ?)*
Kondisi :
>> bisa jadi, item array yang terbentuk oleh bagian Row(blabla) mencapai
lebih dari 200

Dugaan :
>> 1. bisa jadi kinerja Excel saat proses kalkulasi akan melambat.
>> 2. Pada keadaan ini, penggantian fungsi SumProduct menjadi array formula
Sum sepertinya ndak terlalu banyak mempercepat kinerja.
>> 3. membuat beberapa kolom bantu untuk memecah formula akan membuat
kinerja kalkulasi Excel menjadi lebih cepat secara signifikan.

Kalau dugaan ketiga ternyata keliru, coba pakai UDF berikut :
public function SumPart( sTeks as string, _
optional sPartDel as string=" ", _
optional sKodeDel as string=".", _
optional sPrice as string="#" _
) as variant
dim sPart() as string, lIdx as long, decRes as variant
spart() = split( steks , spartdel )
for lidx=0 to ubound( spart )
decres=decres+ cdec( _
( len(spart(lidx)) -
len( replace$( spart(lidx) , skodedel , vbnullstring ) ) + 1 ) _
* ( 0 & mid$(
spart(lidx) , instr( spart(lidx) , sprice ) + 1 ) ) _
)
next lidx
sumpart=decres
end function

sepertinya bagian :
len(spart(lidx)) - len( replace$( spart(lidx) , skodedel ,
vbnullstring ) )
bisa digant dengan :
ubound( split( spart(lidx) , skodedel ) )
(tapi dicoba saja deh)....

rekans, mohon koreksinya ya... kuatirnya masih error n butuh dihaluskan...
sukur-sukur kalo dipendekin.

Wassalam,
Kid.

2014-02-06 Pukka Hamonangan Pardede <angan_lov3@yahoo.co.id>:

>
>
> Dear Bagus dan Mr. Kid
> rumus yg terakhir sebenarnya bekerja tapi nampaknya hanya kepada
> contoh: 12.22.70.8.115#20 11.23.101.65.9#20 1300#100 (hanya 3 tanda #)
> jadi mohon bantuannya sekali lg pak, karena data yg di entri biasanya
> berubah ( kadang hanya 1 tanda # dan kadang sampai 30 tanda #. artinya
> formula yg kita inginkan akan bekerja pada unlimited tanda #.
>
> nb: "panjang/pendeknya formula yg dihasilkan tidak menjadi masalah pak"
>
> mohon bimbingan dan kesabarannya ya pak..
> (angkat saya jadi muridmu)
>
>
> Pada Kamis, 6 Februari 2014 11:59, Bagus <bagus@kingjim.co.id> menulis:
>
> Maaf seharusnya begini:
>
> =MID(LEFT(A1,FIND(" ",A1)-1),FIND("#",LEFT(A1,FIND("
> ",A1)-1))+1,9)*(LEN(LEFT(A1,FIND(" ",A1)-1))-LEN(SUBSTITUTE(LEFT(A1,FIND("
> ",A1)-1),".",""))+1)+MID(MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND("
> ",A1)+1)-FIND(" ",A1)-1),FIND("#",MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND("
> ",A1)+1)-FIND(" ",A1)-1))+1,9)*(LEN(MID(A1,FIND(" ",A1)+1,FIND("
> ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1))-LEN(SUBSTITUTE(MID(A1,FIND("
> ",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND("
> ",A1)-1),".",""))+1)+MID(RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND("
> ",A1)+1)),FIND("#",RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND("
> ",A1)+1)))+1,9)*(LEN(RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND("
> ",A1)+1)))-LEN(SUBSTITUTE(RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND("
> ",A1)+1)),".",""))+1)
>
>
> Wassalam
> ~ Bagus ~
>
>
> ----- Original Message -----
> *From:* Bagus <bagus@kingjim.co.id>
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Thursday, February 06, 2014 11:37 AM
> *Subject:* Re: [belajar-excel] bagaimanakah cara menghitung angka ya
> diawali tanda # (pagar)
>
>
> Hai Pukka;
>
> Coba begini:
> =MID(LEFT(A1,FIND(" ",A1)-1),FIND("#",LEFT(A1,FIND("
> ",A1)-1))+1,9)*(LEN(LEFT(A1,FIND(" ",A1)-1))-LEN(SUBSTITUTE(LEFT(A1,FIND("
> ",A1)-1),".",""))+1)+MID(MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND("
> ",A1)+1)-FIND(" ",A1)-1),FIND("#",MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND("
> ",A1)+1)-FIND(" ",A1)-1))+1,9)*(LEN(MID(A1,FIND(" ",A1)+1,FIND("
> ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1))-LEN(SUBSTITUTE(MID(A1,FIND("
> ",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND("
> ",A1)-1),".",""))+1)+MID(RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND("
> ",A1)+1)),FIND("#",RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND("
> ",A1)+1)))+1,9)*(LEN(RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND("
> ",A1)+1)))-LEN(SUBSTITUTE(E1,".",""))+1)
>
> Maaf formulanya panjang banget..
> barangkali Mr. Kid atau master yg lain ada yg lebih ringkas..
>
>
> Wassalam
> ~ Bagus ~
>
> ----- Original Message -----
> *From:* Pukka Hamonangan Pardede <angan_lov3@yahoo.co.id>
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Thursday, February 06, 2014 10:01 AM
> *Subject:* Bls: [belajar-excel] bagaimanakah cara menghitung angka ya
> diawali tanda # (pagar)
>
>
> Dear Bagus and Mr. Kid
> PERFECT AGAIN..!!
> sekarang puncak permasalahan perhitungan angka yg saya miliki bapak @bagus
> dan @Mr. kid
> sekarang begini bapak excel-lent semua:
>
> bagai mana menghitung angka setelah tanda # namun lebih dari 1 tanda #
> contoh data bilangan berikut ada di A1
> 12.22.70.8.115#20 11.23.101.65.9#20 1300#100
>
> total = 300
>
> Kiranya bapak dapat membantu.
> mohon kesabarannya pak.
>
> (angkat saya menjadi muridmu)
> :)
>
> ----- Mods -----
> mungkin kasusnya bisa dijelaskan secara detail dan terperinci
> sehingga solusi yang diberikan bisa untuk segala kondisi yang ada
> ___________
>
> Pada Kamis, 6 Februari 2014 9:40, Bagus menulis:
>
> Hai Pukka;
>
> Coba begini:
> Misal data ada di A1.
> =MID(A1,FIND("#",A1)+1,9)*(LEN(A1)-LEN(SUBSTITUTE(A1,".",""))+1)
>
> Wassalam
> ~ Bagus ~
>
>
> ----- Original Message -----
> *From:* Pukka Hamonangan Pardede <angan_lov3@yahoo.co.id>
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Thursday, February 06, 2014 8:54 AM
> *Subject:* Bls: [belajar-excel] bagaimanakah cara menghitung angka ya
> diawali tanda # (pagar)
>
>
> Dear Mr. Kid
> PERFECT!!
> formulanya bekerja dengan sempurna, 1 masalah saya akhirnya tuntas, jd
> begini pak, bagaimana dengan penjumlahan angka setelah tanda pagar namun
> formatnya demikian:
>
> 12.22.70.8.115#20
>
> total = 100 (10 = seharga 20, 22 = seharga 20, 70 = seharga 20, 8 =
> seharga 20, 115 = seharga 20)
>
> mohon bantuannya yah pak.. saya sudah cukup lama mencari pemecahanna namun
> belum ada hingga saat ini yg mampu memberikan solusi. kiranya bapak dapat
> membantu.
>
> mohon kesabarannya pak.
>
> (angkat saya menjadi muridmu)
> :)
>
>
> Pada Kamis, 6 Februari 2014 6:40, Mr. Kid menulis:
>
> Hai Angan,
>
> coba formula :
> =sum( index( 1*(0&mid( range_datanya ,find("#", range_datanya "#")+1,15))
> ,0 ) )
>
> Wassalam,
> Kid.
>
>
>
> 2014-02-06 <angan_lov3@yahoo.co.id>:
>
>
> saya mau nanya bagaimanakah cara menghitung angka ya diawali tanda #
> (pagar)
> contoh:
>
> 10#10
> 13#10
> 22#5
> 13#25
> total = 50 (10+10+5+25)
>
> mohon bantuannya saudaraQ setanah air, kasus ini sudah membuat saya sakit
> usus.. :)
>
>
>
>
>
>
>
>
>
>

Thu Feb 6, 2014 12:39 am (PST) . Posted by:

"abhe" abraham_kusuma

Dear Master,

mohon pencerahannya.
terlampir formulasi Zamproduct pakai Vba. pertanyaannya adalah :
- bisakah saya menggunakan named range (semisal : sekolah, untuk menggantikan penulisan Sheet1!C4:14 dsb), karena lebih mudah untuk menghafal named range mengingat letaknya ada di sheet-sheet yg berbeda.
- apabila dikolom G ada kata "total", maka otomatis akan ditotal hasil Zamproduct dari awal sampai baris sebelum kata "total" (subtotal didalam formulasi zamproduct)
- apabila dikolom G datanya kosong (" "), maka Zamproductnya tidak dikalkulasi.
- bagaimana kalkulasi di kolom berikutnya (kolom I s.d kolom Q)

terima kasih

 
<><><><><><><>
R.A Naira
=====================================================================
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