Messages In This Digest (5 Messages)

1a.: Re: Maximum Loop From: STDEV(i)

2.: isi list worksheet pada file yg tertutup From: muja

3a.: Bls: ]] XL-mania [[ memisahkan menjadi 3 kolom From: Badu Lie

4.: Cara Menhitung gaji dengan rumus berserta OT From: Lina Lyn (Evanindo Jaya)

5.: fungsi if lebih dari 3 argumen From: Aspriyo Bulurejo

View All Topics | Create New Topic

Messages

1a.: Re: Maximum Loop

Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi

Mon Sep 19, 2011 6:41 pm (PDT)

maafkan diriku, tidak diundang ikut ngomong

saya pernah "mengadakan" loop yg jumlah perulangannya lebih dari 50000
tetap bisa jalan

mendelete (*bukan *menghapus isi data) ROW bersyarat, dengan loop,
lebih aman dilakukan secara mundur (terbalik), dari index baris terbawah
menuju index baris teratas.

misal MyRange adalah Range A1:AD65000
makro ini sudah dicoba, tidak macet, dan tugasnya berhasil

Sub Loooooooop()
'ctv / 18 sep 2011 / BeExcel
Dim MyRange As Range, r As Long, JmlBaris As Long
Set MyRange = Range("A1:AD65000")
JmlBaris = MyRange.Rows.Count
Application.Calculation = xlCalculationManual

* ' Loop 65ribu step menDELETED ROW PENUH yg kolom X nya bertuliskan
"delete"*
For r = JmlBaris To 1 Step -1
If LCase(MyRange(r + 1, 24)) = "delete" Then
MyRange(r + 1, 1).EntireRow.Delete
End If
Next

Application.Calculation = xlCalculationAutomatic
MsgBox "SELESAI"
End Sub

cmiiw.-

siti
The DO and The DONT's ......
http://www.box.net/shared/2mbjr3g654k1ubiomijq

2011/9/17 Hachi Rizki <hachiuz_ld27@yahoo.co.id>

> Dear Mr. Kid,
> untuk tabel sourcenya sudah sesuai dengan asumsi Mr :d
> sebenarnya tujuan saya adalah mendelete rownya, karena data yang ada
> "delete" nya tidak akan dipakai pada proses pengolahan data selanjutnya..
> Setelah mengutak-atik saya menemukan caranya, logikanya sama dengan cara
> yang mas sebutkan, tapi scripnya agak beda...
>
> *Namun saya masih bertanya2 tentang jumlah maksimum loop..*
> *karena rekan kerja saya juga mengalami hal serupa, dimana loop nya error
> ketika datanya sekitar 50.000-an*
> *Ada yang bisa memberi penjelasan, atau kah ada error lainnya yang saya
> tidak sadar..*
>
> terima kasih,
> Hachi
>
>

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (8)

2.: isi list worksheet pada file yg tertutup

Posted by: "muja" mail4muja@yahoo.co.id muja_muje

Mon Sep 19, 2011 6:43 pm (PDT)

Dear Xl Master,
Terima kasih buat respon2nya...sangat membantu sekali... :D
Sekarang mau tanya neh, Bagaimana cara mengetahui nama sheet yang ada dalam file excel tapi dalam kondisi file tersebut tidak terbuka...
Misal Nama file : Penjualan.xls daftar sheet yang ada : home, stok barang, penjualan dan rekapitulasi...
bagaimana cara menampilkan nama2 sheet tsb dalam listbox sementara file tersebut tidak dalam kondisi aktif....
Makasih banyak buat responnya....

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (1)

3a.: Bls: ]] XL-mania [[ memisahkan menjadi 3 kolom

Posted by: "Badu Lie" himalaya885069@yahoo.co.id himalaya885069

Mon Sep 19, 2011 6:49 pm (PDT)

Dear Yeni...

Mencoba membantu
1. Gabungkan dulu kolom a & b dengan rumus "&", setelah itu di paste value.
2. Hilangkan dulu ............ di dalam data karena titik2 tersebut emang gak dipakai (gunakan fungsi replace dan ganti dengan spasi).
3. Ada yang harus dikerjakan manual.. karena Excel gak akan tau dalam 1 kalimat mana nama orang, mana nama jalan
    contoh : A Bot Citra Garden I AA-2/32
          Mungkin Abot beralamat di jalan Citra Citra Garden I AA-2/32 atau
          A Bot Citra beralamat di jalan Garden I AA-2/32 atau
          A Bot Citra Garden beralamat di jalan I AA-2/32 dsb
Jadi buat kolom tambahan jumlah kata pada nama (lihat di attachment)
Setelah itu baru pakai Jurus warisan para Master Excel Mania (Kalo gak salah jurus Elang Perak dari Mr. Kid)
Semoga membantu

NB : Harusnya Excel bukan Excell....... dan sebaiknya data yang dilampirkan dalam contoh soal secukupnya saja

Regards
Badu

Dari: yeni suryaningsih <yenisuryaningsih@yahoo.com>
Kepada: "XL-mania@yahoogroups.com" <XL-mania@yahoogroups.com>
Dikirim: Kamis, 15 September 2011 16:26
Judul: ]] XL-mania [[ memisahkan menjadi 3 kolom

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

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (2)

4.: Cara Menhitung gaji dengan rumus berserta OT

Posted by: "Lina Lyn (Evanindo Jaya)" Lina_lyn@evanindojaya.com

Mon Sep 19, 2011 6:49 pm (PDT)

Dear Pakar2 Excel

Saya kesulitan dalam menghitung gaji
mohon untuk petunjuknya dengan mengunakan rumus yang benar...
Thanks

Best Regards

Lina

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (1)

5.: fungsi if lebih dari 3 argumen

Posted by: "Aspriyo Bulurejo" u_aryoda_as@yahoo.com u_aryoda_as

Mon Sep 19, 2011 8:17 pm (PDT)

saya mempunyai data pada sel A1 dan B1 serta B2 dengan penjelasan sebagai berikut :

JIKA : A1=    1    DAN B1=    1    MAKA B2=    A
JIKA : A1=    2    DAN B1=    1    MAKA B2=    B
JIKA : A1=    3    DAN B1=    1    MAKA B2=    C
JIKA : A1=    1    DAN B1=    2    MAKA B2=    D
JIKA : A1=    2    DAN B1=    2    MAKA B2=    E
JIKA : A1=    3    DAN B1=    2    MAKA B2=    F
JIKA : A1=    4    DAN B1=    2    MAKA B2=    G
JIKA : A1=    5    DAN B1=    2    MAKA B2=    H
JIKA : A1=    6    DAN B1=    2    MAKA B2=    I
JIKA : A1=    7    DAN B1=    2    MAKA B2=    J

saya berusaha menggunakan fungsi if seperti ini

=IF(A1=1;IF(B1=1;"A");IF(A1=2;IF(B1=1;"B");IF(A1=3;IF(B1=1;"C");IF(A1=1;IF(B1=2;"D"))))) dst.

namun setelah argumen ke-3 dan seterusnya menghasilkan false
mohon bantuan teman2 yang jago dalam hal ini,,thanks

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (1)

Create New Topic | Visit Your Group on the Web

Messages

+-:: XL-mania ::::::::::::::::::::----------------------------------+
| ayooo... coba cari XL-mania di linkedin.com                       |
| ayo pesan buku "mengapa boss benci chart anda", 20 buku lagi...   |
+-------------------------------------------------------------------+
| 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

Stay on top of your group activity without leaving the page you're on - Get the Yahoo! Toolbar now.

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

EXCEL FEED

Selasa, 20 September 2011

]] XL-mania [[ Digest Number 2257

Messages In This Digest (5 Messages)

Messages

Re: Maximum Loop

Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi

Mon Sep 19, 2011 6:41 pm (PDT)

isi list worksheet pada file yg tertutup

Posted by: "muja" mail4muja@yahoo.co.id muja_muje

Mon Sep 19, 2011 6:43 pm (PDT)

Bls: ]] XL-mania [[ memisahkan menjadi 3 kolom

Posted by: "Badu Lie" himalaya885069@yahoo.co.id himalaya885069

Mon Sep 19, 2011 6:49 pm (PDT)

Cara Menhitung gaji dengan rumus berserta OT

Posted by: "Lina Lyn (Evanindo Jaya)" Lina_lyn@evanindojaya.com

Mon Sep 19, 2011 6:49 pm (PDT)

fungsi if lebih dari 3 argumen

Posted by: "Aspriyo Bulurejo" u_aryoda_as@yahoo.com u_aryoda_as

Mon Sep 19, 2011 8:17 pm (PDT)

Tidak ada komentar:

Posting Komentar

Followers

Blog Archive

About Me