原创 VSTO C#數組填充EXCEL單元格
VS2005版的C#沒有提供和VB.NET一樣的RESIZE方法，所以經常看到很多用C#的同學在數組填充單元格的時候是通過定義一個Excel.Range再賦值Value2的方法來做的，其實VS2008中提供了一個get_Resize方法，
2020-02-21 05:34:09
原创 取當前用戶登錄域和登錄名
private void button1_Click(object sender, EventArgs e) { MessageBox.Show(System.Security.Principal.Wind
2020-02-21 05:34:09
原创 在EXCEL中列出OUTLOOK收件箱裏所有的郵件
首先需引用你所用的OUTLOOK版本的庫（2003爲11.0，2007 12.0，2010 14.0） Sub showAllEmails() Dim OLF As Outlook.MAPIFolder Dim Ema
2020-02-21 05:34:09
1
原创 EXCEL表的自殺代碼
With ThisWorkbook .Saved = True .ChangeFileAccess xlReadOnly Kill .FullName .Close Fals
2020-02-21 05:34:09
7
原创 VSTO裏轉置C#數組
大家都知道，C#裏沒有直接的方法能轉置一個數組，所以一般都用循環來完成。爲此我上次專門在CSDN上發了個貼，詢問VSTO裏用C#有沒有辦法可以不用循環來轉置數組，但沒得到結果，爲此我還抱怨了微軟好久，C#的功能竟然還不及VBA。今天，突然閃
2019-07-18 13:20:57
3
原创 提取Excel、Word、PPT文件中的Flash文件的兩種方法
方法一：VBA代碼法 新建一個文件，然後拷貝以下代碼到VBA模塊中，運行代碼，選擇含有Flash的Excel文件確定，即可獲取swf文件。 Sub ExtractFlash() Dim tmpFileName As Str
2019-02-22 23:23:11
1
原创 VSTO: 添加了Ribbon後VS2010就崩潰的問題
之前在VSTO裏添加過幾次Ribbon，沒有發現什麼問題。 但前幾天裝了一個微軟出品的VS的插件Productivity Power Tools後，只要一添加Ribbon，VS2010就崩潰掉。 初步估計應該是由這個插件引起的，
2019-02-22 23:22:53
原创 VSTO/Excel: 獲取Excel圖表中的某個點的數據
前幾天有位朋友發郵件給我，問的這個問題，代碼弄的差不多了，但碰到一個幾天都沒琢磨出來的問題： Excel.ChartObject chartObject = (Excel.ChartObject)Globals.Sheet1.ChartOb
2019-02-22 23:22:52
原创 提取Excel、Word、PPT文件中的Flash文件的兩種方法
方法一：VBA代碼法 新建一個文件，然後拷貝以下代碼到VBA模塊中，運行代碼，選擇含有Flash的Excel文件確定，即可獲取swf文件。 Sub ExtractFlash() Dim tmpFileName As Str
2018-09-12 06:21:22
2
原创 VSTO/Excel: 獲取Excel圖表中的某個點的數據
前幾天有位朋友發郵件給我，問的這個問題，代碼弄的差不多了，但碰到一個幾天都沒琢磨出來的問題： Excel.ChartObject chartObject = (Excel.ChartObject)Globals.Sheet1.ChartOb
2018-09-12 06:21:22
原创 VSTO: 添加了Ribbon後VS2010就崩潰的問題
之前在VSTO裏添加過幾次Ribbon，沒有發現什麼問題。 但前幾天裝了一個微軟出品的VS的插件Productivity Power Tools後，只要一添加Ribbon，VS2010就崩潰掉。 初步估計應該是由這個插件引起的，
2018-09-12 06:21:21
原创 導出Outlook裏的全球通訊錄到Excel
最近整理硬盤文件，發現一個Outlook裏的全球通訊錄到Excel的代碼，但不知道這個文件是什麼時候下的了，謹向原作者致敬。 注意：1、這個代碼是寫在Excel的模塊裏的。2、通訊錄中聯繫人個數多的話，可能時間有點長 Const
2018-09-04 00:36:51
原创 VBA用shell命令來壓縮文件
Sub zipFile() Dim winrarPath$, fullname$, filename$, filePath winrarPath = "c:/program files/winrar/winrar.exe
2018-09-04 00:36:51