Consulting

Results 1 to 2 of 2

Thread: FUNCRES.XLAM? Why is this file in my VB Editor?

  1. #1

    FUNCRES.XLAM? Why is this file in my VB Editor?

    I don't understand what this is, and I don't know how to remove it. Can someone tell me what this file is??

    Thanks

  2. #2
    Distinguished Lord of VBAX VBAX Grand Master Bob Phillips's Avatar
    Joined
    Apr 2005
    Posts
    25,453
    Location
    It is there to support the Analysis toolpak in Excel 2007. In previous versions, ATP was an addin, but in 2007, most of the functions are built in. Data Analysis is not, and this file creates a group called Analysis on the Data tab, which calls this code

    [vba]

    'Entry point for RibbonX button click
    Sub ShowATPDialog(control As IRibbonControl)
    Application.Run ("fDialog")
    End Sub
    [/vba]

    If you lopok at the file's XML, you will see

    <?xml version="1.0" encoding="UTF-8" standalone="yes"?>
    <customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" xmlns:excelAddin="http://schemas.microsoft.com/office/2006/excel/addins">
        <ribbon>
            <tabs>
                <tab idMso="TabData">
                    <group idQ="excelAddin:groupExcelAddins" label="Analysis" insertAfterMso="GroupOutline">
                        <button id="btnATPDialog" insertBeforeQ="excelAddin:spacer" getLabel="funcres.xlam!GetATPLabel" image="rId1" onAction="funcres.xlam!ShowATPDialog" size="normal" screentip="Data Analysis Tools" supertip="Tools for financial and scientific data analysis."/>
                    </group>
                </tab>
            </tabs>
        </ribbon>
    </customUI>
    As you can see, as well as calling the ShowATPDialog callback, it calls the GetATPLabel callback to assign a label, which it gets from a worksheet in the addin file

    [vba]

    'Callback for RibbonX button label
    Sub GetATPLabel(control As IRibbonControl, ByRef label)
    label = ThisWorkbook.Sheets("RES").Range("A10").Value
    End Sub[/vba]

    I would leave it alone, it comes with Excel.
    ____________________________________________
    Nihil simul inventum est et perfectum

    Abusus non tollit usum

    Last night I dreamed of a small consolation enjoyed only by the blind: Nobody knows the trouble I've not seen!
    James Thurber

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •