Selasa, 30 April 2013

]] XL-mania [[ Digest Number 2598

3 New Messages

Digest #2598
1
3a
Re: Short Dat dan Delete Baris Hasil Short by "WIRAnata Kemala Deng" kwiranata

Messages

Mon Apr 29, 2013 5:25 am (PDT) . Posted by:

"Adi Idrus"



Dear All Master Excel..

Mohon dibantu para master, Saya ingin menangkap hewan hewan-hewan ternak saya yang lepas dan terpencar lalu memasukan mereka kembali ke kandang (Saya pakai excel 2003). Detailnya mohon lihat pada attachment ya.

Terimakasih
Best regard

Adi Idrus.
PT. Bridgestone Tire Indonesia | QA Dept
Together to be The Best

Mon Apr 29, 2013 5:26 am (PDT) . Posted by:

"Eka Subyantara"

Baiklah Mas Goes_Hant,
tampaknya belum ada yang merespon masalah Anda ya?

Saya coba buat, hanya saja untuk 4 tim saja dalam satu grup.
Pertandingan dibuat dalam kompetisi penuh (2 kali bertanding = home n away)

Aturan rangking klasemen mengikuti yang Anda minta, sisanya saya nekat
pake logika sendiri dengan urutan.
1. Poinnya
2. Selisih gol
3. Kasih Gol
4. Terima Gol
5. Skor match

Silakan diperiksa lampirannya.

= eka =
Berbagi selama mampu

On 4/14/13, goes_hant <goes_hant@yahoo.com> wrote:
> salam para master excel,,
> tanpa a,i,u,e,o langsung saja
> skenarionya:
> beberapa pemuda kampung kami berencana mengadakan kompetisi sepakbola mini
> antar gang untuk tingkat SD,
> pesertanya ada 8 tim yang dibagi 2 group,
> untuk itu kami ingin kompetisi ini seperti liga inggris dari segi poin-poin,
> mungkin juga statistik pertandingan lainnya.
>
> pertanyaannya,
> bagaimana mengurutkan ranking secara otomatis jika sudah ada hasil
> pertandingan seperti layaknya liga inggris,
> jika menang dapet poin 3, draw 1, kalah 0,
> kalau menang posisinya langsung naik, misalnya timB sebelumnya posisi 2,
> setelah menang dengan tim A posisi 1, timB otomatis pindah ke posisi 1,
> sedangkan timA ke posisi 2,
> posisinya juga dipengaruhi oleh selisih gol.
> begitu selanjutnya dengan tim-tim yang lain.
>
> terima kasih atas bantuannya.
>
> regards,
> hant
>
>

Mon Apr 29, 2013 5:29 am (PDT) . Posted by:

"WIRAnata Kemala Deng" kwiranata

koreksi dikit :

"Dim counter As Integer " nya tidak dipakai dalam script. tadi bikin dim
nya, ganti nama jadi deletedR, tapi lalu lupa hapus :)

harap maklum, newbie soalnya :)

2013/4/27 WIRAnata Kemala Deng <kwiranata@gmail.com>

> newbie coba bantu ya, sekalian saya belajar VBA juga :)
>
> Sub cleanupsubOne()
>
> Dim ws As Worksheet
> Dim cell As Long
>
> Dim wsNum As Integer
>
> Dim counter As Integer
>
> deletedR = 0 'dipakai untuk di msgbox
> wsNum = ThisWorkbook.Sheets.Count 'dipakai untuk di msgbox
>
>
> For Each ws In ThisWorkbook.Worksheets
>
> For cell = ws.Range("C" & Rows.Count).End(xlUp).Row To 2 Step -1
> If ws.Range("C" & cell).Value < 1 Then
> ws.Rows(cell).EntireRow.Delete
> deletedR = deletedR + 1
> End If
> Next cell
> Next ws
>
> MsgBox "number of rows deleted : " & deletedR & " from " & wsNum & "
> worksheets "
>
>
> End Sub
>
>
>
> 2013/4/25 Samsul Arifin <syemy88@yahoo.co.id>
>
>> **
>>
>>
>> Para master-master excel semua
>> Bagaimana Script Macro Untuk Short Qty yang kurang dari 1 ( < 1 ) Dan
>> mendelete baris data yang Qty'nya < 1 secara otomatis Karena Saya
>> hanya membutuhkan Data dengan Qty 1 ke atas Data Saya dalam 1 excel ada
>> 31 Sheet, setiap sheet minimal 75ribu baris.
>> Saya ngerjain manual 3 bulan saja sudah lelah Mohon di bantu.
>> Terima Kasih
>>
>> Hormat Saya
>> Samsul Aripin
>>
>>
>>
>
>
GROUP FOOTER MESSAGE
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Merry Christmas. May God bless you and your family...             |
+-------------------------------------------------------------------+
| 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.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              |
+-------------------------------------------------------------------+

Tidak ada komentar:

Posting Komentar