alex_bn_lee

导航

< 2025年2月 >
26 27 28 29 30 31 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 28 1
2 3 4 5 6 7 8

统计

10 2011 档案

Excel VBA - 数组及其他知识
摘要:来源:http://blog.csdn.net/alexbnlee/article/details/6917800数组:定义数组: Dim arr(30 To 50) As Single 定义数组,从30到50,定义为浮点型~ arr(30) = 34.3产生随机数,但是随机数要不同(1到20之间产生10个不同的随机数) Sub sdlkfjl() For i = 1 To 10 Cells(1, i) = Int(1 + Rnd() * 19) '给个随机数 For j = 1 To i - 1 ... 阅读全文

posted @ 2011-10-29 22:46 McDelfino 阅读(790) 评论(0) 推荐(0) 编辑

Excel VBA - 控件与用户窗体 及 常用函数
摘要:来源:http://blog.csdn.net/alexbnlee/article/details/6913565参考:http://msdn.microsoft.com/zh-cn/library/ktwtk9ff%28v=VS.80%29.aspxTextBox事件→ KeyPress事件的语法如下:KeyANSI只是个参数,所以可以改成任何喜欢的名字,每键入一个值的时候,都会触发KeyANSI,通过设置,可以实现限制默写值的键入。→ KeyDown事件 按下触发→ KeyUp事件 松手触发CommandButton事件→ MouseMove事件→ MouseDown事件 按下事件,左右键 阅读全文

posted @ 2011-10-28 11:03 McDelfino 阅读(2577) 评论(0) 推荐(0) 编辑

Excel VBA - Application对象
摘要:来源:http://blog.csdn.net/alexbnlee/article/details/6912319Application.Version 显示Excel的版本号Application.UserName 显示当前用户的用户名Application.StatusBar = "状态栏" 状态栏显示内容Application.StatusBar = False 状态栏不显示内容Application.Wait Now() + TimeValue("00:00:01") DoEvents暂停 阅读全文

posted @ 2011-10-27 23:05 McDelfino 阅读(372) 评论(0) 推荐(0) 编辑

Excel VBA - Workbook对象
摘要:来源:http://blog.csdn.net/alexbnlee/article/details/6911204Workbooks(1).NameWorkbooks(1).FullName 工作簿地址加名字Workbooks(1).Path 工作簿地址Workbooks(1).Close SaveChanges:=False 关闭工作簿,并且不保存Workbooks.Open ThisWorkbook.Path & "\123.xlsx" 打开这个地址的文件Workbooks(1).Save 工作簿保存ThisWorkbook.SaveAs Filename:=T 阅读全文

posted @ 2011-10-27 16:38 McDelfino 阅读(436) 评论(0) 推荐(0) 编辑

Excel VBA - Sheet对象
摘要:来源:http://blog.csdn.net/alexbnlee/article/details/6910151工作表引用Worksheets(3).Select 这里面的3是Index,就是一个下面的顺序Worksheets("Sheet3").Select 这里面的Sheet3是NameSheet3.Select 这里面的Sheet3是CodeName数组For Each Rng in Range("A1:J10")For Each Sht in WorksheetsFor Each Book in Workbooks添加工作表Worksheets 阅读全文

posted @ 2011-10-27 12:29 McDelfino 阅读(1086) 评论(0) 推荐(0) 编辑

Excel VBA - Range对象
摘要:来源:http://blog.csdn.net/alexbnlee/article/details/6909689Rows.Count 显示所有行的数目Columns.Count 显示所有列的数目Cells(Rows.Count, 1).End(xlUp).Row 显示第一列从下面数第一个有值的单元格的行号Cells(1, Columns.Count).End(xlToLeft).Column 显示第一行从右面数第一个有值的单元格的列号Cells(1, 1).BorderAround xlContinuous, xlThin 给A1单元格加入外边框Range("A1:B4" 阅读全文

posted @ 2011-10-27 10:30 McDelfino 阅读(917) 评论(0) 推荐(0) 编辑

