Rabu, 15 Agustus 2012

]] XL-mania [[ Digest Number 2462

3 New Messages

Digest #2462

Messages

Tue Aug 14, 2012 5:44 am (PDT) . Posted by:

"dam_alchemist" dam_alchemist

kakak2, permisi sebelumnya :)
mau tanya, kalau ada beberapa data yang membentuk grafik (misal untuk X dan Y membentuk grafik setengah lingkaran). kemudian ada beberapa data yang akan di plot dalam sumbu X dan Y, nah masalahnya adalah bila ada salah 1 data ketika beberapa data tersebut (yang bukan grafik), berada di luar grafik, maka muncul keterangan : "Not Ok", tapi bila semua data berada di dalam grafik keterangannya : "Ok"

mohon pencerahannya kakak2 sekalian, terima kasih :)

Tue Aug 14, 2012 5:30 pm (PDT) . Posted by:

"bagus" bagus4bls

Dear Pak Wijaya;

File terlampir semoga sesuai harapan

Bagus
----- Original Message -----
From: effendi Wijaya
To: XL-mania@yahoogroups.com
Sent: Friday, August 10, 2012 9:39 PM
Subject: ]] XL-mania [[ mencari BOM ( bill of material )

Dear Para pakar excel mania,

Trimakasih pada group ini,karena banyak membantu sy dalam menyelesaikan pekerjaan sehari hari

Kali ini sy butuh bantuan dari pakar semua,

Bagaimana mencari BOM dari suatu product,

Contoh kasus terlampir.

Trimakasih pada teman2 yg bias kasih solusi, pakai formula or macro is ok.

E.Wijaya

Tue Aug 14, 2012 5:31 pm (PDT) . Posted by:

"hendrik karnadi" hendrikkarnadi

Kelihatannya belum ada yang menjawab mungkin karena judulnya mencari "BOM".
Jadi supaya lebih enak nama file lampirannya saya tambahkan Filtering sesuai dengan temanya.
Saya menggunakan macro dan filenya saya save as dengan extension .xls (Excel 2003) supaya lebih banyak rekan XL-mania yang dapat menggunakannya.

Macro dalam file terlampir terdiri dari dua, yaitu :
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target = Range("K5") Then
        Call Filtering
    End If
End Sub

ditulis pada Sheet7 dan

Sub Filtering()
    Dim Rng As Range
    Dim i As Integer
    Dim r As Integer
    Set Rng = Range("C3").CurrentRegion
    Application.ScreenUpdating = False
    Application.Calculation = xlCalculationManual
    Range("C3:F3").Select
    Selection.Find(What:=Range("K5"), After:=ActiveCell, LookIn:=xlFormulas, LookAt _
        :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
        False, SearchFormat:=False).Activate
    ActiveCell.Offset(1, 0).Select
    r = 6
    For i = 1 To Rng.Rows.Count - 1
        If ActiveCell.Value > 0 Then
            r = r + 1
            ActiveCell.Copy Range("K" & r)
            Cells(ActiveCell.Row, 2).Copy Range("J" & r)
            ActiveCell.Offset(1, 0).Select
        Else
            ActiveCell.Offset(1, 0).Select
        End If
    Next i
    Range("K5").Select
    Application.ScreenUpdating = True
    Application.Calculation = xlCalculationAutomatic
End Sub

ditulis pada module1  

Salam,
Hendrik Karnadi

________________________________
From: effendi Wijaya <effendiwijaya@gmail.com>
To: XL-mania@yahoogroups.com
Sent: Friday, 10 August 2012, 21:39
Subject: ]] XL-mania [[ mencari BOM ( bill of material )


 
Dear Para pakar excel mania,
 
Trimakasih pada group ini,karena banyak membantu sy dalam
menyelesaikan pekerjaan sehari hari
Kali ini sy butuh bantuan dari pakar semua,
 
Bagaimana mencari BOM dari suatu product,
Contoh kasus terlampir.
 
Trimakasih pada teman2  yg bias kasih solusi, pakai
formula or macro  is ok.
 
E.Wijaya
 
 
 
 
GROUP FOOTER MESSAGE
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Selamat beribadah puasa...                                        |
+-------------------------------------------------------------------+
| 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              |
+-------------------------------------------------------------------+
Diposting oleh EXCEL FEED LEARNING di 05.14

Tidak ada komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)