Programming Comments in Excel 2003

Visual Studio Tools for Office

Windows Tech ‹ Office
- Archive
  - SQL Server
  - Windows Live
  - VB
  - VC++
  - Dotnet
  - Visual C#
  - VS Express
  - Smart Device
  - Windows Forms
  - SharePoint
  - VS 2008
  - ISV
  - Office
  - IE
  - Visual Studio
  - Windows Vista
  - Game
  - Architecture
  - VFP

- Previous
  - 1
    - Draggable ListBox - Excel Hi, Can I create a ListBox, display it on an Excel sheet and let my users drag it around That is, not drag a value from it, but drag the entire ListBox. I'd appreciate any help, even a "yes, but it's really really hard." Thanks Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 2
    - Security problem Word 2007 add-in In the add-in itself I use reflection. An other programmer can give me a DLL file with actions (functions) and with the class, namespace and the path of the DLL I can use these functions in my add-in. I tested everything in a windows application and it worked perfect. After that I tried to use the same code in my Word add-in but I got a Security error. Here is the code where I had the problem: Code Snippet Assembly assem = Assembly.LoadFile(this.FilePath); if (assem == null) return; //compilatie liep wellicht verkeerd System.Type T = assem.GetType(this.Namespace + "." + this.Class); object o = System.Activator.CreateInstance(T); T.InvokeMember(this.Method, System.Reflection.BindingFlags.InvokeMethod, null, o, new object[] { (object)dicArgs, (object)sConfig }); The program gave a securityerror on the InvokeMember method. Probably I have to register the used dll somewhere in the .NET Framework 2.0. Can anybody help me fix this Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 3
    - VSTO Outlook Addin Help I already asked this question but nobody answered it. If nobody knows the answer please let me know and I will search for an alternate solution. I am trying to create an AddIn for Outlook. The AddIn is used to auto populate the "To..., Cc..., and Bcc..." on a new message from data I have stored in a database. Does anybody know how to create or overload an event handler for the text fields where a user enters the To... Cc... and Bcc... Email addresses Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 4
    - Communication between Add in and Smart Tag in Office 2007 Hello, I have developed a custom smart tag dll for Office 2007. I've registered it in the win registry and the Office 2007 applications succesfully load it. But how can i access the recognizer of my smart tag in the Add-In that i'm developing (I need to set the recognized terms in my Add-In) It is not in the Application.SmartTagRecognizers property. Does this mean that custom smart tag recognizers cannot be accessed through this property And one more question. Which is loaded first - the Add-In or the Smart Tag Thanks, Kostadin Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 5
    - Adding pages to document based on the same template Hello I have a simple single page template for a letter that I fill out using a simple C# application. But how do I make multiple pages of that template in the same document, eg. adding pages to a "Microsoft.Office.Interop.Word.Document" document for each recipient. The letters will never be more than a page long. What I'm trying to accomplish is beeing able to make severel letters from one template and then Print them out in one go. How is this possible Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 6
    - Deploying my VSTO-project. Hi! My problem is as follows: I had to upgrade a VB6-project to VB.Net, and while I was at it, make it so that it would be more pretty (all this is an Office Word-add-in). So I did just that on my local PC, I changed the forms to CustomTaskPanes and such, all looking very nice if I may say so myself First problem came in the form of the DLL's that were used: there was a COM-dll that was made way back when the original VB6-project was made, so an Interop-dll was made. Other dll's I had to use ildasm.exe / ilasm.exe to make them work. The day of deploying was there, because on my locaxl machine, everything seemed to work. So I made an installer project, followed the steps I found in an MSDN-article, it all compiled perfectly. Then I went and installed it on another machine. .Net framework and VSTO runtime gets installed just fine, my project gets installed, but Word just won't autoload my add-in. It is not in the "Disabled add-ins"-list, just in the "inactive add-ins"-list (Word options - add-ins) I go to COM add-ins, I check the checkbox so it should auto-load, but when I go back to the COM add-ins-screen, it is already un-checked... Adding the DLL with the Add...-button results in a "(myDLL) is not a valid Office Add-in."-error (same goes for the mydll.dll.manifest, if that is at all possible... Just so you know ) So... a realy urgent problem, actually, and I'd like a solution as fast as possible Eternal gratitude for whoever can tell me how to do this... Peter. Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 7
    - How to make a Form Region default to an Outlook-2007 folder Hi, I have created a form region(.ofs). I have couple of questions. 1> How to publish form region programmatically 2> How to make this form region default to a folder programmatically Thanks. Rama Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 8
    - Developing an Addin for Excel - Problem Debugging Hi, I am writing an Addin for Excel which will create menu and do some other good stuff. I am using VST 2005 version 2.0.50727. The problem is that when I try to debug the code I wrote, I can't get the process to enter the OnConnect event. So it starts Excel (as I have specified Excel.exe as "Start external program" option) and then does nothing. How can I get this to laod my addin once it starts Excel Here is a list of references I have: Excel Extensibility Office System System.configuration System.Data System.Drawing System.Windows.forms System.Xml VBIDE Let me know if more info is required. Thanks, Radim. Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 9
    - Single Addin for Word 2003 and 2007 ? Hi, During 3 days I am trying to find some information or sample about using the same addin in office 2003 and 2007 : I know that the UI is different (CommanBar for 2003 and Ribbons for 2007) but can the same addin be used for both Word 2003 and 2007 if the right interfaces are implemented Thanks Daniel Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 10
    - Why all addins try connect to crl.microsoft.com at start? I try install VSTOR addins to the computers which can't access to the internet. All addins wait for something at start. I discover that addins access to the crl.microsoft.com. Is possible turn off this feature Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 11
    - Outlook Exchange server address Hi, I need to get the exchange server address(name), user name, email id, password from the outlook programmatically using C#. Outlook is already configured. I need to get the details. I was able to get the AD user name using the following code Application objOutlook = new Application (); // Get items in my inbox. NameSpace outlookNS = objOutlook.GetNamespace( "MAPI" ); outlookNS.CurrentUser.Address give me the username. How to find the other details like email id, server address, password. Thanks in advance Srinivasan Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 12
    - Exception from HRESULT: 0x800A03EC. at at Microsoft.Office.Interop.Excel.WorkbookClass.get_VBProject() Hi, I am trying to create a excel macro programatically from VS .Net 2003 (C#). I followed the MSDN KB article at http://support.microsoft.com/ kbid=303872 . However everytime the program executes the following line of code, it behaves strangely. Code Line: objModule = objNewBook.VBProject.VBComponents.Add(VBIDE.vbext_ComponentType.vbext_ct_StdModule); Everytime the code tries to execute this line of code, first it gives an error "Programmatic access to Visual Basic Project is not trusted". However I have already allowed the VB access to the macro from Excel Tools|Options|Security|Macro Security|Trusted Publishers. But everytime the programs fails first time for this reason, and when I step into and debug and take the debug cursor back to the program line and press F10, it fails for a different error "Exception from HRESULT: 0x800A03EC." I need to have this code running by the end of today. please help! I am attaching the code module here, the function uses many other functions and libraries which are not needed here. So I am not including them. private void DisplayExcel() { ExcelApp.Application objApp = null; ExcelApp._Workbook objBook = null; ExcelApp._Workbook objNewBook = null; ExcelApp._Worksheet objSheet = null; ExcelApp._Worksheet objNewSheet = null; VBIDE.VBComponent objModule = null; Object objMissing = System.Reflection.Missing.Value; DBConnect objDBCon = null; DataSet objData = null; try { string strFileName = mstrDB.Split('.')[0].ToString() + "-LLG.xls"; strFileName = GetFilePathContext() + Common.FILE_PATH_CONTEXT.TEMPLATE_CONTEXT + "\\" + strFileName; KillZombieExcel(); objApp = new ExcelApp.Application(); if(File.Exists(strFileName)) { string[] arrPDPs = new string[16]; if(radIsPDP.SelectedValue == "1") { int intPDPCount = Common.BLANKS.BLANK_NUMBER; for(int intIndex=lstHealthPlan.SelectedIndex; intIndex<lstHealthPlan.Items.Count; intIndex++) { if(lstHealthPlan.Items[intIndex].Value.Substring(0, 5) == lstHealthPlan.SelectedValue.Substring(0, 5)) arrPDPs[intPDPCount++] = lstHealthPlan.Items[intIndex].Value; else break; } } else arrPDPs[0] = lstHealthPlan.SelectedValue; objApp.Visible = true; objBook = objApp.Workbooks._Open(strFileName, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing); objNewBook = objApp.Workbooks.Add(objMissing); for(int intIndex=0; intIndex<arrPDPs.Length; intIndex++) { if(arrPDPs[intIndex] == null) break; objSheet = (ExcelApp._Worksheet)objBook.Worksheets["Plan Selection"]; objSheet.Activate(); objSheet.Cells[3,5] = arrPDPs[intIndex]; RunMacro(objApp, new Object[]{"CreateGridWithFilter"}); objSheet = (ExcelApp._Worksheet)objBook.Worksheets["Output Grid"]; objSheet.Activate(); objSheet.get_Range("A1", "S216").Copy(objMissing); if(intIndex <=2) objNewSheet = ((ExcelApp._Worksheet)objNewBook.Worksheets[intIndex+1]); else objNewSheet = ((ExcelApp._Worksheet)objNewBook.Worksheets.Add(objMissing, objMissing, objMissing, objMissing)); objNewSheet.Name = arrPDPs[intIndex]; objNewSheet.get_Range("A1", "S216").PasteSpecial(ExcelApp.XlPasteType.xlPasteColumnWidths, ExcelApp.XlPasteSpecialOperation.xlPasteSpecialOperationNone, objMissing, objMissing); objNewSheet.get_Range("A1", "S216").PasteSpecial(ExcelApp.XlPasteType.xlPasteAll, ExcelApp.XlPasteSpecialOperation.xlPasteSpecialOperationNone, objMissing, objMissing); objModule = objNewBook.VBProject.VBComponents.Add(VBIDE.vbext_ComponentType.vbext_ct_StdModule); objModule.CodeModule.AddFromFile(GetFilePathContext() + Common.FILE_PATH_CONTEXT.TEMPLATE_CONTEXT + "\\" + "FormatGrid.txt"); RunMacro(objApp, new Object[]{"FormatGrid"}); objApp.ActiveWindow.Zoom = 89; } strFileName = strFileName.Split('.')[0].ToString() + "-" + DateTime.Now.ToString().Replace("/",Common.BLANKS.BLANK_STRING).Replace(":", "-") + ".xls"; objNewBook.SaveAs(strFileName, objMissing, objMissing, objMissing, objMissing, objMissing, ExcelApp.XlSaveAsAccessMode.xlNoChange, objMissing, objMissing, objMissing, objMissing, objMissing); objNewBook.Close(objMissing, objMissing, objMissing); string[] strSplit = strFileName.Split('\\'); strFileName = " \\BenefitComplianceUI\\ " + Common.FILE_PATH_CONTEXT.TEMPLATE_CONTEXT + "\\" + strSplit[strSplit.Length-1]; Response.Redirect(strFileName, true); } else { strFileName = GetFilePathContext() + Common.FILE_PATH_CONTEXT.TEMPLATE_CONTEXT + "\\" + "PBP-LLG-Template.xls"; objBook = objApp.Workbooks._Open(strFileName, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing); strFileName = GetFilePathContext() + Common.FILE_PATH_CONTEXT.TEMPLATE_CONTEXT + "\\" + mstrDB.Split('.')[0].ToString() + "-LLG.xls"; objBook.SaveAs(strFileName, objMissing, objMissing, objMissing, objMissing, objMissing, ExcelApp.XlSaveAsAccessMode.xlNoChange, objMissing, objMissing, objMissing, objMissing, objMissing); objBook.Close(objMissing, objMissing, objMissing); string[] strTable = new string[]{"PBP", "PBPC", "PBPC_OON", "PBPD", "PBPD_OPT", "PBPMRX", "PBPMRX_G", "PBPS1", "PBPS2", "PBPS3", "PBPS4", "PBPS5", "PBPS6", "PBPS7", "PBPS8", "4a 4b 10a Waived"}; string[] strSQL = new string[strTable.Length]; for(int intIndex=0; intIndex<strTable.Length-1; intIndex++) { strSQL[intIndex] = "SELECT * FROM " + strTable[intIndex]; } strSQL[strTable.Length-1] = CustomQuery(); objDBCon = new DBConnect(mstrDB); objData = objDBCon.ExecuteQuery(strSQL, strTable); if(objData != null) { objApp.Visible = true; objNewBook = objApp.Workbooks._Open(strFileName, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing, objMissing); for(int intIndex=0; intIndex<objData.Tables.Count; intIndex++) { System.Data.DataTable objTable = objData.Tables[intIndex]; objSheet = (ExcelApp._Worksheet)objNewBook.Worksheets[objTable.TableName]; objSheet.Activate(); string strStartIndex = Common.BLANKS.BLANK_STRING; string strEndIndex = Common.BLANKS.BLANK_STRING; int intOffset = 0; GetBoundariesForSheet(intIndex, out strStartIndex, out strEndIndex, out intOffset); objSheet.get_Range(strStartIndex, strEndIndex + (objTable.Rows.Count + intOffset -1).ToString()).CopyFromRecordset(Common.ConvertToRecordset(objTable), objMissing, objMissing); } objNewBook.Save(); objNewBook.Close(objMissing, objMissing, objMissing); objApp.Workbooks.Close(); objApp.Quit(); DisplayExcel(); } } } catch(ThreadAbortException exp) { } catch(Exception exp) { Common.Log(exp, Common.PAGE.LOW_LEVEL_GRID + ".ShowReport()", EventLogEntryType.Error, User.Identity.Name); Response.Write(exp.StackTrace); Response.End(); } finally { if(objApp != null) System.Runtime.InteropServices.Marshal.ReleaseComObject (objApp); if(objSheet != null) System.Runtime.InteropServices.Marshal.ReleaseComObject (objSheet); if(objBook != null) System.Runtime.InteropServices.Marshal.ReleaseComObject (objBook); if(objNewBook != null) System.Runtime.InteropServices.Marshal.ReleaseComObject (objNewBook); objSheet=null; objBook=null; objNewBook=null; objApp = null; GC.Collect(); KillZombieExcel(); if(objDBCon != null) objDBCon.Dispose(); if(objData != null) objData.Dispose(); } } private void RunMacro(object oApp, object[] oRunArgs) { oApp.GetType().InvokeMember("Run", System.Reflection.BindingFlags.Default | System.Reflection.BindingFlags.InvokeMethod, null, oApp, oRunArgs); } Thanks -Siddhartha Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 13
    - Copy() method of the Word::Range will throw an exception in the Outlook07 In the Outlook07, word docment is the default editor for the emailitem. I get the Word:: Document property by using Inspector->GetWordEditor(). After some operations, I got a Word::Range from the Word:: Document(), then I called the Copy() method of this range, but it throw an _com_error exception says "CXX0030: Error: expression cannot be evaluated". And I also tried the Word::Range.Copy() method in the Word 2007, it works well. As part of embedding WordMail into Outlook, does this functionality lost TIA!!! Peter Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 14
    - How to create Excel HostControl from code behind Custom Control on TaskPane? In VSTO Excel document level application I need to add NamedRange controls on various worksheets. All examples I found show the creation of NamedRange from Worksheet_startup event like this: Dim textInCell As Microsoft.Office.Tools.Excel.NamedRange textInCell = Me.Controls.AddNamedRange(Me.Range("A1"), "cellText") But I cannot seem to be able to create a named range control on a sheet from any other event but that Sheet_startup. I want to create a named control on a sheet from my code on a custom control on a taskpane. If this is possible, could someone please point me to a code example Thank you, Marat. Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 15
    - using Cell object in C# Hi, I need some help translating the C# cell object into something I can use in my program. What I mean is, I can read the files using Ws.cell[x,y], and I can copy them from one Excel sheet to another, but I can't use the values in the Cell object. I tried conversions and all I get is system __COM object (or something similar). Is there any way to convert the info that's saved in the Cell object into a string Oh, and is there a way to add intems into a calendar, or import a calendar file (in Excel format) into Outlook using c# Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 16
    - Word Automation: Inserting AutoText in a document fails Hello, guys! I am writing a wrapper class library for some of the main objects of the Word Automation API and need to provide some functionality to the user to display the current page number in a document at a specific location on the page. Using the Macros Tools in Word, I found out how it is done in VBA and managed to translate it into C# code: //Getting the AutoTextEntry object from the collection of entries in the NormalTemplate. AutoTextEntry entry = Application.NormalTemplate.AutoTextEntries["- PAGE -"]; //Calling the entry's Insert method to insert the entry into a range in the document. entry.Insert(this.mRawCell.Range, ref richText) //richText = true; And here is where a COMException is thrawn with the familiar message "Error HRESULT E_FAIL has been returned from a call to a COM component". Actually, the this.mRawCell.Range thing is the Range object of a Cell in a Table in the document. I tried to use the Application.Selection.Range object after calling this.mRawRange.Select() , but it didn't work either. For your information: I am using Microsoft Word 11.0 Object Library v8.3 with Visual Studio 2005. The version of the Word Application is 11.8134.8132 SP2. Thanks for your help! Deyan Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
- Next
  - 1
    - Add transparent icon to workbook programmatically Hi, I want to add an icon with an transparent background programmatically. I can do that by clicking in Excel - so it is possible. Here is my code: Excel.Shape shape = sheet.Shapes.AddOLEObject("Forms.Image.1", missing,missing,missing,missing,missing,string.Empty,dleft, dtop, width, heigt); Excel.OLEObject oleObj = Excel.OLEObject)sheet.OLEObjects(shape.Name); MSForms.Image image = (MSForms.Image)oleObj.Object; image.AutoSize = true; image.Picture = (stdole.StdPicture)resMan.GetIcon("calculation-error.ico"); image.BorderStyle = MSicrosoft.Vbe.Interop.Forms.fmBorderStyle.fmBorderStyleNone; image.BackStyle = MSForms.fmBackStyle.fmBackStyleTransparent; I got my Picture like from an embedded resource in this way: System.Drawing.Icon image = new System.Drawing.Icon(customIconReader.BaseStream); return (stdole.IPictureDisp)System.Windows.Forms.AxHost .GetIPictureDispFromPicture(image); After doing this, I see my icon in the sheet, but the icon's background is not transparent. I was looking for a Mask-Property like they exist for CommandBarButtons, but there is none. So, how can I get the transparent background Thanks & best regards Volker Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 2
    - Command Bar doesn't seem to show up using System; using System.IO; using System.Text; using System.Windows.Forms; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using Microsoft.VisualStudio.Tools.Applications.Runtime; using Word = Microsoft.Office.Interop.Word; using Office = Microsoft.Office.Core; using Microsoft.Office.Core; using Microsoft.Office.Interop; using Microsoft.Office.Tools; using Microsoft.Office.Interop.Word; namespace Save_Doc_Button { public partial class ThisAddIn { private Office. CommandBar AppCommandBar; private Office. CommandBarButton cbbSaveData; //private Office.CommandBarButton cbbEPAID; //private Office.CommandBarButton cbbdate; string docname; string filename; private void ThisAddIn_Startup( object sender, System. EventArgs e) { BuildFormCommandBar(); } private void ThisAddIn_Shutdown( object sender, System. EventArgs e) { } private void Application_NewDocument(Microsoft.Office.Interop.Word. Document Doc) { //Handles Application.NewDocument } private void Application_DocumentOpen(Microsoft.Office.Interop.Word. Document Doc) { // Handles Application.DocumentOpen } private void Application_WindowActivate(Microsoft.Office.Interop.Word. Document Doc, Microsoft.Office.Interop.Word. Window wn) { // Handles Application.WindowActivate } private void CreateCommandBarButton( string Caption, string Tag, ref Office. CommandBarButton Btn) { //Add the button with the given Caption and Tag properties. Btn = (Office. CommandBarButton )(AppCommandBar.Controls.Add( Office. MsoControlType .msoControlButton, missing, missing, missing, missing)); Btn.Caption = Caption; Btn.Tag = Tag; //Set up the event handler for the button when it is clicked. Btn.Click += new Office. _CommandBarButtonEvents_ClickEventHandler (cbbSaveData_Click); } #region VSTO generated code /// <summary> /// Required method for Designer support - do not modify /// the contents of this method with the code editor. /// </summary> private void InternalStartup() { this .Startup += new System. EventHandler (ThisAddIn_Startup); this .Shutdown += new System. EventHandler (ThisAddIn_Shutdown); } #endregion private void BuildFormCommandBar() { { try { //Add the command bar to the document. AppCommandBar = this .Application.CommandBars.Add( "Forms Commands" , Office. MsoBarPosition .msoBarPopup, missing, true ); //Add command bar buttons to the command bar this .CreateCommandBarButton( "Extract and Save" , "EXTRACT_SAVE" , ref cbbSaveData); //this.CreateCommandBarButton("EPA ID", "EPA_ID", ref cbbEPAID); //this.CreateCommandBarButton("Date", "DATE", ref cbbdate); } catch ( Exception ex) { MessageBox .Show(ex.Message, "Error adding Forms Command Bar" ); } } } private Microsoft.Office.Core. CommandBar CreateCommandBar( string name) { return this .Application.CommandBars.Add(name, Microsoft.Office.Core. MsoBarPosition .msoBarFloating, false , true ); } static string Data_File_Name( string pathvar) //checks for files in local save folder and decides save name. { int namevar = 01; string namevar_2 = namevar.ToString(); string flnm = "Test'namevar_2'.txt" ; string path = @"'pathvar'+'flnm'" ; while ( File .Exists(path)) { namevar++; namevar_2 = namevar.ToString(); } flnm = path; return flnm; } private void cbbSaveData_Click(Microsoft.Office.Core. CommandBarButton Ctrl, ref bool CancelDefault) { this .Application.ActiveDocument.SaveFormsData = true ; FormsList f = new FormsList (); if (f.ShowDialog() == DialogResult .OK) { docname = f.SelectedFormName; } filename = Data_File_Name(docname); Data_File_Name(filename); this .Application.ActiveDocument.Save(); } } } When I build this solution, it starts Word and the COM add-ins menu says it's loaded, but I don't see my command bar or the associated button. I'm really new to VSTO, and not much more experienced with .Net dev and could really use a hand. Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 3
    - MailItem.Send() progress Hi, I'm using VSTO 2005 in Outlook 2007. Is there a way to monitor progress after calling MailItem.Send() It usually works fine, but today for some reason it seems like my code called Send(), the email was never sent, and no exception was thrown. Can I monitor progress, or find out if an error occured Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 4
    - Not refreshed items Hi, I'm developing an Outlook 2003 add-in with VSTO Second Edition. I'm having trouble with not getting the same data from appointments that are showed in the Outlook UI. I have the following example: Private WithEvents m_oCalendarItems As MsOutlook.Items Private Sub ThisAddIn_Startup(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Startup m_oCalendarItems = Me.Application.Session.GetDefaultFolder(Outlook.OlDefaultFolders.olFolderCalendar).Items End Sub Private Sub m_oCalendarItems_ItemChange(ByVal Item As Object) Handles m_oCalendarItems.ItemChange If (TypeOf Item Is MsOutlook.AppointmentItem) Then Dim oAppointmentItem As MsOutlook.AppointmentItem = DirectCast(Item, MsOutlook.AppointmentItem) Debug.Print("ItemAdd: " & oAppointmentItem.Subject & "(" & oAppointmentItem.Start & " - " & oAppointmentItem.End & ")") End If End Sub If I change the start and end time in an appointment in the Microsoft Outlook Web Access and then hits F9 in Outlook, the ItemChange event will fire with the changes i made in the Web Access (My code is printing out the changed values). If I change the start and end time in the appointment again via Outlook Web Access and hits F9 in Outlook again, the ItemChange event will fire. But the start and end time will be the old changes (My code prints out the changes I did in the first place). The appointment's start and end times are changed in the Calendar view. But if I doubleclick the appointment to open it the old start and end times are shown... If I close Outlook and starts it again, the appointment has been refreshed, but no event will fire to tell me. If i'm calling FinalReleaseCOMObject in the end of the method everything works fine though. But I can't tell if this is dangerous Is just my local .Net variable released or is the COM-object released What happens if I'm holding a reference somewhere else in the add-in to the COM object I'm releasing Thanks in advance Janni Kajbrink Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 5
    - Where is my Access class Hello, I'm trying to develop a program for automising ms Access. I'm trying to using the office PIA for this. I have added the Microsoft Access 11.0 Object Library to my project references(including core). But i get an error when trying the following: Access.Application test = new Access.Application(); This is the error i'm getting: C:\ReportCollector\Form1.cs(144): The type or namespace name 'Access' could not be found (are you missing a using directive or an assembly reference ) So where is my Access class Is Access a namespace only I realize that i probably made some stupid mistake but i just don't get it. Thank you in advance, Maarten Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 6
    - Creating a COM compatible class in C# Hello everyone, I'm trying to build a .NET class with C# which would be used in Excel VBA. I read in the O'Reilly book "Programming Excel with VBA and .NET" that, in order to do this, you had to click on Project->Add Class... and then select "COM Class". However, "COM Class" is not one of my options in that menu. I'm using Visual Studio 2003, so is it possible that this feature is new in Visual Studio 2005 Or maybe you have to configure a setting to make it appear Any help would be largely appreciated. Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 7
    - Excel: getting cells from named range using OpenOffice XML Hi, i want to retrieve cell formats from a range of cells using OpenOffice XML. i have managed to get out the named range from DefinedName element in Workbook.xml, but whats the best way to get to the cells from here the value stored in DefinedName.InnerText is of syntax sheet1!$A$3 N$12 but what would be the best way to extract the cells from the sheet thx AndersR Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 8
    - Debugging Problem Did anyone encounter problems in Debugging a VSTO application I am working with Excel VSTO and everytime I start a debug session it only lasts for few seconds or several steps and the VS 2005 restarts. WEIRD...... Pls help..... Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 9
    - How do I Exprot to Excel Hi All, I have an web application where user can export the results of search action to an excel file so he can locally store it.. I have done this with very simple code which is Response.ContentType = "application/vnd.ms-excel"; Response.AppendHeader("content-disposition", "attachment; filename=StackRanking.xls"); Response.Charset = ""; System.IO.StringWriter sw = new System.IO.StringWriter(); System.Web.UI.HtmlTextWriter hw = new System.Web.UI.HtmlTextWriter(sw); (........fils dataset..... ) hw.RenderBeginTag System.Web.UI.HtmlTextWriterTag.Html; dg.RenderControl(hw); hw.RenderEndTag(); Response.Write(sw); Response.End(); All work fine when end user has Excel 2003 but when he has Excel 2007 it gives a warning err message when he tries to open the rendered (downloaded) Excel File,I guess i need framework 3.0 to Support the file format of Excel 2007. We all know that it gives error message when we try to open an Excel 2003 file on excel 2007. What in the code needs to be changed to have compatibility with Excel 2007 File..... Should i completely change the code with some other alternative. If so, what is that alternative I posted this query on many forums including Excel.Programming and excelforum but with no success so far. Hope i get help here... Thanks for reading my query... Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 10
    - Adding Shortcuts to VSTO Word 2007 Add-in Hi, How do we add keyboard shortcuts to our add-in for Word 2007 In Excel we have done this using an Automation class and Application.OnKey(). In Word, there is not an OnKey available on the Application object. Also many references point to the Word Options, Customise, although this only seems to apply to native Word functonality not to add-ins. Any advice on this would be most welcome. Thanks. Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 11
    - Word 2007 don't read "OpenXMLEncryption" registry key Hi, I have written a com-ins which implement "EncryptionProvider" interface in Visual C++, and set registry key " HKEY_CURRENT_USER\ Software \Microsoft \Office \12.0 \ Common \Security \OpenXMLEncryption" . But Word 2007 don't load my add-ins. Thanks. Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 12
    - Problem with Keybindings Greetings, I'm starting the transition from VBA to VSTO and have run into a error that I cannot understand. I am trying to get the return key to run some code. Code Block Sub Add_ReturnKeyBinding() Dim applicationClass1 As New Word.ApplicationClass Dim returnValue As Object returnValue = applicationClass1.CustomizationContext applicationClass1.CustomizationContext = Globals.ThisDocument applicationClass1.KeyBindings.Add(KeyCode:=applicationClass1.BuildKeyCode(Word.WdKey.wdKeyReturn), _ KeyCategory:=Word.WdKeyCategory.wdKeyCategoryMacro, Command:= "myEnterKeyMacro" ) End Sub Though the template builds ok when I try to run it i get the following error message. "Microsoft Office Document Customization ", The customization assembly could not be found. I've searched for an explaination but there's nothing in my template that has anything remotely to do with the web or localization. Could anyone tell me whats wrong Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 13
    - Creating Word 2007 project Hi all, I'm creating a Word 2007 project but when I clicked New Project and selected Word Document it says "A compatible version of Microsoft Office Word 2003 is not installed on this computer. You must install Microsoft Office Word 2003 SP1 and the Visual Studio 2005 Tools for Office runtime (vstor.exe)..........." I have VS2005 and VSTO SE. Why is it asking for Word 2003 Thanks ------------------------- I found something. VSTO2005 is not uninstalled. I uninstalled it and now all office document or template projects are gone. There is only 2007 add-in and 2003 add-in. I reinstalled VSTO2005 SE but nothing happened. I need Word Template. How can I create Word Template project Thanks Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 14
    - Seeking opinions on the structure of a new VSTO book So, I am writing VSTO for Dummies. I wrote VB for Dummies, so it makes sense - VB type programmers will make really good use of VSTO I think. My initial concept for the book was three parts. Part 1: Concepts and design Part 2: Addins Part 3: Smart Documents In part two and three, I was planning on having a chapter on each Office platform that supports that feature. Well, now that I am writing I am not too sure about that format. It just seems to constricting, and that I will be repeating a lot of information in the first few pages of each chapter. It got me thinking - I don't really know how people are using VSTO. I mean, I know the generalities, but I don't know how the average user of the software - the kind that would reference a book - is deciding to use VSTO. Here then is the question. What would you look for in a book about VSTO They are going to pay me to write it, I suppose the least I could do is see what the readers would want to read. So what would you expect from a Dummies book about VSTO Replies here or email is fine. And thanks in advance - I'll give nods in the book to all good suggestions. S Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 15
    - Same Error Happen On a click of a button, excel report is generated. The xls is saved in the application folder on the same server. I have excel runtime files installed on it and there are no permissions issues. Yet, I'm getting this error: Error: System.Runtime.InteropServices.COMException (0x800A03EC): Exception from HRESULT: 0x800A03EC. at Microsoft.Office.Interop.Excel.WorkbookClass.SaveAs(Object Filename, Object FileFormat, Object Password, Object WriteResPassword, Object ReadOnlyRecommended, Object CreateBackup, XlSaveAsAccessMode AccessMode, Object ConflictResolution, Object AddToMru, Object TextCodepage, Object TextVisualLayout, Object Local, Object XlRobustSave) I'm using office11 (2003) assembly and asp.net1.1. The code is attached. Private Sub btnPurchasingReport_Click( ByVal sender As System.Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles btnPurchasingReport.Click Dim err_cnt As Integer Try Dim strCurrentDir As String = System.Configuration.ConfigurationSettings.AppSettings("DocPathDestination") RemoveFiles(strCurrentDir, ".xls") RemoveFiles(strCurrentDir, ".csv") err_cnt = 1 Dim oXL As Application Dim oWB As Workbook Dim oSheet As Worksheet Dim oRng As Range err_cnt = 2 GC.Collect() err_cnt = 3 oXL = New Application err_cnt = 4 oXL.Visible = False err_cnt = 5 oWB = CType ((oXL.Workbooks.Add(Missing.Value)), Workbook) err_cnt = 6 Dim lobjdtH As DataRow 'ListItem Dim lobjCat As New clsCategory Dim lobjDs As New System.Data.DataSet lobjCat.Select_Data_For_Report(lobjDs, Me .drpFlyerDate.SelectedValue) err_cnt = 4 'loop through the header For Each lobjdtH In lobjDs.Tables(0).Rows oSheet = CType (oWB.Worksheets.Add, Worksheet) oSheet.Name = Replace(lobjdtH("cat_name"), "/", " ") Dim lobjDR() As DataRow lobjDR = lobjDs.Tables(1).Select("std_cat_id=" & lobjdtH.Item("cat_id")) Dim i As Integer Dim DS As New DataSet DS.Clear() 'get number of rows and columns lobjCat.select_ROW_COL(DS, Me .drpFlyerDate.SelectedValue, lobjdtH.Item("cat_id")) Dim maxCol As Integer = DS.Tables(0).Rows(0).Item(0) 'number of columns Dim maxRow As Integer = DS.Tables(1).Rows(0).Item(0) 'number of rows 'generate the dynamic columns first Dim iCol As Integer = 0 'counter for columns Dim iRow As Integer = 0 'counter for rows in the spreadsheet Dim j As Integer = 0 'counter of rows in lobjDR Dim x As Integer = 0 iRow = 5 'start displaying data in 5th row on the sheet If maxRow > 0 And maxCol > 0 Then For x = 0 To maxRow - 1 For iCol = 0 To maxCol - 1 If iRow = 5 Then 'add title to row 1 oSheet.Cells(1, iCol + 1) = lobjDR(iCol).Item("item_characteristic") End If If StrComp( CType (lobjDR(iCol).Item("item_datatype"), String ), "Yes/No") = 0 Then If StrComp( CType (lobjDR(iCol).Item("shell_detail_value"), String ), "1") = 0 Then oSheet.Cells(iRow, iCol + 1) = "Yes" Else oSheet.Cells(iRow, iCol + 1) = "No" End If Else oSheet.Cells(iRow, iCol + 1) = lobjDR(j).Item("shell_detail_value") End If j = j + 1 Next iRow = iRow + 1 Next End If oSheet.Cells(3, 1) = Replace(lobjdtH("cat_name"), "/", " ") oSheet.Range("A3").Font.Size = 13 oSheet.Range("A3").Font.Bold = True 'add titles to other columns oSheet.Cells(1, maxCol + 1) = "Case Cost" 'input column oSheet.Cells(1, maxCol + 2) = "Grouping Code" 'input column oSheet.Cells(1, maxCol + 3) = "Item Code" 'input column oSheet.Cells(1, maxCol + 4) = "Pack Size" 'input column oSheet.Cells(1, maxCol + 5) = "Net Case Cost" 'formula column oSheet.Cells(1, maxCol + 6) = "Unit Cost" 'formula column oSheet.Cells(1, maxCol + 7) = "Margin %" 'formula column oSheet.Cells(1, maxCol + 8) = "Ongoing E.C." 'input column oSheet.Cells(1, maxCol + 9) = "WH E.C." 'input column oSheet.Cells(1, maxCol + 10) = "VDR E.C." 'input column oSheet.Cells(1, maxCol + 11) = "Reg Retail" 'input column 'add the formulas Dim colCaseCost As String = ColumnLetter(maxCol + 1) Dim colNetCaseCost As String = ColumnLetter(maxCol + 5) Dim colUnitCost As String = ColumnLetter(maxCol + 6) Dim colPackSize As String = ColumnLetter(maxCol + 4) Dim colOnEC As String = ColumnLetter(maxCol + 8) Dim colWHEC As String = ColumnLetter(maxCol + 9) Dim colVDREC As String = ColumnLetter(maxCol + 10) Dim colMargin As String = ColumnLetter(maxCol + 7) 'find the column with price Dim rngFound As Range = oSheet.Range("A1", "Z1").Find("Price", , , , , , False , , ) oSheet.Cells.WrapText = False Dim c As Long Dim colAdRetail As String If Not rngFound Is Nothing Then 'if column "price" is found c = rngFound.Column colAdRetail = ColumnLetter(c) 'price 'net case cost: case cost - (Ongoing EC + WH EC + VDR EC) * pack size oSheet.Range(colNetCaseCost & 5, colNetCaseCost & maxRow + 4).Formula = "=" & colCaseCost & "5-SUM(" & colOnEC & "5:" & colVDREC & "5)*" & colPackSize & "5" 'unit cost: net case cost / pack size oSheet.Range(colUnitCost & 5, colUnitCost & maxRow + 4).Formula = "=" & colNetCaseCost & "5/" & colPackSize & "5" 'margin: (add retail - unit cost) / ad retail oSheet.Range(colMargin & 5, colMargin & maxRow + 4).Formula = "=(" & colAdRetail & "5-" & colUnitCost & "5)/" & colAdRetail & "5" End If 'format the titles oRng = oSheet.Range("A1", "Z1") oRng.Font.Bold = True 'oRng.RowHeight = oSheet.Range("A1", "Z1").RowHeight * 2 oRng.Borders(XlBordersIndex.xlEdgeBottom).LineStyle = XlLineStyle.xlDouble oRng.Borders(XlBordersIndex.xlEdgeBottom).Weight = 2 oRng.VerticalAlignment = XlVAlign.xlVAlignCenter oRng.EntireColumn.AutoFit() Next 'save the workbook err_cnt = 5 Dim strFile As String = Replace(Replace( Me .lblTitle.Text, "/", "_"), " ", "_") & ".xls" oWB.SaveAs(strCurrentDir + strFile, XlFileFormat.xlWorkbookNormal, System.Reflection.Missing.Value, System.Reflection.Missing.Value, False , False , XlSaveAsAccessMode.xlShared, False , False , System.Reflection.Missing.Value, System.Reflection.Missing.Value, System.Reflection.Missing.Value) oWB.Close( Nothing , Nothing , Nothing ) oXL.Visible = False oXL.UserControl = False 'clean up oXL.Workbooks.Close() oXL.Quit() err_cnt = 6 System.Runtime.InteropServices.Marshal.ReleaseComObject(oRng) System.Runtime.InteropServices.Marshal.ReleaseComObject(oXL) System.Runtime.InteropServices.Marshal.ReleaseComObject(oSheet) System.Runtime.InteropServices.Marshal.ReleaseComObject(oWB) oSheet = Nothing oWB = Nothing oXL = Nothing GC.Collect() KillProcess("EXCEL") ProcessPostedFile(strFile) Catch theException As Exception Dim errorMessage As String errorMessage = "Error: " errorMessage = String .Concat(errorMessage, theException.ToString) errorMessage = String .Concat(errorMessage, " Line: ") errorMessage = String .Concat(errorMessage, theException.Source) errorMessage = String .Concat(errorMessage, " StackTrace: " & theException.StackTrace.ToString) errorMessage = String .Concat(errorMessage, " " & err_cnt) Response.Write(errorMessage) End Try End Sub Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office
  - 16
    - Excel project with VSTO I have Visual studio professional, VSTO, office 2003, info path 2007 installed. I would like to have Excel template inside visual studio (as step 4) .What else should I do Thanks all for your help . Need ASAP Step 1: Create the VSTO Project in Visual Studio 1. Open Visual Studio 2005 Beta 2 2. Select File > New > Project to display the New Project dialog box 3. Under Project Types, select Visual Basic > Office 4. Select Excel Application from the Templates options from artical below http://www.devx.com/MicrosoftISV/Article/28036 type=kbSampleProd&trk=MSCP#codeitemarea Tag: Visual Studio Tools for Office Programming Comments in Excel 2003 Office

Brando15

Hello,

I am programming a userform to input and edit records in a spreadsheet. I have a couple of textboxes in the form that I am using to add comment boxes to certain cells. I am trying to find a way to set the comment boxes format to automatic size within the userform's code. This way long comments will be entirely visible when the mouse hovers over the comment.

Any help or suggestions would be very helpful.

Thanks,

-Brando

Top

Re: Visual Studio Tools for Office Programming Comments in Excel 2003

Ji Zhou �C MSFT

Hi Brando,

I manage it by set the height of Comment��s Shape according to the length of your string. The following is my codes, and it works fine on my machine. Wish it can help you. If you are not clear about anything in these codes, please feel free to let me know. J

Code Snippet

Excel.Worksheet ws = this.Application.ActiveSheet as Excel.Worksheet;

Excel.Range range = ws.Cells[1, 1] as Excel.Range;

String s = "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaalong string";

Excel.Comment comment = range.AddComment(s);

Excel.Shape shape = (Excel.Shape)comment.Shape;

int i = s.Length / 17 + 1; //By default, there's 17 character in each line of a comment

shape.Height = 4 + 10*i; //4 is the height above your comment, and 10 is the height of each line

Thanks

Top