- 博客(159)
- 资源 (2)
- 收藏
- 关注
RSS订阅原创 VBA复制区域数据
Sheets(1).Range("B" & nStartRow).PasteSpecial '粘贴。Sheets(nSheet).UsedRange.Copy '复制到剪贴板。
2023-10-27 13:28:36
1137
转载 Excel自定义格式
自定义格式代码中，颜色部分同样需要使用半角中括号，并且这些颜色不是随意写的，在中文系统里，可以使用红色、黑色、黄色，绿色、白色、兰色、青色和洋红，或者使用格式代码。如果分段数是三个，第一个分号前的代码表示对正数的格式，中间部分的代码表示对负数应用的格式，最后部分的，是对零值应用的格式。，就是将数值按五位数显示，如果单元格中的数值超过5位，就按单元格中的内容显示，如果不够5位，则会在前面加上0。当分段数是两个的时候，分号前面的代码表示对正数和零值应用的格式，分号后面的代码表示对负数应用的格式。
2023-10-23 09:00:06
444
原创 获取网页内容(http)
//获取网页内容mainForm.btn_GetWeb.oncommand = function(id,event){ var ls_url; var o_nr; var ls_text; ls_url = mainForm.edt_rul.text; var o_http = inet.http(); o_nr = o_http.get(ls_url); ls_text = string.fromto(o_nr); //转换字符串模式 mainForm.edt.
2021-09-09 17:31:53
353
转载 窗体之间的通信,与模态窗体的通信的两种方式
窗体之间的通信,与模态窗体的通信的两种方式Byadminat 2018-02-11 • 0人收藏 • 1623人看过父窗口代码如下: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27..
2021-08-25 15:46:03
815
转载 多窗口变量传递
多窗口变量传递多窗口交互的方法将窗体对象赋值到全局变量，就可以在其他代码文件中直接使用了。例如主窗体我们一般这样写：mainForm = win.form(text="使用选项卡控件";right=599;bottom=399)注意一个程序中只有主窗体命名为 mainForm 。但大多时候，我们应当把其他窗体对象赋值以局部变量，例如：var frmTabPage1 = win.form(text="选项卡的子窗口";right=599;bottom=399)上面的 var 语句声明一个局部变
2021-08-25 15:37:39
1129
原创 Aardio消息窗口
Aardio消息窗口importwin;varid = win.msgbox("三个按钮","标题",0x3/*_MB_YESNOCANCEL*/)参考标准库函数：namespacewin { msgboxErr =function(str,title ="错误",hwndOwner=0 ){ returnmsgbox( str,title,0x10/*_MB_ICONHAND*/); } msgboxTest =func...
2021-08-19 14:58:54
1446
原创 vba clear清除公式、内容、格式的使用
vba clear清除公式、内容、格式的使用一、清除所有属性Sheet9.Cells.Clear清除默认表Y1:Z10这个范围的所有属性Range("Y1:Z10").Clear所指定的范围的单元格中的格式、值、批注等全部被清空。二、清除指定范围的格式Sheet9.Cells.ClearFormats清除默认表Y1:Z10这个范围的单元格的格式Range("Y1:Z10").ClearFormats注意哦，ClearFormats只清除格式，比如字体、字号、加
2021-08-10 10:45:32
15866
原创 用 For Each 遍历区域内所有单元格
Sub aaa() Dim rng As Range Dim index As Long index = 0 For Each r In Range("a1:d5") r.Value = index index = index + 1 NextEnd Sub
2021-08-08 10:29:57
1625
转载 VBA语句集100句
VBA语句集100句 (Word VBA)http://you613.blog.163.com/blog/static/59514692009116114431678/- - - - - - - - - - - - - - - - - - - -Application对象- - - - - - - - - - - - - - - - - - - -(301) Application.ActivePrinter ‘获取当前打印机(302) Application.Height '当前应用程序文档
2021-07-21 11:06:16
827
原创 VBA获取区域的起始行、结束行
用到的属性Range.MergeArea，返回 Range 对象，代表包含指定单元格的合并的范围。如果指定的单元格不在合并的范围内，则该属性返回指定的单元格。只读。Variant类型。Range.Address，以宏语言返回区域引用。String 类型，只读。如：：$A$3:$A$10o_xls.Visible = TRUEo_xls.WindowState = -4140 //最小化o_WorkBook = o_xls.Workbooks.Open(ls_FileName)o
2021-07-21 11:00:10
4488
转载 Word查找和替换通配符(完全版)
Word查找和替换通配符(完全版)Word查找栏代码·通配符一览表 序号 清除使用通配符复选框 勾选使用通配符复选框 特殊字符 代码 特殊字符 代码or通配符 1 任意单个字符 ^? 任意单个字符 ? 2 任意数字
2021-07-20 08:40:11
1864
原创 VBA获取所有Sheet名字
oleobject o_WorkBooklong ll_Row,ll_RowCount,ll_NewRowString ls_SheetNameo_WorkBook = Message.PowerObjectParmll_RowCount = o_WorkBook.Worksheets.CountFOR ll_Row = 1 TO ll_RowCount ls_SheetName = o_WorkBook.WorkSheets(ll_Row).Name ll_Ne...
2021-07-16 17:36:31
2128
转载 用VBA得到EXCEL表格中的行数和列数
用VBA得到EXCEL表格中的行数和列数 每种方法中上面的是 Excel的行数，下面的是 Excel的列数。方法1: ActiveSheet.UsedRange.Rows.Count ActiveSheet.UsedRange.Columns.Count 缺点：有时可能会比实际数大一些，原因是如果你把最后几行（列） 数据清除后（非整行或整列删除），用这个命令仍返回未清除前的值。就是说现在虽然是空的，但是你曾经用过也算你的。方法2: ActiveSheet.Rang...
2021-07-05 13:59:09
6490
原创 直接使用备份文件生成新的数据库
--备份BACKUP DATABASE LeaRunFramework_Base_2016 TO DISK = 'c:\DB_BACKUP\LenborMealOrder_Base_2017.bak'--还原RESTORE DATABASE Members_01 FROM DISK = 'c:\DB_BACKUP\LenborMealOrder_Base_2017.bak' WITH MOVE 'LenborMealOrder_Base_2017' TO 'c:\DB_BACKUP\M...
2021-02-21 10:53:16
212
转载 格式化字符串
格式化字符串格式化函数string.format用来格式化字符串(按指定的规则连接字符串或输出其他变量并返回新的字符串) 。使用方法与C语言的printf函数相同(实际上很多编程语言中都有同样的格式化函数).str = string.format(fm,...);第一个参数用fm表示输出的格式,每个%符号后面是一个格式化表达式,每个格式化表达式按顺序对应后面的参数。所以用了N个格式化表达式,就必须在后面添加N个参数。下面是一个简单的例子：int = 123;str = "字符串
2021-01-26 13:26:26
438
原创 aadio读写ini文件
import fsys.ini var strTemp; ini = fsys.ini("E:\Test\aardio\aaa.ini"); //写 ini.write("节1","项1","aaa1"); ini.write("节1","项2","bbb2"); //读 strTemp = ini.read("节1","项1"); mainForm.edt_1.text = strTemp;
2021-01-21 15:11:00
821
转载 c# 转义字符
C#中转义字符[转]https://www.cnblogs.com/muran/p/3174865.html编程中很多细节问题我们都要十分的注意，要不一个小小的字母错误就能引起程序的无法运行。C#中转义字符分2中，一种是\,一种是@。@符号在C#中有两个作用作用1、在字符串的前面加@表示取消字符串中的转义例如stringpath=@"d:\root\subdir";作用2...
2020-03-07 11:48:00
2580
原创 C# 截屏并保存图片
public void fu_ScreenCut(String strFileName) { int nWidth, nHeight; //显示器宽度、高度 //获取显示器尺寸 nWidth = Screen.PrimaryScreen.Bounds.Width; nHeigh...
2020-03-07 09:14:43
1941
原创 c# 托盘程序
//类变量：private NotifyIcon notifyMonitor;窗体Load事件中初始化托盘程序 private void Form1_Load(object sender, EventArgs e) { notifyMonitor = new NotifyIcon(); notifyMoni...
2020-02-23 22:06:03
434
转载 Android Studio删除工程、项目的操作步骤
Android Studio删除工程、项目的操作步骤。移除工程主要用于从最近打开的项目列表中移除。硬盘中还是存在这个项目的。File——Close Project注意：不要点击项目。（点击项目就是打开项目了）最近打开的项目列表中就会少了刚才移除的项目。删除项目直接从硬盘中删除整个目录即可。转自：https://www.cnblogs.com/...
2020-01-26 20:21:27
13336
转载 Android开发中activity中传递数据的四种方式【收藏其他大佬的代码】
通过intent方式传递（1）传递字符串等发送端activity接收端activity（2）传递一个对象法1（Serializable是java中自带的方法数据存在内存中）传递activity中的代码，并且传递的对象必须接上Serializable这个接口如第二个图接收activity代码（3）传递一个对象法2（Serializable是android的方法数据存在...
2020-01-12 21:34:13
280
原创 Activity间传递参数【学习笔记，不带回调】
Activity间传递参数不带回调方法（显示意图）采用键值的方式：发送数据：public void btn_open_click(View v) { EditText edtName = (EditText)findViewById(R.id.edt_name); edtName.setText("张三"); Intent intSend = n...
2020-01-12 21:27:35
135
Error:(26, 13) Failed to resolve: com.android.support:appcompat-v7:29.+ *****
2019-10-21
个人所得税测算
2019-02-07
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人