如何从 xlsm 文件复制宏并将其插入另一个 xlsm 文件？

Question

我正在尝试从 xlsm 文件复制宏并将其粘贴到新的 xlsm file.I 我正在研究 win32com 和 xlwings，但没有发现任何有用的东西。非常感谢解决问题的提示！

Answer 1

安装 Python 2.7（无法在 Python 3 上运行）
安装 Xlsxwriter：pip install XlsxWriter
运行下面的第 1 部分代码，您保存 xlsm 文件以提取 VBA 代码（将 xlsm_file 变量替换为您的宏文件名）
运行下面的第 2 部分代码，用于在您的新工作簿中插入 vba。

#Part 1:
#!C:\Python27\python.exe

##############################################################################
#
# vba_extract - A simple utility to extract a vbaProject.bin binary from an
# Excel 2007+ xlsm file for insertion into an XlsxWriter file.
#
# Copyright 2013-2019, John McNamara, jmcnamara@cpan.org
#
import sys
from zipfile import ZipFile
from zipfile import BadZipfile

# The VBA project file we want to extract.
vba_filename = 'vbaProject.bin'

# Get the xlsm file name from the commandline.
xlsm_file = 'Macro_file1.xlsm'

try:
    # Open the Excel xlsm file as a zip file.
    xlsm_zip = ZipFile(xlsm_file, 'r')

    # Read the xl/vbaProject.bin file.
    vba_data = xlsm_zip.read('xl/' + vba_filename)

    # Write the vba data to a local file.
    vba_file = open(vba_filename, "wb")
    vba_file.write(vba_data)
    vba_file.close()

except IOError as e:
    print("File error: %s" % str(e))
    exit()

except KeyError as e:
    # Usually when there isn't a xl/vbaProject.bin member in the file.
    print("File error: %s" % str(e))
    print("File may not be an Excel xlsm macro file: '%s'" % xlsm_file)
    exit()

except BadZipfile as e:
    # Usually if the file is an xls file and not an xlsm file.
    print("File error: %s: '%s'" % (str(e), xlsm_file))
    print("File may not be an Excel xlsm macro file.")
    exit()

except Exception as e:
    # Catch any other exceptions.
    print("File error: %s" % str(e))
    exit()

print("Extracted: %s" % vba_filename)

运行此代码将 VBA 复制到新的 Excel 文件：

#Part 2
import xlsxwriter

# Note the file extension should be .xlsm.
workbook = xlsxwriter.Workbook('macros.xlsm')

workbook.add_vba_project('./vbaProject.bin')

workbook.close()

如何从 xlsm 文件复制宏并将其插入另一个 xlsm 文件？

How to copy macro from xlsm file and insert it into another xlsm file?

python

openpyxl

xlwings