Selasa, 29 Mei 2012

[belajar-excel] Digest Number 1630

Messages In This Digest (4 Messages)

1a.
Monitoring lama Simpan From: rodhy hakim
1b.
Re: Monitoring lama Simpan From: Markonah
1c.
Ambil data tertentu From: Magung Saputra
1d.
Re: Ambil data tertentu From: Ki Semprul

Messages

1a.

Monitoring lama Simpan

Posted by: "rodhy hakim" odhyz83_assasaky@yahoo.com   odhyz83_assasaky

Mon May 28, 2012 3:22 am (PDT)



Dear Para Master,
 
Mohon pencerahannya, saya ingin membuat monitoring lama simpan barang dengan excel, namun saya kesulitan membuat inputan kalender untuk tanggal dan untuk menampilkan keterangan secara secara otomatis, agar di kolom keterangan akan muncul "material akan expired pada "ddmmyy".
dan pada saat input di row baru akan otomatis muncul inputan untuk kalendera dan keterangan pada kolom keterangan.
 
Terima kasih atas pencerahannya.
 
Salam,
1b.

Re: Monitoring lama Simpan

Posted by: "Markonah" markonatul@gmail.com   m_tulqiyem

Mon May 28, 2012 12:49 pm (PDT)



(I)
Untuk memberi keterangan Expired-Date kok kita gak diberi tahu 'Aturannya'
ya ?
(umur suatu item dihitung sejak tgl X)

(II)
Makro ditulis di Module Sheet1; berupa dua buah Prosedur Event

Makro / prosedur pertama mengatur agar jika salah satu CELL di COLUMN B *
di-Klik-Kanan*
*agar memunculkan Kalendar*
*
*
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As
Boolean)
'--cde vba: Markonah May 29, 2012
'--kasus BeExcel #17302
If Target.Count = 1 Then
If Target.Column = 2 Then
If Target.Row > 4 Then
frmCalendar.Show
Cancel = True
End If
End If
End If
End Sub

Makro kedua mengatur agar jika kolom B diubah/diisi, - agar otomatis
dituliskan
rumus TODAY di kolom D, rumus LAMA SIMPAN di kolom F dan RUMUS "embuh"
di kolom G

Private Sub Worksheet_Change(ByVal Target As Range)
'--cde vba: Markonah May 29, 2012
'--kasus BeExcel #17302
If Target.Count = 1 Then
If Target.Column = 2 Then
If Target.Row > 4 Then
If Not Target.Value = vbNullString Then
Target(1, 3).Formula = "=TODAY()"
Target(1, 5).Formula = "=DATEDIF(RC[-4],RC[-2],""m"") & "" bulan, "" &
DATEDIF(RC[-4],RC[-2],""md"") & "" hari."""
Target(1, 6).Value = "Material akan expired pada tanggal ""ddmmyy"""
Else
Target(1, 3) = "": Target(1, 5) = "": Target(1, 6) = ""
End If
End If
End If
End If
End Sub
----------------------

Makro lain (di modue userForm) mengatur perilaku Form dan Calendar, secara
minimal

Wassalam,
*''pok markonah, penjual gudeg di gang sebelah'*

2012/5/28 rodhy hakim <odhyz83_assasaky@yahoo.com>

> **
>
> Mohon pencerahannya, saya ingin membuat monitoring lama simpan barang
> dengan excel, namun saya kesulitan membuat inputan kalender untuk tanggal
> dan untuk menampilkan keterangan secara secara otomatis, agar di kolom
> keterangan akan muncul "material akan expired pada "ddmmyy".
> dan pada saat input di row baru akan otomatis muncul inputan untuk
> kalendera dan keterangan pada kolom keterangan.
> Terima kasih atas pencerahannya.
> Salam,
>
>
>
1c.

Ambil data tertentu

Posted by: "Magung Saputra" saputra.magung@yahoo.com   saputra.magung

Mon May 28, 2012 5:57 pm (PDT)





Dear masters,
 
Mohon bantuannya solusinya.
Saya memiliki data sumber yang yang terdiri dari beberapa row yang dalam
satu row tersebut memiliki beberapa kolom.  Salah satunya adalah kolom
prosentase.
Nah dalam hal ini saya
ingin menarik data dari beberapa row tersebut dengan seluruh kolom yang
ada namun hanya untuk  row yang memiliki prosentase

> 100%. Dibawah
itu tidak diambil. Jadi key kuncinya adalah kolom prosentase.

Terimakasih sebelumnya.

Salam,  
Saputra
1d.

Re: Ambil data tertentu

Posted by: "Ki Semprul" semprul.ki@gmail.com   ki_semprull

Mon May 28, 2012 7:00 pm (PDT)



Lha ini kan namana FILTERING / PEMFILTERAN...

Dengan mudah dapat di kerjakan dengan fitur AUTOFILTER
Bisa juga dengan FORMULA (hasil harus di range lain)

Contoh kasus / tanya & jawaban kasus spt ini sudah amat banyak +menghias
angkasa..
Disarankan pemakai excel puya buku panduan standar pengoperasian excel (dan
dibaca)

Salam
*Semprul ! Ki !*

*catatan:*
*lihat thread di web milis *
*threads mejadi rusak / beralih ke subject lain karena posting sebelum
email ini ..*
*(mungkin sdr magung membuka kasus baru tetapi dengan cara menjawab*
*meneruskan kasus yg sudah ada walaupun sudah mengubah Subjectnya)*
*Kacian deh milis kita....*
*
*
[image: Inline image 1]

2012/5/29 Magung Saputra <saputra.magung@yahoo.com>

> **
> Dear masters,
> Mohon bantuannya solusinya.
> Saya memiliki data sumber yang yang terdiri dari beberapa row yang dalam
> satu row tersebut memiliki beberapa kolom. Salah satunya adalah kolom
> prosentase.
> Nah dalam hal ini saya ingin menarik data dari beberapa row tersebut
> dengan seluruh kolom yang ada namun hanya untuk row yang memiliki
> prosentase
> > 100%. Dibawah itu tidak diambil. Jadi key kuncinya adalah kolom
> prosentase.
> Terimakasih sebelumnya.
>
> Salam,
> Saputra
>
Recent Activity
Visit Your Group
Yahoo! Finance

It's Now Personal

Guides, news,

advice & more.

Yahoo! Groups

Mental Health Zone

Bi-polar disorder

Find support

Find helpful tips

for Moderators

on the Yahoo!

Groups team blog.

Need to Reply?

Click one of the "Reply" links to respond to a specific message in the Daily Digest.

Create New Topic | Visit Your Group on the Web
---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com

posting ke milis, kirimkan ke:
belajar-excel@yahoogroups.com

berkunjung ke web milis
http://tech.groups.yahoo.com/group/belajar-excel/messages

melihat file archive / mendownload lampiran
http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/

menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com

keluar dari membership milis (UnSubscribe):
kirim mail kosong ke  belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------

Tidak ada komentar:

Posting Komentar