VBA: Внесение данных в ListBox формы

Доброго дня суток!
Подскажите, пожалуйста!
В форме два ListBox и CommandButton.
Один называется "Принадлежность к предприятию", он содержит список из нескольких позиций - "работник Предприятия", "самозанятый", "ИП", "безработный" и т.д.
Второй ListBox называется "Ф.И.О".
CommandButton - "Выбрать".
Как написать макрос, чтобы при нажатии на "Выбрать" именно "работник Предприятия" в поле ListBox "Ф.И.О" появлялся список фамилий, находящихся в таблице на отдельном Листе этой Книги, а при выборе других позиций в поле ListBox "Ф.И.О" оператору необходимо было бы вручную внести фамилию, имя, отчество, но только в необходимом формате, например: "Иванов Иван Иванович"