Excel VBA函数
摘要:来源:http://www.gisall.com/?uid-153242-action-viewspace-itemid-5903 Rows.Count 显示所有行的数目Column.Count 显示所有列的数目Cells(Rows.Count, 1).End(xlUp).Row 显示第一列从下面数第一个有值的单元格的行号Cells(1, Columns.Count).End(xlToLeft).Column 显示第一行从右面数第一个有值的单元格的列号Cells(1, 1).BorderAround xlContinuous, xlThin 给A1单元格加入外边框Range("A1: 阅读全文

posted @ 2011-10-25 16:49 McDelfino 阅读(650) 评论(0) 推荐(0) 编辑

Excel VBA 循环“我中毒了~”
摘要:来源:http://mcdelfino.blog.51cto.com/2058744/691131 Dim Runtime As Date Sub RunTimer() Runtime = Now() + TimeValue("00:00:01") Application.OnTime Runtime, "my_Procedure" End Sub Sub my_Procedure() Static count As Integer count = count + 1 ... 阅读全文

posted @ 2011-10-18 16:29 McDelfino 阅读(351) 评论(0) 推荐(0) 编辑

Excel VBA 实现电子钟
摘要:来源:http://mcdelfino.blog.51cto.com/2058744/691026Dim Runtime As Date '定义时间变量 Sub RunTimer() Runtime = Now() + TimeValue("00:00:02") '时间显示为增加1秒 Application.OnTime Runtime, "my_Procedure" '在这个指定的时间执行下面的过程End Sub Sub my_Procedure() Range("A1") = Format(Time, &q 阅读全文

posted @ 2011-10-18 15:23 McDelfino 阅读(1255) 评论(0) 推荐(0) 编辑

word替换实例
摘要:来源:http://www.gisall.com/?uid-153242-action-viewspace-itemid-58521.问题: 怎样一次替换多个词,如语文、数学、英语这3个词在文章的不定位置,想一次性把文章里的词都分别替换成科学两个字。解答:P:[语文数学英语]{2}H:科学2.问题:word 替换功能,想把「 」 替换成“”。解答:P:「(*)」H:“\1”或P:(「)(*)(」)H:“\2”3.问题:比如我在文档中有[1] [2] [3] [4]等 我想把它们一次性替换成(1)(2)(3)(4) 具体怎么操作,听说通配符可以,可不是很明白。求具体操作方法.解答:P:\[(*) 阅读全文

posted @ 2011-10-11 22:16 McDelfino 阅读(263) 评论(0) 推荐(0) 编辑

ArcGIS中的术语表
摘要:来源:http://www.gisall.com/?uid-153242-action-viewspace-itemid-5847术语表访问键(accesske)允许用户通过按住Alt键和菜单或菜单项上带下划线的字母来访问主菜单(Main Menu)内容的键盘快捷方式。通过在命令标题上的相应字母前加&符号来创建访问键。活动数据框(activedataframe)指地图中当前正在工作的数据框——例如,正在增加图层的数据框。活动数据框在地图上高亮显示,且其名字在内容表中以粗体字显示。AML(AM)参见“ARC宏语言(ARCMacroLanguage)”。注记(annotation)用于标识 阅读全文

posted @ 2011-10-11 13:24 McDelfino 阅读(1897) 评论(0) 推荐(0) 编辑

Word替换技巧
摘要:来源:http://www.gisall.com/?uid-153242-action-viewspace-itemid-5846Word替换技巧四则1.在Word中进行“查找”和“替换”时,如果使用通配符进行相关操纵可以大大提高工作效率,下面就是一些常用的通配符查找的例子:通配符“[]”用来查找指定的字符之一,如“th[iu]g”,就可查找到“thigh”和“thug”。通配符“[!]”用来查找指定字符以外的任意字符,如“m[!a]st”,用来查找“mist”和“most”不会查找“mast”。在查找时也可以表达式进行查找,“{n}”,表示n次重复前一个字符,如“te{2}n”,表示查找“t 阅读全文

posted @ 2011-10-11 13:00 McDelfino 阅读(3106) 评论(0) 推荐(0) 编辑

