Private Sub UserForm_Initialize()
Dim wks As Worksheet
For Each wks In ThisWorkbook.Worksheets
If wks.Name = "Utama" Then
ComboBox1.AddItem ""
Else
ComboBox1.AddItem wks.Name
End If
Next wks
ComboBox1.Value = ActiveSheet.Name
End Sub
2015-09-01 13:32 GMT+07:00 Danny Prasetyo [email protected]
[belajar-excel] <[email protected]>:
>
>
>
> Selamat siang, saya ada kendala dalam mengisi kode VBA. Ini saya sediakan
> filenya. Untuk kendala nya, sudah saya jelaskan di dalam file Excel. Mohon
> bantuannya.
>
>
>
