Guest User

Untitled

a guest
Aug 31st, 2016
65
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.25 KB | None | 0 0
  1. Private Sub myComboBox_Change()
  2. Call Billing(myForm.myComboBox.Text)
  3. End Sub
  4.  
  5. Private Sub UserForm_Initialize()
  6. myForm.myComboBox.List = Array("A_company", "B_building", "C_electricity")
  7. End Sub
  8.  
  9. Sub prepare ()
  10. myForm.Show
  11. End Sub
Add Comment
Please, Sign In to add comment