摘要：方法一：VBA代码法新建一个文件，然后拷贝以下代码到VBA模块中，运行代码，选择含有Flash的Excel文件确定，即可获取swf文件。view plaincopy to clipboardprint?SubExtractFlash()DimtmpFileNameAsStringDimFileNumberAsIntegerDimmyFileIdAsLongDimMyFileLenAsLongDimmyIndexAsLongDimswfFileLenAsLongDimiAsLongDimswfArr()AsByteDimmyArr()AsBytetmpFileName=Application.G 阅读全文