利用win7自带的远程协助
摘要:来源:http://mcdelfino.blog.51cto.com/2058744/683279Step1:在计算机里单击右键,选属性,在弹出的窗口中选择高级系统设置。Step2:在系统属性中,切换到远程选项卡,勾选允许远程协助连接这台计算机。Step3:单击高级按钮,我们对远程协助进行进一步的设置。我们可以合理设置打开最长时间,并勾选创建仅运行Vista或者更新版本的计算机使用的邀请。创建邀请问题Step1:打开Windows 7远程协助(msra),在这个窗口中,选邀请信任的人帮助您。Step2:在你希望如何邀请所信息的帮助者询问中,这里有三个选项,我们选使用轻松连接。Step3:在这个 阅读全文

posted @ 2011-10-09 10:57 McDelfino 阅读(392) 评论(0) 推荐(0) 编辑

win+R system32 中部分程序名称
摘要:来源:http://mcdelfino.blog.51cto.com/2058744/683253system32中的一些程序, 可以直接通过win+R来搜索这些小程序notepad 记事本stikynot 便利贴mspaint 画图msra 远程协助mstsc 远程桌面calc 计算器osk 打开屏幕键盘snippingtool 截屏工具soundrecorder 录音机write 写字板d... 阅读全文

posted @ 2011-10-09 10:30 McDelfino 阅读(317) 评论(0) 推荐(0) 编辑

ArcScan使用心得
摘要:来源:http://www.gisall.com/?uid-153242-action-viewspace-itemid-5823今天照着ESRI官方的帮助教程做了一下有关ArcScan的操作, 整个过程感到受益匪浅, 以前浪费那么多时间再那里数字化, 没想到数字化原来可以这么省事啊~这里面有参考资料:http://bbs.esrichina-bj.cn/ESRI/thread-102427-1-1.html我的一些心得:1.加入图像, 这里要注意了, 因为在自动矢量化的时候需要的是二值图, 而二值图是由灰度图转得, 因此只需要RGB图中的一个波段即可, 加入后, 转成二值图, 右键属性/符号 阅读全文

posted @ 2011-10-07 23:31 McDelfino 阅读(999) 评论(0) 推荐(0) 编辑

ArcGIS10官方教程
摘要:来源:http://www.gisall.com/?uid-153242-action-viewspace-itemid-58193D Analyst 教程:>>>>点击查看<<<<ArcScan 教程:>>>>点击查看<<<<编辑 教程:>>>>点击查看<<<<编辑教程 - 练习1 - 总结:1. 数字化的时候,"要素构造"工具可通过按 TAB 键来调整位置. (1b)2. 可为字段设置默认值. (1c)3. F6:"绝 阅读全文

posted @ 2011-10-07 15:24 McDelfino 阅读(2665) 评论(0) 推荐(1) 编辑

相关资料链接
摘要:来源:http://www.gisall.com/?uid-153242-action-viewspace-itemid-58151、空间叠置和缓冲区分析:>>>>点击查看<<<<2、高斯克吕格投影:>>>>点击查看<<<<2、基于ArcGIS的DEM数据生成方法的研究与探讨:>>>>点击查看<<<< 阅读全文

posted @ 2011-10-07 12:03 McDelfino 阅读(205) 评论(0) 推荐(0) 编辑

地理信息系统基本名词术语
摘要:来源:http://www.gisall.com/?uid-153242-action-viewspace-itemid-5814★测绘外业就是利用接触与非接触式的方式采集野外地形、地貌等地理相关数据。★测绘内业指在室内进行对外业采集的数据进行处理,成图等工作。★1954年北京坐标系 Beijing Geodetic Coordinate System l954 1954年我国决定采用的国家大地坐标系,实质上是由原苏联普尔科沃为原点的1942年坐标系的延伸。 ★1956年黄海高程系统 Huanghai Vertical Datum l956以青岛验潮站根据1950年—1956年的验潮资料计算确 阅读全文

posted @ 2011-10-07 10:26 McDelfino 阅读(1441) 评论(0) 推荐(0) 编辑

Spatial Join(空间连接)简介
摘要:来源:http://www.gisall.com/?uid-153242-action-viewspace-itemid-5812操作 连接 效果点A 点B [点]到点A最近的点B(属性)线A 点B [线]到线最近的点(属性)面A 点B [面]到面最近的点(属性)点A 线B [点]到点最近的线(属性... 阅读全文

posted @ 2011-10-06 23:27 McDelfino 阅读(1100) 评论(0) 推荐(0) 编辑

点击右上角即可分享
微信分享提示