如何取出excel数据库中sheet的名称来.txt

VB技巧问答10000例,是一个教程

Workbook对 象 的 Sheets属 性 包 括 所 有 Sheet的 信 息 。 你 可 以 这 样 ： 
     For Each Sheet In ThisWorkbook.Sheets 
     MsgBox Sheet.Name 
     Next 
<END>