Sub hong3()'' 宏3 宏d Dim a, b As Integer Dim str As String For a = 227 To 947 Step 15 b = a + 5 str = "Sheet1!B" + CStr(a) + ":G" + CStr(b) sh = ActiveSheet.Shapes.AddChart2(216, xlBarClustered) sh.Select ActiveChart.SetSourceData Sourc…
写在最前 平时在工作中尤其是在做压测的时候难免需要一些用户名和密码,写个简单的Python小脚本批量生成一些 代码示例 import random,string #生成大小字母和数字一起的大字符串 all_str=string.ascii_letters+string.digits res_lit=[] #生成100个 ): #从大字符串中随机生成8位数的字符,换行并转换成字符串 res = ))+'\n' if res not in res_lit: res_lit.append(res) f…