Tecnologia, programação e muito Visual FoxPro.

sexta-feira, 17 de julho de 2009

Re: ]] XL-mania [[ toko baju ade aries

 

Maksudnya, Combobox3 berubah-ubah isi LIST-nya
sesuai Jenis yg ditampilkan oleh Combobox1 ?
sedangkan kesamaan JENIS itu diindikasikan dengan
format warna interior cell ybs ??

Kalok benar begitu; di UserForm's MODULE, perlu ditambah sebuah prosedur spt ini

Private Sub ComboBox1_Change()
   Dim i As Integer
   ComboBox3.Clear
   With ComboBox1
      If .ListIndex > -1 Then
         Rhs = Sheets("data").Cells(.ListIndex + 1, 1).Interior.ColorIndex
         For i = 1 To 12   ' dgn konstanta 12 ini data di sheet data dianggap = tidak berkembang
            If Sheets("data").Cells(i, 3).Interior.ColorIndex = Rhs Then
               ComboBox3.AddItem Sheets("data").Cells(i, 3)
            End If
         Next i
      End If
   End With
End Sub


hormat kami,
siti


2009/7/16 Pasci, Ade Aries <ade.aries.pasci@citi.com>
>
> Dear Pakar Excel,
> Mohon Pencerahannya yach...
>
> 1. Di Sheet data ada banyak data. Tapi datanya sesuai dengan
> warnanya. akan di ambil datanya berdasarkan colom dalam sheet.
> 2. Tapi listing untuk membatasi pengambilannya dalam
> Combobox gimana ya?
>
> saat : Lengan panjang (di klik)
> khusus data lengan panjang aja yg keluar sesuai warnanya. begitu
> seterusnya.
> 1. Lengan panjang (biru) =>
> Pollo (biru)
> Boss (biru)
> Number 61 (biru)
> Alisan (biru)
> 2. Lengan pendek (kuning)
> => Nike (kuning)
> Adidas (kuning)
> Reebox (kuning)
> 3. Celana panjang (pink) =>
> Lee (pink)
>
> BMW (pink)
> 4. Celana pendek (hijau) =>
> The North Face (hijau)
>
> Codoray (hijau)
>
> The color (hijau)
>
>
> Terima kasih,

__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| XL-mania, berjuang untuk rakyat, pancen oyeeee, LANJUTKAN!        |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| 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.friendster.com/xlmania atau...  |
| 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              |
+-------------------------------------------------------------------+
Recent Activity
Visit Your Group
Yahoo! Finance

It's Now Personal

Guides, news,

advice & more.

Yahoo! Groups

Mom Power

Discover doing more

for your family

Yahoo! Groups

Weight Management Challenge

Join others who

are losing pounds.

.

__,_._,___

Nenhum comentário:

Arquivo do blog