Question

我的任务是弄明白这一点。我之前和之后都没有看到这种类型的语言/公式这些公式我似乎无法找到关于每个函数的具体定义。这本工作簿有3张;查询表，数据表和Macro1，这是在Macro1上显示的。

最好找到一个API，帮助或其他东西来解决这个问题。

Cmd ExtractData (a)
    =DEFINE.NAME("Criteria",'Query Sheet'!P1:W2)
    =DEFINE.NAME("Extract",'Query Sheet'!$A$7:$N$7)
    =DEFINE.NAME("Database",'Data Sheet'!Database)
    =EXTRACT(FALSE)
    =IF(ISBLANK(!A8))
    =  SELECT("r8c1")
    =  FORMULA("No Match Found")
    =ELSE()
    =  SELECT("r7c1")
    =  SELECT.END(4)
    =  ROW(ACTIVE.CELL())
    =  FORMULA.FILL("=Serr_(RC[-9],RC[-8],RC[-7],RC[-6],RC[-3],RC[-2],RC[-1])","R8C14:R"&TEXT(B13,0)&"C14")
    =  SELECT("R8C1:R"&TEXT(B13,0)&"C14")
    =  IF(mSTB="U")
    =    SORT(1,"R8C9",2,"R8C14",1)
    =  ELSE.IF(mSTB="S")
    =    SORT(1,"R8C9",1,"R8C14",1)
    =  ELSE()
    =    SORT(1,"R8C14",1)
    =  END.IF()
    =  SELECT("R8C1")
    =END.IF()
    =RETURN()

Fctn    SErr_
    =RESULT(1)
    =ARGUMENT("Acet",1)
    =ARGUMENT("Agar",1)
    =ARGUMENT("PH9",1)
    =ARGUMENT("PH6",1)
    =ARGUMENT("IEF",1)
    =ARGUMENT("Short",1)
    =ARGUMENT("Long",1)
    =VarM_(!mAcet,Acet)
    =VarM_(!mAgar,Agar)
    =VarM_(!mPH9,PH9)
    =VarM_(!mPH6,PH6)
    =VarM_(!mIEF,IEF)
    =VarM_(!mShort,Short)
    =VarM_(!mLong,Long)
    =RETURN(SUMSQ(B36:B42))


Fctn    VarM_
    =RESULT(1)
    =ARGUMENT("mNT",3)
    =ARGUMENT("sN",1)
    =IF(OR(ISTEXT(mNT),sN= -99),RETURN(0), RETURN(mNT-sN))

谢谢

Answer 1

这被称为＆＃34; V4宏＆＃34;在Excel中。他们将重新回到Excel V4（Excel 2010是V14）并且他们已经弃用但仍然可以运行（我认为）。

这些V4宏在此处有一个旧的帮助文件：http://support.microsoft.com/kb/128185

您可以下载并安装该文件，但结果是WinHelp文件，该文件也很陈旧，不再适用于Windows中的开箱即用。如果你能让WinHelp读者工作，你应该能够用它来弄清楚这里发生了什么。（MS表示他们可以通过Windows 8下载WinHelp阅读器，但我无法让Windows 7版本适用于我）。

那就是说，我觉得这里使用的大多数命令都是：

DEFINE.NAME(name,range)    Defined a Named Range
EXTRACT(False)             Probably writes FALSE to the "Extract" named range
IF(..), ELSE()             Implements an "If..Then..Else.."
SELECT(range)              Selects the cell or range indicated
SELECT.END(4)              Selects to the end of something (row, column or sheet?)
FORMULA(string)            Write the string to the selection as it's formula
FORMULA.FILL("<<formula>>",range)
                           Autofills the formula to the range.  Uses R1C1 addressing.
SORT(..)                   Probably invokes the Excel Data Sort
RETURN()                   Ends the Command and returns
RETURN(expression)         Ends the function and returns the value of the expression

ARGUMENT("name",number)    Assigns names to the functions parameters in order.
                           (no idea what the number does here)

几乎所有其他东西都是EXCEL公式函数，所以你仍然可以查找它们。

如何对（已弃用的）Excel V4宏进行反向工程？

1 个答案: