摘要:
54:A0:50:57:49:7E 48:4D:7E:BD:09:BC 58:A0:23:56:3A:47 C8:94:02:6D:C0:07 38:BA:F8:6B:53:55 阅读全文
摘要:
#导入各种包 from selenium import webdriver#浏览器 from selenium.webdriver.common.by import By#选择器 from selenium.webdriver.support import expected_conditions a 阅读全文
摘要:
#导入各种包 from selenium import webdriver#浏览器 from selenium.webdriver.common.by import By#选择器 from selenium.webdriver.support import expected_conditions a 阅读全文
摘要:
// ==UserScript== // @name 平台培训 // @namespace http://tampermonkey.net/ // @version 0.1 // @description try to take over the world! // @author You // @ 阅读全文
摘要:
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... 阅读全文
摘要:
Sub ListFilesTest() With Application.FileDialog(msoFileDialogFolderPicker) If .Show Then FolderPath$ = .SelectedItems(1) Else Exit Sub End With If Rig 阅读全文
摘要:
var showTimu = []; function pushTimu(second,map){ showTimu = []; $.each(map,function(i,ele){ var index=parseInt(i); if(0index){ showTimu.push(ele); } }); return; } }); } functi... 阅读全文
摘要:
刚开始能把代码敲得行云流水的时候,写代码是种乐趣。有了功利目的之后,重复的工作写多几次,厌烦的情绪四处弥漫。 去年八月份正好写了一回,还能支持控件,在此备忘。 阅读全文
摘要:
花了一写时间做了一个Excel宏工作簿,可以根据考场人数、座位排列和考生名单 生成《考试座位表》《考生去向表》《考试通知单》,想要的前往了解哦: https://item.taobao.com/item.htm?id=589268244785 1、考场设置表。 (1)考场人数有两种设置方法,方法一是 阅读全文
摘要:
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 阅读全文
摘要:
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++; 阅读全文
摘要:
Sub 生成二维码() Dim wb As Workbook Dim sht As Worksheet Set wb = Application.ThisWorkbook Set sht = wb.Worksheets(1) 'Randomize With sht '删除旧条码控件 .Shapes. 阅读全文
摘要:
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 阅读全文
摘要:
Sub SplitTextFrame() '多段落文本框拆为多文本框一段落,加上(#)编号 Dim pre As Presentation Dim sld As Slide Dim shp As Shape Dim shp2 As Shape Set pre = ActivePresentation 阅读全文
摘要:
广告公司说不会从Excel里复制表格,然后粘贴到图片上面。只会从Word里复制表格,然后粘贴到照片里面。最后也不知道是谁拍板定下的广告公司,把要光荣榜做成word文档,真是闻所未闻!这种情况还持续了好几年。 等你忍无可忍你写了一段代码,想着以后能高效一点,它就改格式了,tnnd。真希望上面的人有点脑 阅读全文
摘要:
Sub 替换删除选择题括号中的选项() '2021-2-22 'dg nextseven Dim doc As Document, p As Paragraph Set doc = ThisDocument Set regex = CreateObject("VBScript.RegExp") Wi 阅读全文
摘要:
'PPT 加载宏 代码模板 Dim cmdBar As CommandBar, cmdBtn As CommandBarControl Const cmdBtnCap As String = "从Word文档导入图片" Sub Auto_Open() Call DelCmdBtn Call AddC 阅读全文