Pak lapendosol opik,
wah mantabs pak, sesuai dengan yang saya harapkan pak, terima kasih ya
pak untuk ilmunya, sangat membantu sekali.
daniel,
On 5/2/2013 2:06 PM, lapendosol opik wrote:
Dear Daniel,
Coba pake kode berikut, meskipun rada panjang kodenya, mohon master2
yang lain untuk mengkoreksi/meringkasnya:
Private Sub OptionButton1_Click()
Dim KP1 As Range
Dim ws As Worksheet
Set ws = Sheets("master")
KodePart.Clear
For Each KP1 In ws.Range("b4:b11")
With Me
KodePart.AddItem KP1.Value
End With
Next KP1
End Sub
Private Sub OptionButton2_Click()
Dim KP2 As Range
Dim ws As Worksheet
Set ws = Sheets("master")
KodePart.Clear
For Each KP2 In ws.Range("e4:e11")
With Me
KodePart.AddItem KP2.Value
End With
Next KP2
End Sub
Private Sub OptionButton3_Click()
Dim KP3 As Range
Dim ws As Worksheet
Set ws = Sheets("master")
KodePart.Clear
For Each KP3 In ws.Range("h4:h11")
With Me
KodePart.AddItem KP3.Value
End With
Next KP3
End Sub
Trimakasih,
Wassalam,
------------------------------------------------------------------------
*From:* daniel_aho <[email protected]>
*To:* [email protected]
*Sent:* Thursday, May 2, 2013 10:58 AM
*Subject:* [belajar-excel] Option button macro pada User form untuk
menentukan range combo box
Dear para master excel,
Bagaimana code macro untuk Option Button yang dipakai untuk menentukan
range dari combo box, jika pertanyaan saya kurang jelas, berikut saya
lampirkan filenya,
Mohon pencerahan dari master2 semua.
Terima kasih,
daniel
