Excel/VBA – how list available sheets

This problem seems like it should be fairly easy but I can’t seem to figure the code. I’m trying to populate a list box with the names of the available sheets in an active workbook. Can anyone help?