摘要: import matplotlib.pyplot as pltimport random #创建画布plt.figure(figsize=(8,8),dpi=100) x=range(20)y=[random.randint(10,30) for i in x] #lines后面加个逗号lines, 阅读全文
posted @ 2021-11-13 10:06 大威1030 阅读(303) 评论(0) 推荐(0) 编辑
摘要: newid()生成的是uniqueidentifier类型的唯一值,因此可以作为随机排序的参照字段 考虑以下场景: 有n个消费者分布在全国各地,由每地的会员店来维护,每个会员有若干个导购,假定有m个会员店,每个会员店的导购数量为a,a>=0,现在要将会员店的导购随机分配到每个消费者,如果该会员店没有 阅读全文
posted @ 2021-09-23 16:09 大威1030 阅读(181) 评论(0) 推荐(0) 编辑
摘要: 话不多说,上代码 Sub vba获取工作表名称() For sheetname = 1 To Sheets.Count Cells(sheetname, 1) = Sheets(sheetname).Name Next sheetname End Sub 阅读全文
posted @ 2020-12-15 19:05 大威1030 阅读(699) 评论(0) 推荐(0) 编辑
摘要: 话不多说,上代码 Sub 批量删除工作表() Dim sh As Object Application.DisplayAlerts = False '关闭提示,否则每删除一个非空工作表,都会出现提示 For Each sh In ThisWorkbook.Sheets With sh 'sheet名 阅读全文
posted @ 2020-12-15 18:11 大威1030 阅读(721) 评论(0) 推荐(0) 编辑
摘要: 将待合并的excel放到同一目录,右键sheet查看代码,插入如下代码(不用新建excel再插入) Sub Books2Sheets() '定义对话框变量 Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFilePi 阅读全文
posted @ 2020-11-18 17:32 大威1030 阅读(892) 评论(0) 推荐(0) 编辑
摘要: 新建excel ,在sheet1 A列设置待批量命名的sheet名称,右键sheet1查看代码,插入下面代码 Sub 批量添加工作表() Dim Sh As Worksheet, i As Long Sheets.Add After:=Sheets(Sheets.Count), Count:=Wor 阅读全文
posted @ 2020-11-18 17:19 大威1030 阅读(842) 评论(0) 推荐(0) 编辑
摘要: 首先将待合并的excel都放到一个文件目录下 新建一个excel右键sheet查看代码 复制如下代码 Sub Macro1() Dim MyPath$, MyName$, sh As Worksheet, sht As Worksheet, m& Set sh = ActiveSheet MyPat 阅读全文
posted @ 2020-11-18 16:56 大威1030 阅读(1531) 评论(0) 推荐(0) 编辑
摘要: 话不多说直接上vba代码,PS:百度发现好多该代码,无法标注原作者,见谅 Sub 合并当前工作簿下的所有工作表() Application.ScreenUpdating = False For j = 1 To Sheets.Count If Sheets(j).Name <> ActiveShee 阅读全文
posted @ 2020-11-18 15:09 大威1030 阅读(958) 评论(0) 推荐(0) 编辑
摘要: create table #kk(chars varchar(100)) insert into #kk select '124ujkdak342as'union select '1297135'union select 'jladj-gkd_lag'union select 'kadgljwt'u 阅读全文
posted @ 2020-10-19 11:08 大威1030 阅读(625) 评论(0) 推荐(0) 编辑
摘要: import numpy print(help(numpy.genfromtxt)) genfromtxt(fname, dtype=<class 'float'>, comments='#', delimiter=None, skip_header=0, skip_footer=0, conver 阅读全文
posted @ 2020-10-14 14:02 大威1030 阅读(134) 评论(0) 推荐(0) 编辑