摘要：
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
阅读(337)
评论(0)
推荐(0)
摘要：
newid()生成的是uniqueidentifier类型的唯一值，因此可以作为随机排序的参照字段 考虑以下场景： 有n个消费者分布在全国各地，由每地的会员店来维护，每个会员有若干个导购，假定有m个会员店，每个会员店的导购数量为a，a>=0，现在要将会员店的导购随机分配到每个消费者，如果该会员店没有 阅读全文
posted @ 2021-09-23 16:09
大威1030
阅读(199)
评论(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
阅读(772)
评论(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
阅读(782)
评论(0)
推荐(0)
摘要：
将待合并的excel放到同一目录，右键sheet查看代码，插入如下代码（不用新建excel再插入） Sub Books2Sheets() '定义对话框变量 Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFilePi 阅读全文
posted @ 2020-11-18 17:32
大威1030
阅读(994)
评论(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
阅读(979)
评论(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
阅读(1636)
评论(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
阅读(998)
评论(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
阅读(644)
评论(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
阅读(140)
评论(0)
推荐(0)
浙公网安备 33010602011771号