小编Cke*_*ane的帖子

我在Excel中有一个Validated Dropdown列表,如果缩放小于100则无法读取.我在互联网上检查并确认我无法改变验证列表文本大小的大小,所以我想强制设置100的缩放.

我有这样的代码,如下所示

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    ActiveWindow.Zoom = 100
End Sub

这适用于使用缩放小于100的人,但如果人们使用大于100的缩放,它会将缩放限制为100.有没有办法克服这个问题,这与If-Else语句一致.

如果缩放小于100则缩放= 100否则如果缩放大于100则不执行任何操作

谢谢.

我在代码末尾有以下代码将SAS数据导出到Excel文件.RepDate在代码开头设置如下:

%let RepDate = &SYSDATE9; 

日期工作正常,但是当我使用以下代码导出数据时:

PROC EXPORT DATA=MYData         
OUTFILE="C:\Documents and settings\Documents\myFile &RepDate.XLS"     DBMS=EXCEL2000 REPLACE;
RUN;

日期输入文件名okay,但XLS被添加到文件名.缺少文件扩展名的点,文件名变为:

myFile02APR2012XLS

这不是我的预期,我期望文件名如下:myFile02Apr2012,其中.XLS作为文件扩展名.有没有办法来解决这个问题？

我试图从表中提取数据以涵盖最后一个日历月.该报告可以在下个月的任何一天提取.我使用以下代码:

CURRENT DATE - 31 DAYS - DAYOFWEEK_ISO(CURRENT DATE) DAYS)

但是,它从当前月份中提取信息等...是否有变量或某些东西确保只返回最后一个monts数据？

谢谢.

这是我的一个工作伙伴这样做的方式:

CURRENT DATE - DAY(CURRENT DATE) DAYS + 1 DAY - 1 MONTH 
AND CURRENT DATE - DAY(CURRENT DATE) DAYS 

我有以下代码:

%let host = HostThatSendsEmail;
%let todayDate = &SYSDATE9;
signon host;
rsubmit;


filename mail email to =    ("PersonGettingEmail")
        from=   "PersonSendingEmail"
        SUBJECT="Today is &todayDate";

data _null_;
    file mail;
    put 'Dear All';
    put 'Today is &todayDate';
run;

endrsubmit;

运行代码时,宏日期不会输入到电子邮件中.生成的电子邮件应为:

亲爱的所有今天是29Mar12.

取而代之的是:

亲爱的所有今天是今天的日子

我缺少一些代码吗？