# -&- coding: utf-8 -&-
"""
Created on Mon Jul 8 22:05:32 2019
@author: same3
刚学习Python 不想给小伙伴们太多选择，如使用什么解释器等等之类的，因为对于初学者，这些是迷迷糊糊的，没有概念的，太多的选择，反而增加初学者的困惑，不如直接为大家选好，如解释器用Spyder。对于初学者，首先应该多练习，多敲代码，可以偿试着修改代码，只要想到的，就去偿试，或许刚开始这会花费很多的时间，但是越偿试我们就会感觉到：越来越顺心、顺手、顺大势。正如跳槽和失败，跳槽不是为了跳槽而跳槽，也许是因为找不到你为之努力和付出的人和事，或者是找到更能发挥自己优势的用武之地；而失败，只要能从中得到启发，自我反思和反省，并在今后的人生道路上先人一步识别失败的苗头，避开陷人的坑坑，这未偿不是一件好事！在错误的方向上越努力，越坚持，就离成功越远！
好了，言归正传，今天让我们来学习：Python之For循环，在Python调用VBA，用Xlwings在Excel合并单元格、设置字体
"""
#引入三个python 包
#pandas：数据分析包
import pandas as pd #"as"顾名思义，即以后可以在程序中以缩写pd 代表 pandas
#numpy：科学计算包
import numpy as np
#xlwings：python操作Excel的模块，最好的Excel操作包之一，有取代VBA的趋势
#中文入门学习资料之一： https://www.cnblogs.com/catgatp/p/7875683.html
#英文官方学习网站https://docs.xlwings.org/en/stable/
import xlwings as xw
#Excel 文件路径
file = r'D:\VBA\LEARNING_ERP.xlsm' #字符串前面加r，是表示其后的字符串不转义，使用真实字符
#打开Excel工作簿，文件路径：'D:\VBA\LEARNING_ERP.xlsm'
wb=xw.Book(file)
wb.app.display_alerts=False
#引用工作簿(workbook)里的工作表（worksheet）
sht_view=wb.sheets['view'] #存放计算后的数据
#九九乘法口决
'''
DataFrame的内容由一个np.full([9,9]对象构成,np.full([9,9], np.nan)即建立一个9*9的二维数组ndarray对象
该二维数组无素由nan构成
index=np.arange(1,10,1)，DataFrame的行索引由从1开始，到9结束，步长为1。
np.arange(1,10,1)包含下标，不包含上标即不含10
'''
#Numpy 参考地址https://www.cnblogs.com/blogwangwang/p/9608141.html
dfsz8=pd.DataFrame(np.full([9,9], np.nan),index=np.arange(1,10,1),columns=np.arange(1,10,1))
#for 循环参考地址https://www.runoob.com/python/python-for-loop.html
for i in np.arange(1,10,1):
for j in np.arange(i,10,1):
dfsz8.iloc[j-1,i-1]=str(i)+'x'+str(j)+'='+str(i*j)
###伙伴们有没有看到，三、五条语句就做成了一个九九乘法表
##导出到Excel，首先删除A:AA列，把格式也一起删除，用cells.delete或clear无法删除格式
sht_view.api.columns('A:AA').delete
#在Excel第50行第一列（即：A50）的扩展区域中显示九九乘法表，其中.nan显示为空
sht_view.range(50,1).expand().value=dfsz8
print(dfsz8)
##.api.columns('A:AA').autofit自动调整列宽度，如果要指定列宽可用 sht_view.range((1,1),(1,20)).api.ColumnWidth = 8
sht_view.api.columns('A:AA').autofit
#设置标题
sht_view.range(49,1).value='九九乘法表'
#设置标题字体
sht_view.range('A49').api.Font.Size=18
#合并单元格
sht_view.range('A49:J49').api.Merge()
#xlwings 实现不了的功能可以调用VBA宏来实现
#运行宏
macro1 = wb.macro('宏1') # this maps the VBA code
macro1() # only this executes the VBA code
#在EXCEL中录制的宏，主要设置合并单元格，设置字体格式，代码如下：
'''
Sub 宏1()
Range("A49").Select
With Selection.Font
.Name = "Arial"
.Size = 18
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
.TintAndShade = 0
.ThemeFont = xlThemeFontNone
End With
Range("A49:J49").Select
With Selection
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With
Selection.Merge
End Sub
'''
###效果图