04 2019 档案

摘要:在拆分的时候如何保持单元格的格式不变呢?我能想到的办法就是复制和移动工作表,然后再把不符合条件的行删除。 窗体代码 模块代码 阅读全文
posted @ 2019-04-26 23:04 wangway 阅读(1071) 评论(0) 推荐(0)
摘要:import requests import json import threading Default_Header = { #具体请求头自己去弄 } _session=requests.session() _session.headers.update(Default_Header) #多线程下载 class myThread(threading.Thread): def... 阅读全文
posted @ 2019-04-24 16:46 wangway 阅读(806) 评论(0) 推荐(0)
摘要:Sub LayoutForExamPaper() '其他想法: '1自动顺题号,修改引言中完成下列各题的题号 '2综合题每一问空白处理 Dim StartTime As Variant Dim UsedTime As Variant StartTime = VBA.Timer Application.ScreenUpdating = Fal... 阅读全文
posted @ 2019-04-12 16:01 wangway 阅读(620) 评论(0) 推荐(0)
摘要:Sub LayoutForExamPaper() Dim StartTime As Variant Dim UsedTime As Variant StartTime = VBA.Timer Application.ScreenUpdating = False Dim oneP As Paragraph Dim rng As Range C... 阅读全文
posted @ 2019-04-12 12:28 wangway 阅读(829) 评论(0) 推荐(0)
摘要:Sub LayoutForExamPaper() Dim StartTime As Variant Dim UsedTime As Variant StartTime = VBA.Timer Application.ScreenUpdating = False Dim oneP As Paragraph Dim rng As Range C... 阅读全文
posted @ 2019-04-11 23:32 wangway 阅读(391) 评论(0) 推荐(0)
摘要:Sub ClearBlankBeforeParagraph() Dim StartTime As Variant Dim UsedTime As Variant StartTime = VBA.Timer Application.ScreenUpdating = False Dim oneP As Paragraph Dim rng As Rang... 阅读全文
posted @ 2019-04-11 11:44 wangway 阅读(311) 评论(0) 推荐(0)
摘要:很长一段时间没处理word合并单元格,又忘记了采取忽略错误的方式测试出相应单元格的行列坐标这种方式。真是浪费时间。以后再也不想为此在深夜熬命。 今晚算是和它杠上了,很想弄清楚合并单元格之后行列坐标重新分配的机制。于是做了一点测试。插入一个11行10列的表格,然后合并其中的部分,利用代码插入新的坐标。 阅读全文
posted @ 2019-04-07 01:32 wangway 阅读(397) 评论(0) 推荐(0)
摘要:之前没有理解好,还以为是学习笔记有谬误。 阅读全文
posted @ 2019-04-03 08:11 wangway 阅读(659) 评论(0) 推荐(0)