| 共 29 篇文章 |
|
VBA常用代码解析（第四十五讲）RMBDX= IIf(Left(Right(RMBDX，3)，1) = ''元''，Left(RMBDX，Len(RMBDX)- 1) &''角'' &Right(RMBDX，1) &''分''，IIf(Left(Right(RMBDX，2)，1) = ''元''，RMBDX &''角整''，IIf(RMBDX = ''零'&#... 阅525 转42 评0 公众公开 15-10-27 11:15 |
VBA常用代码解析（第四十三讲）在对工作表的单元格区域进行求和计算时，使用工作表Sum函数比使用VBA代码遍历单元格进行累加求和效率要高得多，代码如下所示。第7行到第19行代码遍历单元格区域，使用工作表Max、Min函数判断单元格数值是否是所在区域的最大、最小值，如果是，将其所在的单元格底色设置为红色或蓝色，并保存其数值和数量。第4行代... 阅387 转37 评0 公众公开 15-10-27 11:15 |
Public PreWinProc As Long，hwnd As Long.Public Declare Function CheckMenuRadioItem Lib''user32'' (ByVal hMenu As Long，ByVal un1 AsLong，ByVal un2 As Long，ByVal un3 As Long，ByVal un4 AsLong) As Long.Private Declare Function CallWindowProc Lib''user32'' Alias ''CallWindowProcA&... 阅866 转46 评0 公众公开 15-10-27 11:15 |
运行窗体，将工作表的图表显示在窗体中。第61行到第63行代码窗体的初始化事件过程，窗体加载时将工作表中的图表显示在窗体中。用户窗体中的控件在运行时是不能调整大小的，而在某些情况下需要在窗体运行时调整控件的大小，此时可以利用控件的MouseMove事件。在MouseMove事件过程中，当用户在窗体上按下左键移动鼠标时，调整两个框架控件的Width... 阅776 转44 评0 公众公开 15-10-27 11:15 |
下图所示为带有一组数据的工作表，活动单元格（也称为当前单元格）为单元格A1。观察宏录制的代码和相应的解析，可以看出Selection代表当前活动单元格，单元格对象的End属性使单元格快速移动到同一列或行的末尾或者开头，其括号内的参数值指示单元格移动的方向。换句话说，以有数据的单元格区域的最后一个单元格为起点，结合参数值xlDown（向下... 阅2138 转32 评0 公众公开 15-10-27 11:14 |
在VBE窗口中单击菜单“插入”→“用户窗体”，插入一个窗体，在窗体中添加一个Image控件，设置Image控件Picture属性为自定义图标的位图，并将Image控件的Visible属性设置为False，使窗体运行时隐藏Image控件。运行窗体后，在窗体标题栏上添加图标。如果不希望用户通过窗体标题栏的关闭命令来关闭窗体，可以禁用窗体标题栏上的关闭按钮，如下面... 阅504 转39 评0 公众公开 15-09-23 06:43 |
比如下面的代码，希望在显示窗体的同时给单元格赋值，但因为窗体显示为模态的，在窗体没有关闭之前，给单元格赋值的代码是不会执行的，所以达不到显示窗体的同时给单元格赋值的目的。模态下是无法操作工作表的，所以应将第4行代码改成如下的代码，才能在显示窗体的同时给单元格赋值。步骤1，在VBE窗口中单击菜单“插入”→“用户窗体”，在窗体... 阅487 转39 评0 公众公开 15-09-23 06:42 |
如果需要自定义Listview控件的行距，可以在窗体中添加一个ImageList控件，在ImageList控件中导入一张大小合适的空白图片，然后指定Listview控件的SmallIcons属性为ImageList控件中的图片，代码如下：131-5 Listview控件的图标设置。与大图标视图模式有所不同的是，当使用小图标视图模式时需要使用ListView控件的SmallIcons属性建立与ImageList... 阅413 转36 评0 公众公开 15-09-23 06:42 |
使用spreadsheet控件。ListItem对象的text属性代表Listview控件的第一列内容，因为Listview控件的第一列的文本对齐方式只能设置为左对齐，所以在添加时使用Space函数插入两个空格，使行标题达到居中显示的效果。第16行代码设置Listview控件的CheckBoxes属性为True，使Listview控件在列表的每个项的旁边显示复选框。运行窗体，Listview控件显示... 阅435 转40 评0 公众公开 15-09-23 06:42 |
第3、4行代码为了避免在工作表中重复添加按钮控件，先删除工作表中的“myButton”按钮。▲128 中使用代码在工作表中添加的是窗体控件，而本例中使用代码在工作表中添加的是ActiveX控件，两者是有区别的，在工作表中前者是使用窗体对话框添加，而后者是使用控件工具箱添加。使用Add方法在工作表中添加ActiveX控件，如下面的代码所示。第3、4行代... 阅638 转35 评0 公众公开 15-09-23 06:42 |
