Rabu, 14 September 2011

[belajar-excel] Digest Number 1324

Messages In This Digest (9 Messages)

Messages

1a.

Combo Box multi coloumn disertai validasi

Posted by: "Yudha Saptiadi" yudhasaptiadi@gmail.com   yudhasaptiadi

Tue Sep 13, 2011 3:28 pm (PDT)



Dear Para Pakar...

Mohon bantuan macro-nya agar bisa menampilkan combo box dengan multi coloumn
disertai validasinya
berikut lampirannya.

sebelumnya saya ucapkan terimakasih untuk waktu yang disediakan...
Regards,

Yudha
1b.

Re: Combo Box multi coloumn disertai validasi

Posted by: "Haps" hapsari.stlizbeth@gmail.com   liz_hap

Tue Sep 13, 2011 5:37 pm (PDT)



*ada dua prosedur*
*
*
*(1)*
*--- ditulis di module sheet2 (sheet yg ada comboboxnya)---*
*
*
Private Sub CboScope_Change()
' menampilkan data sesuai piihan di cbobox
' pada saat terjadi *event Change* pada Combobox
' modified by: Haps 15 sept 2011
'---------------------------------
Dim R As Long, xList As Range

Set xList = Application.Range("List_SCOPE")
R = 0
With CboScope
R = .ListIndex + 1
Range("B7") = xList(R, 1)
Range("B8") = xList(R, 2)
End With
End Sub

*(2)*
*--- ditulis di module sheet1 (sheet yg ada Tabel yag akan dijadikan
list)---*

Private Sub Worksheet_Activate()
'--- dari mba ct ----'
' mengisi combobox dgn list dari sheet1 2 kolom
' modif by: Haps 15 sept 2011
'---------------------------------
Dim PKRJN As Range
Set PKRJN = Sheets("sheet1").Range("B1").CurrentRegion.Offset(1, 0)
Set PKRJN = PKRJN.Resize(PKRJN.Rows.Count - 1, 2)
PKRJN.Name = "List_SCOPE"
With Sheets("Sheet2").CboScope
.LinkedCell = ""
.ListFillRange = PKRJN.Name
.ColumnCount = 2
.BoundColumn = 1
.LinkedCell = ""
.ListRows = 20
.ColumnWidths = "70 pt;200 pt"
End With
End Sub

2011/9/14 Yudha Saptiadi <yudhasaptiadi@gmail.com>
>
> Mohon bantuan macro-nya agar bisa menampilkan combo box dengan multi
coloumn disertai validasinya
> berikut lampirannya.
> sebelumnya saya ucapkan terimakasih untuk waktu yang disediakan...
> Regards,
> Yudha
1c.

Re: Combo Box multi coloumn disertai validasi

Posted by: "Haps" hapsari.stlizbeth@gmail.com   liz_hap

Tue Sep 13, 2011 5:50 pm (PDT)



Koreksi makro di module sheet1;

harusnya " Private Sub Worksheet_*Deactivate() "*
*
*
bukan * " *Private Sub Worksheet_*Activate*() "

