Messages In This Digest (8 Messages)
- 1.
- Akumulasi Tak Berulang From: ari nani
- 2a.
- Re: Maximum Loop From: Haps
- 2b.
- Re: Maximum Loop From: Haps
- 3a.
- Re: Rumus memisahkan nama-nya saja dalam suatu kalimat From: Mr. Kid
- 4.
- data rekening dan data GL From: Faisal alif Natasasmita
- 5a.
- Re: menghitung discount berjenjang From: jimmy sihombing
- 5b.
- Re: menghitung discount berjenjang From: jimmy sihombing
- 6.
- memisahkan menjadi 3 kolom From: yeni suryaningsih
Messages
- 1.
-
Akumulasi Tak Berulang
Posted by: "ari nani" alm1ra@yahoo.com alm1ra
Thu Sep 15, 2011 6:00 am (PDT)
Dear Rekan XL
Saya punya masalah dengan mengakumulasikan kuantiti, saya punya data kode, tgl transaksi dan kuantiti, saya ingin mengakumulasikan kuantiti berdasarkan kode, tapi saat kode berubah nilainya tdk ikut terakumulasi. saya sudah membuat formula tapi rasanya masih terakumulasi sampe bawah.
Saya mohon bantuannya masalah saya.
atas bantuannya saya ucapkan terimakasih
- 2a.
-
Re: Maximum Loop
Posted by: "Haps" hapsari.stlizbeth@gmail.com liz_hap
Thu Sep 15, 2011 6:00 am (PDT)
coba mkro berikut ini
prosedur kedua (Fungsi HapsRange) itu tidak harus dipakai; karena dia hanya
mengOtomatiskan pemilihan area range yg berdata (Real Used Range dgn anchor
A1)
Jika anda mau menentukan Rangenya (di sheet aktif) dengan cara manual
prosedur tsb tidak perlu dipakai
Range yg akan diproses di SET secara hardcoded saja
Sub HapusCell_Bersayarat()
' dlm makro ini ini sudah dikhususkan
' syarat ada di kolom X (kol# 24)
' haps // 15 sept 2011
Dim RNG As Range, i As Long
*Set RNG = HapsRange(ActiveSheet)*
For i = 1 To RNG.Rows.Count
If LCase(RNG(i, 24)) = "delete" *Then RNG(i, 26).Clear*
Next i
End Sub
'
sebelum dan sesudah loop baik juga kalau ditambahkan setting mengenai
Calculation dan Screeen Editing (off kemudan on ) demi mempercepat jalannya
makro
'-------------------- ---
Private Function HapsRange(Optional Sht As Worksheet) As Range
' purpose: returns Real DataRange from a1 to last data
' courtesy of siti Vi
' Jakarta, 24 Nov 2009
'-------------------- -
Dim LstRow As Long, LstCol As Integer
On Error Resume Next
If Sht Is Nothing Then Set Sht = ActiveSheet
With Sht
LstRow = Cells.Find(What:="*", _
SearchDirection:=xlPrevious, SearchOrder: =xlByRows) .Row
LstCol = Cells.Find(What:="*", _
SearchDirection:=xlPrevious,
SearchOrder:=xlByColumns) .Column
If Len(Cells(1)) > 0 Then FstRow = 1: FstCol = 1
End With
Set HapsRange = Range(Cells(1), Cells(LstRow, LstCol))
End Function
contoh workbook hanya akan dikirim at request
2011/9/14 Hachi Rizki <hachiuz_ld27@yahoo.co. >id
> **
> Dear Excel Expert,
> Saya ketemu masalah dengan looping for next pada VBA
> saya menggunakan sintaks sebagai berikut
>
> For i = 2 To baris
> If proses.Cells(i, "X").Value = "delete" Then
> proses.Range(Cells(i, 1), Cells(i, "Z")).Value = vbNullString
> proses.Cells(i, 1).Select
> End If
> Next i
>
> sebelumnya saya gunakan count untuk baris, sehingga baris mencerminkan
> jumlah baris dari data yang bersangkutan.
> Saya run macro tersebut 2 kali. Pertama saya menggunakan data dengan jumlah
> row sebanyak 28000-an dan berjalan dengan baik
> Selanjutnya saya coba dengan data dengan jumlah row sebanyak 105.000-an.
> Dan muncuk error. 'type mismatch'
>
> pertanyaan saya :
> - apakah memang ada batas maksimum untuk loop for - next ? kalau ada,
> berapakah jumlah maksimumnya ..??
> - ada teman2 yang punya alternatif untuk scrip nya. Tujuan saya adalah
> menghilangkan baris yang pada kolom X ada tulisan "delete"
>
> terima kasih,
> hachi
>
>
- 2b.
-
Re: Maximum Loop
Posted by: "Haps" hapsari.stlizbeth@gmail.com liz_hap
Thu Sep 15, 2011 6:00 am (PDT)
setahu saya loop di VBA (misalnya pun terbatas) jumlah perulangannnya
tetap
bisa mengcover jumlah baris di satu sheet (1048576 rows)
yg jelas terbatas itu* jumlah nested nya* (Loop di dalam loop)
CMIIW...
2011/9/14 Hachi Rizki <hachiuz_ld27@yahoo.co. >id
> **
> pertanyaan saya :
> - apakah memang ada batas maksimum untuk loop for - next ? kalau ada,
> berapakah jumlah maksimumnya ..??
> - ada teman2 yang punya alternatif untuk scrip nya. Tujuan saya adalah
> menghilangkan baris yang pada kolom X ada tulisan "delete"
> terima kasih,
> hachi
>
- 3a.
-
Re: Rumus memisahkan nama-nya saja dalam suatu kalimat
Posted by: "Mr. Kid" mr.nmkid@gmail.com nmkid.family@ymail.com
Thu Sep 15, 2011 6:00 am (PDT)
Dear Anto,
Ambil data nama memanfaatkan 1 kolom bantu.
Summary Frekuensi berdasar NoPol dan Driver menggunakan Pivot Table.\
Regards.
Kid.
2011/9/13 To Anto <anto.wijayakusumo@yahoo.com >
> **
>
>
> Dear All
> Owner, Para Guru XL Mania,
>
> Mohon bantuannya untuk rumus menampilkan nama-nya saya dari suatu data dan
> rumus menghitung utilisasi (jumlah frekuensi) per tanggal sesuai file
> (terlampir)..
>
> Terima kasih.
>
> Salam,
>
> Anto W
>
>
>
- 4.
-
data rekening dan data GL
Posted by: "Faisal alif Natasasmita" faisalalif51@yahoo.co.id
Thu Sep 15, 2011 6:01 am (PDT)
Selamat siang guys,
Seperti biasa apalagi kalo bukan mau curhat nih sama suhu-suhu XL yang pinter nih,
terserah datanya mau diapain, namun sheet LAPORAN adalah yg terpenting.
Saya sudah coba pake vlookup tp jika tgl dan jumlah sbg parameter yg dibandingkan blm nemu rumusnya...
Intinya, ada 2 data (data rekening dan data GL), data-data tersebut akan direkonsiliasi,
jadi ada 3 kemungkinan :
1. data rek ada di data GL, sama persis, ini dikelompokkan dan tdk tampil di laporan
2. ada data rek yg tdk ada di data GL (msk ke laporan sbg data "blm diinput") dan
3. ada data GL yang tk ada di rek (msk ke laporan sbg data "koreksi")
Ini sangat mungkin bermanfaat utk rekan-2 milist yg bergerak di bagian keuangan,
sangat sederhana (hanya rekonsiliasi tgl dan jumlah, blm menyertakan "no reff", tapi itu next time aja!)
BTW, thanks yah friend...
- 5a.
-
Re: menghitung discount berjenjang
Posted by: "jimmy sihombing" jhe.jimmy@gmail.com
Thu Sep 15, 2011 6:02 am (PDT)
Dear All master excelmania,
Mr. Kid yg ahli function
Haps, Hendrik, dan Eko yang ahli matematika, semua rumus kalian pada
dasarnya sama. Terimakasih semua, benar2x sangat membantu saya dalam membuat
discount tangga.
Selanjutnya pertanyaan saya berikut ini merupakan kelanjutan dari discount
tangga, yakni bagaimana membuat formula total discount dari dua product yg
berbeda, dimana kedua product tsb berbeda kebijakan discount-nya. Sehingga
ketika saya mengalikannya dng total omzet (product A dan B) maka akan
menghasilkan net sales (file terlampir).
Tujuan dari tabel ini adalah nantinya akan saya bandingkan dengan data
kebijakan discount yg selama ini diberikan kepada customer, apakah sudah
sesuai dengan anggaran discount atau menyimpang dari yg dianggarkan.
Semoga tabel perhitungan ini bisa memberikan manfaat yg baik bagi member
lainnya khususnya dalam melakukan kontrol terhadap kebijakan discount yg
telah diberikan perusahaan kepada customer.
Tq dan salam,
JIM
2011/9/10 EKO Agus <nangagus@gmail.com >
> **
>
>
> Dear Jimmi
> Nah kalau yang ini saya bisa,
> gunakan rumusnya Mr Kid, yaitu
>
> *=(((1-E5)*(1-F5))*(1- G5))*(1-H5) *
>
> anda bisa lihat pada attachment
>
> 2011/9/9 jimmy sihombing <jhe.jimmy@gmail.com >
>
>> **
>>
>>
>> Dear Pakar XLmania,
>>
>> Mau tanya, saya punya tabel perhitungan manajemen promosi tentang discount
>> berjenjang seperti dalam file terlampir berikut ini. Yang ingin saya
>> tanyakan adalah bagaimana cara membuat rumus function excel discount
>> berjenjang tersebut, sehingga disc berjenjang akan timbul secara otomatis.
>> Terima kasih sebelumnya.
>>
>> Salam,
>>
>> JIM
>>
>
>
>
- 5b.
-
Re: menghitung discount berjenjang
Posted by: "jimmy sihombing" jhe.jimmy@gmail.com
Thu Sep 15, 2011 6:02 am (PDT)
Sorry, file attachment-nya salah, ini yg bnar
2011/9/15 jimmy sihombing <jhe.jimmy@gmail.com >
> Dear All master excelmania,
>
> Mr. Kid yg ahli function
> Haps, Hendrik, dan Eko yang ahli matematika, semua rumus kalian pada
> dasarnya sama. Terimakasih semua, benar2x sangat membantu saya dalam membuat
> discount tangga.
>
> Selanjutnya pertanyaan saya berikut ini merupakan kelanjutan dari discount
> tangga, yakni bagaimana membuat formula total discount dari dua product yg
> berbeda, dimana kedua product tsb berbeda kebijakan discount-nya. Sehingga
> ketika saya mengalikannya dng total omzet (product A dan B) maka akan
> menghasilkan net sales (file terlampir).
>
> Tujuan dari tabel ini adalah nantinya akan saya bandingkan dengan data
> kebijakan discount yg selama ini diberikan kepada customer, apakah sudah
> sesuai dengan anggaran discount atau menyimpang dari yg dianggarkan.
>
> Semoga tabel perhitungan ini bisa memberikan manfaat yg baik bagi member
> lainnya khususnya dalam melakukan kontrol terhadap kebijakan discount yg
> telah diberikan perusahaan kepada customer.
>
> Tq dan salam,
>
> JIM
>
> 2011/9/10 EKO Agus <nangagus@gmail.com >
>
>> **
>>
>>
>> Dear Jimmi
>> Nah kalau yang ini saya bisa,
>> gunakan rumusnya Mr Kid, yaitu
>>
>> *=(((1-E5)*(1-F5))*(1- G5))*(1-H5) *
>>
>> anda bisa lihat pada attachment
>>
>> 2011/9/9 jimmy sihombing <jhe.jimmy@gmail.com >
>>
>>> **
>>>
>>>
>>> Dear Pakar XLmania,
>>>
>>> Mau tanya, saya punya tabel perhitungan manajemen promosi tentang
>>> discount berjenjang seperti dalam file terlampir berikut ini. Yang ingin
>>> saya tanyakan adalah bagaimana cara membuat rumus function excel discount
>>> berjenjang tersebut, sehingga disc berjenjang akan timbul secara otomatis.
>>> Terima kasih sebelumnya.
>>>
>>> Salam,
>>>
>>> JIM
>>>
>>
>>
>>
>
>
- 6.
-
memisahkan menjadi 3 kolom
Posted by: "yeni suryaningsih" yenisuryaningsih@yahoo.com yenisuryaningsih
Thu Sep 15, 2011 6:02 am (PDT)
Master2 Excell yang baik,
Mohon pencerahan untuk data ini. Data ini ingin saya pisahkan menjadi 3 kolom (nama,alamat,telepon)
contoh :A Bot Citra Garden I AA-2/32.............. ......... ......... .541-5003
menjadi
A Bot di kolom A1
Citra Garden I AA-2/32 di kolom B1
541-5003 di kolom C1
maklum baru melek excell. terima kasih
Regards,
yeni
Need to Reply?
Click one of the "Reply" links to respond to a specific message in the Daily Digest.
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| selamat idul fitri, mohon maaf lahir dan batin... |
| www.linkedin.com/company/xl-mania |
| ayo pesan buku "mengapa boss benci chart anda" :D :D :D |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message, melecehkan, tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan winzip jika perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/ |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau... |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html |
+-------------------------------------------------------------------+
| Message lama ada di : |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id] |
| http://www.mail-archive.com/xl-mania@yahoogroups.com |
+-------------------------------------------------------------------+
| selamat idul fitri, mohon maaf lahir dan batin... |
| www.linkedin.com/company/xl-mania |
| ayo pesan buku "mengapa boss benci chart anda" :D :D :D |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message, melecehkan, tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan winzip jika perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/ |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau... |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html |
+-------------------------------------------------------------------+
| Message lama ada di : |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id] |
| http://www.mail-archive.com/xl-mania@yahoogroups.com |
+-------------------------------------------------------------------+
MARKETPLACE
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Individual | Switch format to Traditional
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe
Tidak ada komentar:
Posting Komentar