摘要: #导入各种包 from selenium import webdriver#浏览器 from selenium.webdriver.common.by import By#选择器 from selenium.webdriver.support import expected_conditions a 阅读全文
posted @ 2022-09-14 11:51 wangway 阅读(72) 评论(0) 推荐(0) 编辑
摘要: #导入各种包 from selenium import webdriver#浏览器 from selenium.webdriver.common.by import By#选择器 from selenium.webdriver.support import expected_conditions a 阅读全文
posted @ 2022-09-14 11:49 wangway 阅读(21) 评论(0) 推荐(0) 编辑
摘要: // ==UserScript== // @name 平台培训 // @namespace http://tampermonkey.net/ // @version 0.1 // @description try to take over the world! // @author You // @ 阅读全文
posted @ 2022-09-14 11:47 wangway 阅读(26) 评论(0) 推荐(0) 编辑
摘要: from selenium import webdriver from selenium.webdriver.common.by import By from selenium.webdriver.support import expected_conditions as EC from selenium.webdriver.support.wait import WebDriverWait f... 阅读全文
posted @ 2019-06-28 12:05 wangway 阅读(392) 评论(0) 推荐(0) 编辑
摘要: Sub ListFilesTest() With Application.FileDialog(msoFileDialogFolderPicker) If .Show Then FolderPath$ = .SelectedItems(1) Else Exit Sub End With If Rig 阅读全文
posted @ 2019-05-08 21:30 wangway 阅读(206) 评论(0) 推荐(0) 编辑
摘要: var showTimu = []; function pushTimu(second,map){ showTimu = []; $.each(map,function(i,ele){ var index=parseInt(i); if(0index){ showTimu.push(ele); } }); return; } }); } functi... 阅读全文
posted @ 2019-05-08 21:25 wangway 阅读(304) 评论(0) 推荐(0) 编辑
摘要: 刚开始能把代码敲得行云流水的时候,写代码是种乐趣。有了功利目的之后,重复的工作写多几次,厌烦的情绪四处弥漫。 去年八月份正好写了一回,还能支持控件,在此备忘。 阅读全文
posted @ 2019-03-21 22:49 wangway 阅读(520) 评论(0) 推荐(0) 编辑
摘要: 花了一写时间做了一个Excel宏工作簿,可以根据考场人数、座位排列和考生名单 生成《考试座位表》《考生去向表》《考试通知单》,想要的前往了解哦: https://item.taobao.com/item.htm?id=589268244785 1、考场设置表。 (1)考场人数有两种设置方法,方法一是 阅读全文
posted @ 2019-03-20 22:03 wangway 阅读(704) 评论(0) 推荐(0) 编辑
摘要: C-EC-4B-CF-FC-37RegisterCodeStart/D8-12-65-C1-26-31/04:0E:3C:2F:E8:29/8C-EC-4B-CF-FC-37/00:1E:33:E4:AB:1E/D8:CB:8A:B4:0B:C1/00-FF-1C-69-60-02/A0:D3:C1 阅读全文
posted @ 2017-10-14 19:54 wangway 阅读(627) 评论(1) 推荐(0) 编辑
摘要: 54:A0:50:-57:49:7E 阅读全文
posted @ 2024-06-16 16:00 wangway 阅读(2) 评论(0) 推荐(0) 编辑
摘要: let topul=document.querySelector('ul.tree-ul.tree-top-ul'); let z1=topul.querySelectorAll('li[data-level="1"]'); txt=[]; i1=0; z1.forEach(x1=>{ i1++; 阅读全文
posted @ 2024-05-10 20:21 wangway 阅读(9) 评论(0) 推荐(0) 编辑
摘要: Sub 生成二维码() Dim wb As Workbook Dim sht As Worksheet Set wb = Application.ThisWorkbook Set sht = wb.Worksheets(1) 'Randomize With sht '删除旧条码控件 .Shapes. 阅读全文
posted @ 2023-09-03 23:49 wangway 阅读(28) 评论(0) 推荐(0) 编辑
摘要: Sub newPages() Application.DisplayAlerts = False Dim Wb As Workbook Dim NewSht As Worksheet Dim i Set Wb = Application.ThisWorkbook For i = 1 To 200 S 阅读全文
posted @ 2022-10-09 09:21 wangway 阅读(26) 评论(0) 推荐(0) 编辑
摘要: Sub SplitTextFrame() '多段落文本框拆为多文本框一段落,加上(#)编号 Dim pre As Presentation Dim sld As Slide Dim shp As Shape Dim shp2 As Shape Set pre = ActivePresentation 阅读全文
posted @ 2022-05-06 23:50 wangway 阅读(61) 评论(0) 推荐(0) 编辑
摘要: 广告公司说不会从Excel里复制表格,然后粘贴到图片上面。只会从Word里复制表格,然后粘贴到照片里面。最后也不知道是谁拍板定下的广告公司,把要光荣榜做成word文档,真是闻所未闻!这种情况还持续了好几年。 等你忍无可忍你写了一段代码,想着以后能高效一点,它就改格式了,tnnd。真希望上面的人有点脑 阅读全文
posted @ 2022-05-05 21:21 wangway 阅读(42) 评论(0) 推荐(0) 编辑
摘要: Sub 替换删除选择题括号中的选项() '2021-2-22 'dg nextseven Dim doc As Document, p As Paragraph Set doc = ThisDocument Set regex = CreateObject("VBScript.RegExp") Wi 阅读全文
posted @ 2021-02-22 14:44 wangway 阅读(145) 评论(0) 推荐(0) 编辑