maksudnya
makro dijalankan jika *sheet1* di-non-aktifkan (pernah diaktifkan kemudian
mengaktifkan sheet lain (sheet2)
(barangkali SETELAH user meng-edit isi Sheet1.)

artinya: jika terjadi *event DeActivate* terhadap sheet1; makro mengUpdate
isi combobox dengan isi tabel di sheet1

CMIIW... / haps

2011/9/14 Haps <hapsari.stlizbeth@gmail.com>

> *
> *
> *(2)*
> *--- ditulis di module sheet1 (sheet yg ada Tabel yag akan dijadikan
> list)---*
>
> Private Sub Worksheet_Activate()
> ' mengisi combobox dgn list dari sheet1 2 kolom
> Dim PKRJN As Range ' dst.....
>
End Sub
>
>
2a.

Packing list dengan kondisi tertentu secara otomatis

Posted by: "Sodikin, Akhmad" akhmad.sodikin@bluescopesteel.com

Tue Sep 13, 2011 6:25 pm (PDT)




HI..
Salam kenal semuanya xl mania...krn kebetulan saya baru bergabung di forum yg keren ini

Dlm kesempatan ini, mohon bantuannya kalau ada teman2 yg mengerti dan tau solusi utk problem saya seperti terlampir
Sebelumnya mohon maaf kalau ada yg kurang berkenan

Salam,
Sodik

________________________________

NOTICE - This message and any attached files may contain information that is confidential, legally privileged or proprietary. It is intended only for use by the intended recipient. If you are not the intended recipient or the person responsible for delivering the message to the intended recipient, be advised that you have received this message in error. Any dissemination, copying, use or re-transmission of this message or attachment, or the disclosure of any information therein, is strictly forbidden. BlueScope Steel Limited does not represent or guarantee that this message or attachment is free of errors, virus or interference.

If you have received this message in error please notify the sender immediately and delete the message. Any views expressed in this email are not necessarily the views of BlueScope Steel Limited.
2b.

Re: Packing list dengan kondisi tertentu secara otomatis

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Tue Sep 13, 2011 10:00 pm (PDT)



Hai Sodik,

Mungkin seperti file terlampir.

Kid.

On Wed, Sep 14, 2011 at 08:21, Sodikin, Akhmad <
akhmad.sodikin@bluescopesteel.com> wrote:

> **
>
>
> **
>
> HI..
> Salam kenal semuanya xl mania...krn kebetulan saya baru bergabung di forum
> yg keren ini
>
> Dlm kesempatan ini, mohon bantuannya kalau ada teman2 yg mengerti dan tau
> solusi utk problem saya seperti terlampir
> Sebelumnya mohon maaf kalau ada yg kurang berkenan
>
> Salam,
> Sodik
>
>
>
>
> **
>
>
> ------------------------------
>
>
> NOTICE - This message and any attached files may contain information that
> is confidential, legally privileged or proprietary. It is intended only for
> use by the intended recipient. If you are not the intended recipient or the
> person responsible for delivering the message to the intended recipient, be
> advised that you have received this message in error. Any dissemination,
> copying, use or re-transmission of this message or attachment, or the
> disclosure of any information therein, is strictly forbidden. BlueScope
> Steel Limited does not represent or guarantee that this message or
> attachment is free of errors, virus or interference.
>
> If you have received this message in error please notify the sender
> immediately and delete the message. Any views expressed in this email are
> not necessarily the views of BlueScope Steel Limited.
>
>
>
2c.

Packing list dengan kondisi tertentu secara otomatis

Posted by: "Sodikin, Akhmad" akhmad.sodikin@bluescopesteel.com

Wed Sep 14, 2011 12:53 am (PDT)



Resend (maaf
Mas Kid...terima kasih banyak atas responnya yg cepat dan sharing ilmu excel nya

Namun yg saya maksud adalah bagaimana caranya supaya pack list tersebut langsung terbentuk....Dengan cara saya copy paste aja data dari system saya..ke master data (sheet1)
Jadi...jika saya paste data di worksheet "sheet1" pack list di worksheet PACK_L_TDK1 (2) sdh terbentuk berupa data terlampir (secara otomatis)

Mohon pencerahannya teman2 semua

Best Regards,
Sodik
PT. Bluescope Lysaght Indonesia

________________________________

NOTICE - This message and any attached files may contain information that is confidential, legally privileged or proprietary. It is intended only for use by the intended recipient. If you are not the intended recipient or the person responsible for delivering the message to the intended recipient, be advised that you have received this message in error. Any dissemination, copying, use or re-transmission of this message or attachment, or the disclosure of any information therein, is strictly forbidden. BlueScope Steel Limited does not represent or guarantee that this message or attachment is free of errors, virus or interference.

If you have received this message in error please notify the sender immediately and delete the message. Any views expressed in this email are not necessarily the views of BlueScope Steel Limited.
2d.

Re: Packing list dengan kondisi tertentu secara otomatis

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Wed Sep 14, 2011 2:04 am (PDT)



Bukannya tinggal dikembangkan dengan memasang fprmula filter ?

Kid.

On Wed, Sep 14, 2011 at 13:57, Sodikin, Akhmad <
akhmad.sodikin@bluescopesteel.com> wrote:

> **
>
>
> **
> Resend (maaf
> Mas Kid...terima kasih banyak atas responnya yg cepat dan sharing ilmu
> excel nya
>
> Namun yg saya maksud adalah bagaimana caranya supaya pack list tersebut
> langsung terbentuk....Dengan cara saya copy paste aja data dari system
> saya..ke master data (sheet1)
> Jadi...jika saya paste data di worksheet "sheet1" pack list di worksheet
> PACK_L_TDK1 (2) sdh terbentuk berupa data terlampir (secara otomatis)
>
>
> Mohon pencerahannya teman2 semua
>
> Best Regards,
> Sodik
> PT. Bluescope Lysaght Indonesia
>
> ------------------------------
>
>
> NOTICE - This message and any attached files may contain information that
> is confidential, legally privileged or proprietary. It is intended only for
> use by the intended recipient. If you are not the intended recipient or the
> person responsible for delivering the message to the intended recipient, be
> advised that you have received this message in error. Any dissemination,
> copying, use or re-transmission of this message or attachment, or the
> disclosure of any information therein, is strictly forbidden. BlueScope
> Steel Limited does not represent or guarantee that this message or
> attachment is free of errors, virus or interference.
>
> If you have received this message in error please notify the sender
> immediately and delete the message. Any views expressed in this email are
> not necessarily the views of BlueScope Steel Limited.
>
>
>
>
2e.

Re: Packing list dengan kondisi tertentu secara otomatis

Posted by: "Sodikin, Akhmad" akhmad.sodikin@bluescopesteel.com

Wed Sep 14, 2011 3:07 am (PDT)



OK Mr. Kid :) saya akan pelajari dulu...trm kasih sebelumnya

Best Regards,
Sodik
PT. Bluescope Lysaght Indonesia

________________________________
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] On Behalf Of Mr. Kid
Sent: Wednesday, September 14, 2011 4:04 PM

Bukannya tinggal dikembangkan dengan memasang fprmula filter ?

Kid.

3a.

Re: Mencari rata-rata persentase

Posted by: "Budhi Cahyanto" budhi.cahyanto@id.certissecurity.com

Tue Sep 13, 2011 9:08 pm (PDT)



Mr Kid,

Thanks untuk formulasinya.

Salam.

_____

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
On Behalf Of Mr. Kid
Sent: Tuesday, September 13, 2011 2:38 PM

Hai Budhi,

Sheet1.
=IF(A2<"T",6,3)%*(B2+C2)

Sheet2. Array Formula (jangan lupa CSE)
=AVERAGE(IF($B$3:$M$3=B$14,$B4:$M4/$D4:$O4))

Salam.
Kid.

Recent Activity
Visit Your Group
Check out the

Y! Groups blog

Stay up to speed

on all things Groups!

Yahoo! Finance

It's Now Personal

Guides, news,

advice & more.

Yahoo! Groups

Small Business Group

Ask questions,

share experiences

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
---------------------------------------------------------------------
MARKETPLACE

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


A bad score is 598. A bad idea is not checking yours, at freecreditscore.com.

Tidak ada komentar:

Posting Komentar