- 博客(11)
- 资源 (7)
- 收藏
- 关注
RSS订阅原创 一个有趣的C#正则替换问题
9.1(2) ------ 9.119(3).5(1) ----- 999.589(2).7 ------ 899.7即把括号替换成括号前一数字的N次原帖见http://topic.csdn.net/u/20100317/19/e25694b8-ff80-427a-910b-04a666ce6cbc.html static void Main(string[] args){
2010-03-17 23:28:00
728
原创 VSTO在EXCEL添加VBA模块代码
private void ThisWorkbook_Startup(object sender, System.EventArgs e){ string sCode = "Sub VBAMacro()/r/n" + "MsgBox /"Test/"/r/n" + "End Sub"; VBComponent oModule; oModule = Globals.T
2010-03-16 13:58:00
2147
原创 VSTO中捕捉窗口缩放的事件
private void ThisWorkbook_Startup(object sender, System.EventArgs e) { this.WindowResize += new Microsoft.Office.Interop.Excel.WorkbookEvents_WindowResizeEventHandler(ThisWor
2010-03-15 16:25:00
1423
原创 EXCEL里常用的几个正则表达式
"^/d+$" //非负整数（正整数 + 0）"^[0-9]*[1-9][0-9]*$" //正整数"^((-/d+)|(0+))$" //非正整数（负整数 + 0）"^-[0-9]*[1-9][0-9]*$" //负整数"^-?/d+$" //整数"^/d+(/./d+)?$" //非负浮点数（正浮点数 +
2010-03-13 23:43:00
12620
原创 在EXCEL中列出OUTLOOK收件箱里所有的邮件
首先需引用你所用的OUTLOOK版本的库（2003为11.0，2007 12.0，2010 14.0） Sub showAllEmails() Dim OLF As Outlook.MAPIFolder Dim Emails&, i&, k& Dim arr Application.ScreenUpdating = False Set OL
2010-03-11 23:57:00
1651
原创 VSTO C#数组填充EXCEL单元格
VS2005版的C#没有提供和VB.NET一样的RESIZE方法，所以经常看到很多用C#的同学在数组填充单元格的时候是通过定义一个Excel.Range再赋值Value2的方法来做的，其实VS2008中提供了一个get_Resize方法，无需那么麻烦了。 private void button1_Click(object sender, EventArgs e){ int[,]
2010-03-10 23:56:00
2698
原创 删除整篇Word文档中的图文框
EH上看到有人问这个问题，其实只需要一句代码就行立即框输入以下代码后回车For Each x In ActiveDocument.Frames: x.Delete: Next 作者：laoyebin(Paladin.lao)博客园出处：http://laoyebin.cnblogs.com/个人网站英文出处：http://mrvsto.com/个人网站中
2010-03-09 12:22:00
7296
1
原创 禁止在EXCEL中CTRL+C的复制快捷键
Private Sub Workbook_Open() Application.OnKey "^{c}", ""End SubPrivate Sub Workbook_Deactivate() Application.OnKey "^{c}"End Sub 作者：laoyebin(Paladin.lao)博客园出处：http://laoyebi
2010-03-06 23:40:00
3343
原创 123456789四则运算
代码说明：在123456789或987654321中插入+-*/四则符号来算出一个固定的值。asc为true时是123456789，反之为987654321。123456789算100，C#下时间为15秒，VBA下为56秒，快了3/4。版权说明：本文来自狼版http://blog.csdn.net/northwolves/archive/2009/11/20/4841068.aspx一文，
2010-03-05 13:48:00
1567
原创 EXCEL从ACCESS中取值
ACCESS数据库界面：EXCEL的窗体界面：窗体中的代码：Private Sub ComboBox1_Change() Dim cn As Object, sql$, arr, i& Set cn = CreateObject("adodb.connection") cn.Open "provider=Microsoft.jet.
2010-03-03 22:04:00
1476
原创 取单元格红色字体的VBA自定义函数
Function GetColorChar(Rng As Range) Application.Volatile True Dim i%, str$ For i = 1 To Len(Rng) If Rng.Characters(i, 1).Font.Color = 255 Then str = str & Mid(Rng.
2010-03-02 22:23:00
2570
EXCEL工作表事件改变值
2010-01-14
生成1-10的组合数
2009-12-25
Vlookup只能查出第一个匹配的单元格
2009-11-21
Vlookup只能查出第一个匹配的单元格
2009-11-21
excel宏操作，求解
2009-08-24
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人