Question

我正在尝试编写一个SAS程序，通过DDE在excel文件中进行查找和替换。具体来说，我试图在标题行中搜索字符串之间的空格（即“”），并用空格（即“”）替换它们。

例如，如果我有一个包含“Test Name”的单元格，我想进行查找和替换，使其成为“TestName”。

这就是我所拥有的：

options noxwait noxsync;

/* Open Excel */
x '"C:\Program Files (x86)\Microsoft Office\Office14\excel.exe"';
filename cmds dde 'excel|system';
data _null_;
    x=sleep(5);
run;

/* Open File and Manipulate*/
data _null_; 
    file cmds; 
    put '[open("C:\filename.xls")]'; 
    put '[select("R1")]';
    put '[formula.replace(" ","",1,,false,false)]'; 
run;

/*Close File*/
data _null_;
    file cmds;
    put '[FILE-CLOSE("C:\filename.xls")]';
    put '[QUIT()]';
run;

查找和替换功能无效。我在阅读该声明后的日志中得到以下内容：

NOTE: The file CMDS is:
    DDE Session,
    SESSION=excel|system,RECFM=V,LRECL=256

ERROR: DDE session not ready.
FATAL: Unrecoverable I/O error detected in the execution of the DATA step program.  
    Aborted during the EXECUTION phase.
NOTE: 2 records were written to the file CMDS.
    The minimum record length was 21.
    The maximum record length was 70.
NOTE: The SAS System stopped processing this step because of errors.
NOTE: DATA statement used (Total process time):
    real time           0.63 seconds
    cpu time            0.00 seconds

有什么建议吗？

另外，有没有人知道formula.replace语句中的参数是什么？我只知道第一个和第二个是您想要找到的以及您要用它替换它的内容。我很难找到任何文件。

Answer 1

http://www.lexjansen.com/wuss/2007/ApplicationsDevelopment/APP_SmithC_ImportingExcelFiles.pdf

如果输入的路径或文件名不正确，Excel将无法打开您的工作簿。您将在SAS日志中收到如下所示的错误消息：

NOTE: The file DDECMD is:
      DDE Session,
      SESSION=excel|system,RECFM=V,LRECL=256
ERROR: DDE session not ready.
FATAL: Unrecoverable I/O error detected in the execution of the data step program.
       Aborted during the EXECUTION phase.
NOTE: 0 records were written to the file DDECMD.
NOTE: The SAS System stopped processing this step because of errors.

Answer 2

我的建议是编写一个excel（VBA）宏来执行此操作，然后调用该宏;这不仅为您提供了更好的IDE来编写代码，获得上下文线索等，而且还为您提供了更多的控制。您可以从单独的工作簿中调用宏，因此即使这是您必须重复执行的操作（我假设如此），您也可以将其放在一个与自动文件分开打开的“宏”模板工作簿中。

SAS - 通过DDE在Excel文件中执行查找和替换

2 个答案: