Microsoft Office 2007 Pro Keygen Sam Radakovitz on

[shishang82]

Today’s author: Sam Radakovitz, a program manager on the Excel team that enjoys creating VBA applications in Excel. I went to create my first Excel 2007 Ribbon application, I found it a bit difficult to get the right RibbonX and VBA functions setup correctly. I wasn’t quite sure on the RibbonX attributes … and I wasn’t sure on the arguments to the VBA functions or when the ribbon would call them. I kept thinking if I would have had a sample Excel workbook to reference I’d probably pick things up a bit easier. was a while ago, since then there has been a lot of documentation with sample code added to the MSDN and Office websites. Its good documentation and will help folks on building their RibbonX applications, but I wanted to create an article with a bunch of links to the appropriate RibbonX documentation and has a sample Excel workbook to go along with it. blog post will demonstrate how to place dynamic images of charts into a ribbon ############## via RibbonX and VBA in Excel. We will be creating two ##################, one with small images of the charts with labels and one with large images: ############## ############## sample document with the finished RibbonX and VBA code is here:

THE RIBBONX start off with the RibbonX code. If you aren’t familiar with RibbonX, the short explanation is that it’s the XML that defines what the Ribbon will look like. Specifically for us, the RibbonX will define where we want to put our two ##################, the ############## buttons, and the items in the ##############. For more detailed information on RibbonX, see these links: Fluent Ribbon Developer Portal
and Utilities for the 2007 Microsoft Office System
RibbonX we will create will live in the document and travel with it. We will have to use a tool to get the RibbonX in the document. The one I’ll use for this example is called the “Office 2007 Custom UI Editor”. You can download it freely from here: you download and install the tool, boot it up and open the “charts_in_ribbon.xlsm” document that accompanies this blog entry. You should see: tool found the existing RibbonX in the document and loaded it. If you were to create a new document and open it, you wouldn’t see any existing RibbonX stored in the document. following sections highlight the important points about this Ribbon XML: the ##################, instead of explicitly calling out the items that will be in the ##############, we’ve told the ribbon to call our VBA functions to get things like: the count of items in the ##############, the label for the item, and the tooltip that will be displayed when hovering over an item. from the RibbonX: getItemCount=”GetItemCount”
red getItemCount is the RibbonX attribute that tells the ribbon to call a VBA function to get the count of items, and the blue GetItemCount is the name of the VBA function to call. If you wanted to specify a static item count,Office Professional 2010 Key, you could use: ItemCount=”4” Object the customUI tag will allow our VBA code to get a handle on the ribbon object which will allow us to ‘invalidate’ the ribbon. Invalidating the ribbon will force the ribbon to call our ############## routines (the callbacks) the next time the user enters the ##############, giving us a way to update the items and images in the ##############. I will cover how to invalidate the ribbon in the VBA section. of the ################## this example, we’re creating a new group on the home tab: idMso=”TabHome”. Because we didn’t specify an “insertbefore” property, it will stick our new buttons at the right end of the home tab. If you’re wondering how to get the names of the existing tabs (TabHome), there is a document that has a list of all the existing ribbon control ids available for download at this link: Office System Document: Lists of Control IDs
on the ############## buttons selected an existing ribbon icon for our ############## button images:
is defined by imageMso=”ChartPlacement”. You could have a different icon for each, or load your own icon through either a callback or through defining an image property. If you’re wondering how to get the existing ribbon icon names, there is another document you can download that has a list of them: Office System Add-In: Icons ##############
############## vs. Large ############## of the ################## have the same callbacks to the code, since their count of items and chart pictures will be the same. The difference between them is in the RibbonX: the small ##############, the itemWidth and itemHeight properties are set to be much smaller than the large ##############.
o The small ############## has an additional callback defined for the label to each chart in the ##############. Since the charts are smaller there,Windows 7 Home Premium X86, adding a label can help folks identify the chart.
o There are fewer columns for the smaller ##############, but more rows. I’ve set the smaller ############## to a single column to help create a visual difference between the smaller ############## and the larger one for this example. a complete list of attributes and properties for RibbonX, see this link: the 2007 Office Fluent Ribbon for Developers (Part 2 of 3)
CODE this section, I’ll walk through each routine and describe what is going on.
oRibbon object is the Ribbon, and it’s what we will use to invalidate the Ribbon so we can force the ################## to be refreshed. oRibbon As IRibbonUI

next sub is called when the ribbon loads our RibbonX and it passes us the Ribbon object, as far as I know it’s the only way to get the Ribbon object. The code sets the public ribbon object for later use. Sub ribbonLoaded(Ribbon As IRibbonUI) Set oRibbon = Ribbon Sub is called when the user is clicking on the ############## and the ribbon needs to figure out what it should show. Since we defined this callback in the RibbonX,Windows 7 Starter 32 bits, its calls us as asks how many items there should be in this ##############. special note on the “OnTime” method, for this example this is how the ribbon is getting “invalidated”. By default, the ribbon will call all your callbacks once to get the items and images and cache the values till you say they are invalid. What I’m doing here is making the images stale each time the user clicks on the ##############. There are smoother ways of doing this like trapping for changes in the charts and ranges they are bound to, but for this example we’ll keep it simple. getItemCount(control As IRibbonControl, ByRef count) count = ActiveSheet.ChartObjects.count Application.OnTime DateAdd("s", 1, Now), "InvalidateRibbon" Sub

next routine is called for each item in the ############## and will set the image displayed in the ############## for that item. In this example, we want all of our chart images there, so as the Ribbon calls us with an index, we just tell the chart of that index to spit out an image, and then tell the ribbon to use that image. getItemImage(control As IRibbonControl,Microsoft Office 2007 Pro Keygen, index As Integer, ByRef image) ActiveSheet.ChartObjects(index + 1).Chart.Export ThisWorkbook.Path & "\Chart_" & index + 1 & ".jpg", "jpg" image = LoadPicture(ThisWorkbook.Path & "\chart_" & index + 1 & ".jpg") Sub

“getItemID” routine is called by the ribbon to get an id for the ############## item. Since we don’t use it in this example, it doesn’t really matter what we set it to. getItemID(control As IRibbonControl,Office Professional 2007 Activation clave, index As Integer, ByRef id) id = "Chart_" & index Sub

next callback defines the tooltip, or super tooltip I should say, for each ############## item. In this example, the tooltip is the series name and formula to give the user an idea of what is there and where it is coming from. Not super helpful, but interesting. getItemSupertip(control As IRibbonControl, index As Integer, ByRef supertip) Dim oSeries As Series Dim sTooltip As String Each oSeries In ActiveSheet.ChartObjects(index + 1).Chart.SeriesCollection sTooltip = sTooltip & vbCrLf & oSeries.Name & vbCrLf & oSeries.Formula & vbCrLf Next oSeries = sTooltip Sub

“getItemLabel” callback is only called by the small ##############, as defined by the RibbonX, and it will set the label for the ############## item. In this example the chart title is being used as the label, if one isn’t present, it falls back to the chart name. getItemLabel(control As IRibbonControl, index As Integer, ByRef label) If ActiveSheet.ChartObjects(index + 1).Chart.HasTitle Then label = ActiveSheet.ChartObjects(index + 1).Chart.ChartTitle.Caption Else label = ActiveSheet.ChartObjects(index + 1).Name End If Sub

next routine is called after a user clicks on a ############## item. For this example, the user is clicking on a chart, so the code scrolls the chart into view and activates it. galRefreshAction(control As IRibbonControl, selectedId As String, selectedIndex As Integer) ActiveWindow.ScrollIntoView ActiveSheet.ChartObjects(selectedIndex + 1).Left, ActiveSheet.ChartObjects(selectedIndex + 1).Top, ActiveSheet.ChartObjects(selectedIndex + 1).Width, ActiveSheet.ChartObjects(selectedIndex + 1).Height ActiveSheet.ChartObjects(selectedIndex + 1).Activate Sub you’re wondering how to define the routines, like how many arguments your routine should have for each callback and what they are, there is a document that has a list of them here: the 2007 Office Fluent Ribbon for Developers (Part 3 of 3)
Finished Product defining the RibbonX and VBA code, opening up the document will display our two new ##################, and dropping down each will display the most recent images of the charts on your sheet, and clicking a chart in the ############## will take you to it. to be made
This example is quick and small to show folks how to get started and to try and not over complicate things. So that leaves plenty of room for improvements: this an Add-in
Currently this example is just a workbook. With a little work, making this an add-in would allow you to use it with all your workbooks. Charts
Right now the example loops through the active sheet’s charts. You could easily see how this would be nicer by displaying the charts in the entire workbook, or in all the opened workbooks even. Scaling
The large size I chose fits well for this example, but charts come in all sizes, and can cause the ############## to appear pretty goofy. Some VBA code to scale the image size and add white space where needed would help out here. Caching of Chart images
As I mention above, this example throws out all the images and recreates them every time the ############## is dropped down. Adding some code to detect changes and only toss out some chart images when needed would be a nice performance and efficiency gain. Checking :-)
I left all the error checking out just to get to the meat of the code. are probably other improvements to be had that aren’t coming to my mind as well, post them here, along with any other changes or ideas you think are cool :-)
<div