contoh : I56 : be1= - be1=-1Q berapa pendapatan dalam 3 bulan .
Q56 = Q51 Karena kolom Q adalah Q1
R56 = Q51 - S51 : kolom R adalah Q4 untuk mendapatkan data dari
Okt ~ des
S56 = S51 - T51 : Kolom S adalah Q3 untuk mendapatkan data dari
Jul ~ sep
T56 = T51 - U51 : Kolom T adalah Q2 untuk mendapatkan data dari
april ~ jun
Q51 = adalah pendapat dari jan ~ maret 2015
R51 = adalah pendapatan dari jan ~ des 2014
S51 = adalah pendapatan dari jan ~ sep 2014
T51 = adalah pendapatan dari jan ~ juni 2014
Salam
Lukman
2015-06-11 13:43 GMT+07:00 'Mr. Kid' mr.nm...@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Jadi, untuk semua rumusan di kolom i, pasti mengambil nilai (yang ditambah
> kurang bagi dsb) hanya dari 1 kolom saja ?
> Kalau sedang menghitung q1 tahun 2000 (yang ditambah kurang bagi dsb),
> apakah hanya pakai data q1 tahun 2000 saja ?
> Bagaimana dengan menghitung q2,q3,q4 ?
>
>
>
>
> 2015-06-11 16:37 GMT+10:00 lkm jktind lkmjkt...@gmail.com [belajar-excel]
> <belajar-excel@yahoogroups.com>:
>
>>
>>
>> Jadi kalau ada kolom i yang tidak berisi rumus (alias blank), maka
>> nilainya tetap apa adanya dari sumber data ?
>> : Ya
>> kecuali data dalam USD -- akan di konversikan dalam IDR.
>>
>> Apakah semua rumus di kolom i itu pasti mengambil dari kolom yang sama
>> ? kebanyakan mengunakan column yg sama
>>
>> bila masih mengunakan formula di dalam excel :
>> baris untuk bantu untuk vertical : columns E,F,G,H (match
>> vertical)
>> baris untuk bantu untuk horizontal : Row 2. (match
>> horizontal)
>>
>> jadi : = Index (data, match vertical, match horizontal)
>>
>> sedangkan untuk tahun fiscal yg berbeda di hitung secara manual .
>>
>> Kolom I : ini hanya catatan rumus nya saja . berisi No Acc yg akan
>> digunakan untuk menghitung . (dari pada saya catat di file yg berbeda)
>> sebagai dan dasar pembuatan formula
>>
>>
>> Salam
>>
>>
>> Lukman
>>
>>
>>
>>
>> 2015-06-11 12:10 GMT+07:00 'Mr. Kid' mr.nm...@gmail.com [belajar-excel] <
>> belajar-excel@yahoogroups.com>:
>>
>>>
>>>
>>> Jadi kalau ada kolom i yang tidak berisi rumus (alias blank), maka
>>> nilainya tetap apa adanya dari sumber data ?
>>> Apakah semua rumus di kolom i itu pasti mengambil dari kolom yang sama ?
>>> Maksudnya, ketika rumusan kolom i akan diimplementasi di kolom q1 tahun
>>> x, maka akan menggunakan semua nilai di kolom tersebut juga berdasar
>>> kode-kode dalam rumusan kolom i ?
>>>
>>>
>>> 2015-06-11 14:46 GMT+10:00 lkm jktind lkmjkt...@gmail.com
>>> [belajar-excel] <belajar-excel@yahoogroups.com>:
>>>
>>>>
>>>>
>>>> Pak Kid.
>>>>
>>>> Data nya : ada yg mengunakan USD dan IDR
>>>> sedangkan Harga sahamnya mengunakan IDR
>>>> Tahun fiscalnya ada ada yg berbeda:
>>>> Kebanyakan : dari jan ~ des , atau dari april 2014 ~ maret 2015
>>>> (jepang)
>>>>
>>>> No Acc ---- di kolom C
>>>> Ticker --- di kolom A
>>>>
>>>> Data awal nya . dari aa0 sampai AT100 jumlah row nya bisa
>>>> tidak sama. disini ada formula yg di letakan di dalam excel.
>>>>
>>>> Data Inti nya dari ba2= sampai bg5= disini . semua data di
>>>> seragamkan dengan mata uang rupiah.
>>>> qtr, qtrQ, qtrY, qtrA --- tahun fiscalnya dari jan ~ des row 1.
>>>> qtk, qtrkQ, qttkY, qtkA --- tahun fiscalnya berbeda.
>>>>
>>>> qtr, qtk -- quater saat ini.
>>>> qtrQ , qtkQ ---- quater sebelumnya . digunakan untuk mencari hasil 3
>>>> bulan terakhir ---- Q to Q.
>>>> qtrY , qtkY ---- setahun yg lalu . digunakan untuk menghitung Y
>>>> to Y
>>>> qtrA, qtkA ---- untuk mencari hasil 12 bulan terakhir. contoh :
>>>> = 2014 Q2 + 2013 Q4 - 2013 Q2
>>>>
>>>> sebuah template formula :
>>>> sebenarnya ada sheet tambahan . dinamai sheet rumus . .
>>>>
>>>> Sub copy_formula()
>>>> Application.Calculation = xlCalculationAutomatic
>>>> Sheets("rumus").Range("R38:R83").Copy
>>>>
>>>> Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
>>>> SkipBlanks:=False, Transpose:=False
>>>>
>>>> Selection.Copy
>>>> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
>>>> SkipBlanks _
>>>> :=False, Transpose:=False
>>>> Application.CutCopyMode = False
>>>> With Selection.Interior
>>>> .Pattern = xlNone
>>>> .TintAndShade = 0
>>>> .PatternTintAndShade = 0
>>>> End With
>>>> Selection.Replace What:="False", Replacement:="", LookAt:=xlPart, _
>>>> SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
>>>> ReplaceFormat:=False
>>>> Selection.Replace What:="", Replacement:="", LookAt:=xlPart, _
>>>> SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
>>>> ReplaceFormat:=False
>>>> Selection.Replace What:="#VALUE!", Replacement:="", LookAt:=xlPart,
>>>> _
>>>> SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
>>>> ReplaceFormat:=False
>>>> Selection.Replace What:="", Replacement:="", LookAt:=xlPart,
>>>> SearchOrder _
>>>> :=xlByRows, MatchCase:=False, SearchFormat:=False,
>>>> ReplaceFormat:=False
>>>>
>>>> Application.Calculation = xlCalculationManual
>>>>
>>>> End Sub
>>>>
>>>> di kolom I ada rumus nya
>>>>
>>>> total row sekitar 47.800 baris dengan columns 30
>>>>
>>>> kalau di hitung dengan VBA komplit_1 waktunya sekitar 22 ~ 23
>>>> menit.
>>>> VBA Komplit_2 sekitar 15 ~ 16 menit.
>>>>
>>>> Salam
>>>>
>>>>
>>>> Lukman
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>> 2015-06-11 10:06 GMT+07:00 'Mr. Kid' mr.nm...@gmail.com
>>>> [belajar-excel] <belajar-excel@yahoogroups.com>:
>>>>
>>>>>
>>>>>
>>>>> Hai Lukman,
>>>>>
>>>>> Data awalnya seperti apa dan hasilnya seperti apa ya ?
>>>>> Tampaknya tidak semua record adalah hitungan. Record hasil hitungan
>>>>> pun sebenarnya akan selalu tetap per kode di kolom C, walau hitungannya
>>>>> membutuhkan kode kolom C lainnya.
>>>>>
>>>>> Bolehkah dijabarkan kapan menggunakan :
>>>>> qtr,qtrq,qtrY,qtrA ?
>>>>>
>>>>>> Dim qtr As String, qtrQ As String, qtrY As String, qtrA As String
>>>>>> Dim qtk As String, qtkQ As String, qtkY As String, qtkA As String
>>>>>>
>>>>>
>>>>> Sepertinya sebuah template formula yang diletakkan pada sebuah kolom
>>>>> bisa mempercepat proses daripada menghitung setiap cells dengan loop
>>>>> terhadap M baris x N kolom.
>>>>>
>>>>> Wassalam,
>>>>> Kid.
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>> 2015-06-08 12:00 GMT+10:00 lkm jktind lkmjkt...@gmail.com
>>>>> [belajar-excel] <belajar-excel@yahoogroups.com>:
>>>>>
>>>>>>
>>>>>>
>>>>>> lebih sering -- hanya di hitung 1 column saja .
>>>>>>
>>>>>> contoh file terlampir :
>>>>>>
>>>>>>
>>>>>>
>>>>>> Salam
>>>>>>
>>>>>> Lukman
>>>>>>
>>>>>>
>>>>>>
>>>>>>
>>>>>>
>>>>>> 2015-06-07 18:58 GMT+07:00 Toby kenzo tobyke...@yahoo.co.id
>>>>>> [belajar-excel] <belajar-excel@yahoogroups.com>:
>>>>>>
>>>>>>>
>>>>>>>
>>>>>>> Dear Lukman,
>>>>>>>
>>>>>>> Menurut saya masih bisa di simplfy programnya dgn tidak terlalu
>>>>>>> banyak menggunakan "kondisi".
>>>>>>> Jika memungkinkan,anda bisa menggunakan formula excel dalam suatu
>>>>>>> sheet untuk melakukan kalkulasi,jadi tidak semua fungsi kalkulasi di
>>>>>>> lakukan di dalam vba,sebisa mungkin tugas vba hanya memanggil resultnya
>>>>>>> saja, itu akan lebih cepat.
>>>>>>>
>>>>>>> TerimaKasih.
>>>>>>>
>>>>>>> Sent from Yahoo Mail on Android
>>>>>>> <http://overview.mail.yahoo.com/mobile/?.src=Android>
>>>>>>>
>>>>>>> ------------------------------
>>>>>>> * From: * lkm jktind lkmjkt...@gmail.com [belajar-excel] <
>>>>>>> belajar-excel@yahoogroups.com>;
>>>>>>> * To: * belajar-excel@yahoogroups com <belajar-excel@yahoogroups.com>;
>>>>>>>
>>>>>>> * Subject: * [belajar-excel] Do Case atau select Case [2
>>>>>>> Attachments]
>>>>>>> * Sent: * Sun, Jun 7, 2015 6:15:17 AM
>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>> Saya telah membuat VBA (seperti terlampir di email ini.)
>>>>>>>
>>>>>>> Tapi rasanya lambat dalam memproses data.
>>>>>>>
>>>>>>> bila mengunakan do case atau select case apakah akan lebih cepat ?
>>>>>>>
>>>>>>> bagaimana cara merubahnya . bila hendak mengunakan do case. /select
>>>>>>> case.
>>>>>>>
>>>>>>>
>>>>>>> Salam
>>>>>>>
>>>>>>> Lukman
>>>>>>>
>>>>>>>
>>>>>>> NB :
>>>>>>> 1. Komplit_1 -- ini lambat
>>>>>>> 2. Komplit_2 -- ini lebih cepat daripada yang diatas.
>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>
>>>>>
>>>>
>>>
>>
>
>
