python 处理excel 批量添加 定义名称

Question

想给excel表格， 每个单元格 添加 定义名称， 定义名称内容为 此单元格所在 列 第一行的数据， 不知怎么批量实现？有哪位大佬指点一二 谢谢
。下边是我写的，这个只能 添加所有列第一行里边的定义名称，其他行无效呢？
wb = load_workbook(xl_file)
ws = wb.active
l_num = ws.max_column # 最大列
h_num = ws.max_row # 最大行
print(ws.max_row)
print(ws.max_column)
a_list = []
for i in range(2, h_num + 1): # h_num + 1
for j in range(1, l_num + 1):
p = ws.cell(row=1, column=j)
pz = p.value # 第一行的值 字段
a = ws.cell(row=i, column=j) # 每列标题
# print(j)
# aa = a.value # 此单元格里边的值 写入新表格
coord = a.coordinate # 此单元格坐标 A1 B1
print(coord)
l = re.findall(r'^[A-Z]*', coord)[0]
h = re.findall(r'[0-9]*$', coord)[0]
# 把sheet1 里的A2 设定为rpt_date
# dname = DefinedName(name='rpt_date')
# dname.value = "Sheet1!$A$2"
bb = "Sheet1!$" + l + '$' + h
print(bb)
dname = DefinedName(name='%s' % pz)
dname.value = bb
# print('>>>', dname, '---', type(dname))
wb.defined_names.append(dname)
#
wb.save(xl_savefile)
wb.close()

Answer 1

ws["A1"] = value
ws为获取的sheet页对象
A1为excel坐标
value为值