Messages In This Digest (10 Messages)
- 1a.
- Re: Laporan Detail Stock Barang - FIFO From: Loheng Stone
- 1b.
- Re: Laporan Detail Stock Barang - FIFO From: Loheng Stone
- 2a.
- Re: Check Tanggal Kirim dan Distributor From: Markonah
- 2b.
- Re: Check Tanggal Kirim dan Distributor From: Markonah
- 2c.
- Re: Check Tanggal Kirim dan Distributor From: bagus
- 2d.
- Re: Check Tanggal Kirim dan Distributor From: bagus
- 3a.
- Active Macros on Share Workbook From: Gilang Patriot
- 4a.
- Bls: ]] XL-mania [[ Detail product sheet From: moheb boellah
- 5.
- Bagaimana menghitung kebutuhan lori dengan 2 type From: Maryanto
- 6a.
- Re: Cari rangking dan cara print From: umar umar
Messages
- 1a.
-
Re: Laporan Detail Stock Barang - FIFO
Posted by: "Loheng Stone" lohengstone@yahoo.com lohengstone
Mon May 28, 2012 5:57 am (PDT)
saya coba buat pake VBA Excel
cuma Worksheetnya saya gabung jadi satu supaya mudah pengerjaannya
salam
loheng
- 1b.
-
Re: Laporan Detail Stock Barang - FIFO
Posted by: "Loheng Stone" lohengstone@yahoo.com lohengstone
Mon May 28, 2012 6:02 am (PDT)
maaf postingan yg tadi salah ...
Macro ini hanya menyusun data barang dan stock akhir
kedalam perhitungan akhir sedangkan untuk perhitungan FIFOnya
lakukan secara manual
contoh ada pada attacmens
salam
loheng
- 2a.
-
Re: Check Tanggal Kirim dan Distributor
Posted by: "Markonah" markonatul@gmail.com m_tulqiyem
Mon May 28, 2012 5:57 am (PDT)
Sedikit perbaikan coding, dan sintaks penulisan fungsi di sheet.
Tujuannya agar: jarak kolom dbCode (B) ke kolom DelDate (Q) tidak harus
15, tetapi bebas dan bahkan boleh mundur :
dbCode (Syarat1) berada di sebelah kanan kolom DelDate (Syarat2)
*Sintaks penulisan di sheet*
=Apabila(KolomSyarat1, KolomSyarat2)
Array Formula Multi Hasil (ditulis sekaligus pada 100 cell sekolom
(AB2:AB101)
=Apabila(*B2:B101*,*Q2: Q101*)
*
*
*Code yg sudah di modifikasi (V2)*
Function Apabila(dCode As Range, dDeli As Range)
'= markonah - may 27, 2012, (V2) =='
' fungsi untuk menandai baris, apabila........
' pinjam code-part dari Rara (dimodif sedikit)
' XL-mania case # 20459
'-------------------- --------- --------- --------
Dim Nq As Variant, H()
Dim i As Long, n As Long, dR As Long
dR = dCode.Rows.Count
ReDim H(1 To dR)
For n = 1 To dR: H(n) = vbNullString: Next n
Nq = Uq(dCode, dDeli.Column - dCode.Column + 1)
For i = 1 To UBound(Nq)
For n = 1 To dR
If Nq(i) = dCode(n, 1) & dDeli(n, 1) Then
H(n) = 1: Exit For
End If
Next n
Next i
Apabila = WorksheetFunction.Transpose( H)
End Function
'-----------------
-markonah-
*2012/5/26 Nicodemus Rusdiyanto <tjahdjokja234@gmail.com >*
> Semangat Pagi,
> Di data attachment berikut ini, di kolom SHIP_TOT saya kesulitan untuk
membuat formula untuk men-deteksi;
> apabila di kirim ke distributor (DB_NAME/DB_CODE) yang sama, pada hari
yang sama [DEL_DATE] walaupun beberapa nomor di anggap 1 kali kirim,
walaupun ada beberapa baris, tetapi sama tanggal [DEL_DATE] dan sama
distributor (DB_NAME/DB_CODE) dan di kolom tersebut hanya menampilkan 1
kali kirim, tidak perlu diulang lagi
>
> demikian permasalahannya.
> thanks in advance,
> Nico
- 2b.
-
Re: Check Tanggal Kirim dan Distributor
Posted by: "Markonah" markonatul@gmail.com m_tulqiyem
Mon May 28, 2012 5:58 am (PDT)
Begini boleh ndak ya..?? Pakai fungsi Apabila
*Array Formula Multi Hasil *(ditulis sekaligus pada 100 cells sekolom
(AB2:AB101)
*{*=Apabila(B2:B101)* }*
skript/koding vba-nya
'----------
Function Apabila(Kolom As Range) As Variant
'= markonah - may 27, 2012 =='
' pinjam dari Rara (di modif sedikit)
' XL-mania case # 20459
' asumsi : Kolom Del_Date SELALU ada di Kolom Q
' atau kolom ke 16 dihitng dari kolom B
'-------------------- --------- ---------
Dim Nq As Variant, H(), i As Long, n As Long
ReDim H(1 To Kolom.Rows.Count)
For n = 1 To Kolom.Rows.Count: H(n) = vbNullString: Next n
Nq = Uq(Kolom)
For i = 1 To UBound(Nq)
For n = 1 To Kolom.Rows.Count
If Nq(i) = Kolom(n, 1) & "-" & Kolom(n, 16) Then
H(n) = 1
Exit For
End If
Next n
Next i
Apabila = WorksheetFunction.Transpose( H)
End Function
'-----------
-mbok markonah-
jual gudeg di gang sebelah
2012/5/26 Nicodemus Rusdiyanto <tjahdjokja234@gmail.com >
> **
>
> *Semangat Pagi,*
> *Di data attachment berikut ini, di kolom SHIP_TOT saya kesulitan untuk
> membuat formula untuk men-deteksi;*
> *
>
> - apabila di kirim ke distributor (DB_NAME/DB_CODE) yang sama, pada
> hari yang sama [DEL_DATE] walaupun beberapa nomor di anggap 1 kali kirim,
> walaupun ada beberapa baris, tetapi sama tanggal [DEL_DATE] dan sama
> distributor (DB_NAME/DB_CODE) dan di kolom tersebut hanya menampilkan 1
> kali kirim, tidak perlu diulang lagi
>
> demikian permasalahannya.
>
> thanks in advance,
> Nico
> *
>
- 2c.
-
Re: Check Tanggal Kirim dan Distributor
Posted by: "bagus" bagus@kingjim.co.id bagus4bls
Mon May 28, 2012 5:58 am (PDT)
Dear Nico;
File terlampir semoga sesuai harapan
Bagus
Sent from my Taxiphone®
----- Original Message -----
From: Nicodemus Rusdiyanto
To: XL Mania
Sent: Saturday, May 26, 2012 4:30 PM
Subject: ]] XL-mania [[ Check Tanggal Kirim dan Distributor
Dear Mastah,
Semangat Pagi,
Di data attachment berikut ini, di kolom SHIP_TOT saya kesulitan untuk membuat formula untuk men-deteksi;
a.. apabila di kirim ke distributor (DB_NAME/DB_CODE) yang sama, pada hari yang sama [DEL_DATE] walaupun beberapa nomor di anggap 1 kali kirim, walaupun ada beberapa baris, tetapi sama tanggal [DEL_DATE] dan sama distributor (DB_NAME/DB_ CODE) dan di kolom tersebut hanya menampilkan 1 kali kirim, tidak perlu diulang lagi
demikian permasalahannya.
thanks in advance,
Nico
- 2d.
-
Re: Check Tanggal Kirim dan Distributor
Posted by: "bagus" bagus@kingjim.co.id bagus4bls
Mon May 28, 2012 5:58 am (PDT)
Dear Nico;
Apakah seperti ini..?
file terlampir
Bagus
Sent from my Taxiphone®
----- Original Message -----
From: Nicodemus Rusdiyanto
To: bagus
Cc: XL-mania@yahoogroups.com
Sent: Monday, May 28, 2012 9:15 AM
Subject: Re: ]] XL-mania [[ Check Tanggal Kirim dan Distributor
dear Mastah Bagus,
Pakai kolom bantu tidak masalah, tapi bisa langsung ditaruh menjadi 1 sheet atau tidak ya?
Sehingga hanya revise formula-nya :)
Thanks in advance,
Nico
2012/5/28 bagus <bagus@kingjim.co.id >
Dear Nico;
File terlampir semoga sesuai harapan
Bagus
Sent from my Taxiphone®
----- Original Message -----
From: Nicodemus Rusdiyanto
To: XL Mania
Sent: Saturday, May 26, 2012 4:30 PM
Subject: ]] XL-mania [[ Check Tanggal Kirim dan Distributor
Dear Mastah,
Semangat Pagi,
Di data attachment berikut ini, di kolom SHIP_TOT saya kesulitan untuk membuat formula untuk men-deteksi;
a.. apabila di kirim ke distributor (DB_NAME/DB_CODE) yang sama, pada hari yang sama [DEL_DATE] walaupun beberapa nomor di anggap 1 kali kirim, walaupun ada beberapa baris, tetapi sama tanggal [DEL_DATE] dan sama distributor (DB_NAME/DB_ CODE) dan di kolom tersebut hanya menampilkan 1 kali kirim, tidak perlu diulang lagi
demikian permasalahannya.
thanks in advance,
Nico
- 3a.
-
Active Macros on Share Workbook
Posted by: "Gilang Patriot" gilangpatriot@yahoo.com gilangpatriot
Mon May 28, 2012 5:58 am (PDT)
Dear Para Pakar,
Perkenalkan saya gilang..baru saja bergabung di forum ini.
Saya mempunyai pertanyaan.
"Bagaimana caranya agar Macros tetap bisa dibaca maupun edit jika file di
sharing.
Setelah file dishare di Review---Share workbookâ€"
Muncul informasi :
"This workbook contains macros recorded or written in visual basic. Macros
cannot viewed or edited in shared workbooks"
Walau saya OK kan, tapi macro tetap tidak bekerja, muncul message "Run-time
error `1004': Unprotect method of worksheet class failed"
Mohon infonya bagaimana cara mensetting agar macro tetap jalan saat workbook di
haring.
Mohon maaf jika topik ini sudah dibahas,
terimakasih atas bantuannya
salam
gilang
Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use
.
- 4a.
-
Bls: ]] XL-mania [[ Detail product sheet
Posted by: "moheb boellah" brohebnol@yahoo.com brohebnol
Mon May 28, 2012 5:58 am (PDT)
Bisa juga tanpa kolom bantu.
Di cell E2 isi formula berikut;
=B2&"-"&TEXT(1,"000")
Formula untuk cell E3;
=IF(B3=B2,B3&"-"&TEXT( RIGHT(E2, 3)+1,"000" ),B3&"-"& TEXT(1,"000" ))
Selanjutnya tinggal copy saja formula dari E3.
Regards,
Muhib
_____________________ _________ __
Dari: NANG Agus <nangagus@gmail.com >
Kepada: XL-mania@yahoogroups.com
Dikirim: Sabtu, 26 Mei 2012 15:41
Judul: Re: ]] XL-mania [[ Detail product sheet
Dear marsidi.
Coba gunakan formula vlookup dan index.
untuk membuat baris baru saya menggunakan kolom bantu untuk meloncat ke nomor selanjutnya.
Sepertinya bukan solusi yang diminta deh,.......
tapi patut dilihat dahulu diberi komentar, agar members lain dapat menanggapi
Sekatang kita ke TKP.....
salam
Nang Agus
2012/5/21 Marsidi MP <marsidi.2905@gmail.com >
>
>Dear para master excell,
>
>
>
>saya punya data di sheet DATA, bagaimana cara pengisian di sheet serial dan karateristik sesuai dengan data yang ada di sheet DATA
>
>
>mohon pencerahannya.......
>
>
>tks
- 5.
-
Bagaimana menghitung kebutuhan lori dengan 2 type
Posted by: "Maryanto" maryanto@stanley.co.id
Mon May 28, 2012 5:58 am (PDT)
maaf para master excel.. Si newbie ini kembali bertanya..
Dulu saya pernah menanyakan hai ini, namun dulu dengan hanya 1 item seperti tabel dibawah.
Kali ini saya ingin menanyakan apakah bisa dengan satu rumus saja, dapat menghitung kebutuhan lori dengan 2 tyoe separti tabel diatas..
sebelum dan sesudahnya saya ucapkan terima kasih.
- 6a.
-
Re: Cari rangking dan cara print
Posted by: "umar umar" umaralfaruk@yahoo.com umaralfaruk
Mon May 28, 2012 5:59 am (PDT)
mencoba njawab no 2
--- On Fri, 5/25/12, selamat Rifki <selamat0902@yahoo.com > wrote:
From: selamat Rifki <selamat0902@yahoo.com >
Subject: ]] XL-mania [[ Cari rangking dan cara print
To: "XL-mania@yahoogroups.com " <XL-mania@yahoogroups.com >
Date: Friday, May 25, 2012, 2:11 AM
hallo para sohib pakar excell, mohon bantuannya ya..
dalam file saya ingin saya tanyakan 2 hal :
1.Pada sheet LEGER pada kolom rangking (AE), bila ada yang sama kok rangking selanjutnya hilang. Contoh rangking 3 ada dua siswa setelah itu rangking 4 tidak ada alias langsung rangking 5. Yang saya pengen rangking 3 tetep ada dua siswa, selanjutnya rangking 4 dan seterusnya... bagaimana rumusnya ya
2. pada sheet RAPORT, bagaimana cara print langsung dalam jumlah banyak...sementara ini saya cuma bisa print satu per satu dengan mengganti angka merah pada sel B1
Mohon bantuannya ya.. terima kasih banyak sebelumnya. Tuhan yang akan membalas kebaikan Anda
Need to Reply?
Click one of the "Reply" links to respond to a specific message in the Daily Digest.
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Delay pada posting disebabkan sibuknya momods dan leletnya |
| koneksi dengan ind***t. bwakakakaka....
+-------------------------------------------------------------------+
| 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 |
+-------------------------------------------------------------------+
| Delay pada posting disebabkan sibuknya momods dan leletnya |
| koneksi dengan ind***t. bwakakakaka....
+-------------------------------------------------------------------+
| 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 |
+-------------------------------------------------------------------+
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