选择要在所有页面上搜索的图层

时间:2016-01-02 09:33:19

标签: vba coreldraw

这是我正在使用的代码的一部分;

$(document).ready(function() {
var month = (new Date()).getMonth();
if (month < 2 || month === 11) {
    $("#block").css("background-color", "#1D30C4");
}
else {
    $("#block").css("background-color", "#C41D2C");
}

我正在使用的代码要长得多,但我相信这是相关部分。

它在页面上搜索我的文本(Sample1),然后显示并打印名为&#34; Sample&#34;的图层。

我认为因为我有一个荒谬的需要的层数,它需要永远运行

所以,我试图让它只在每个名为&#34; Style&#34;但我似乎无法弄明白。

提前谢谢。

如果需要更多信息,请告诉我

1 个答案:

答案 0 :(得分:0)

要测试对象“S”是什么层,请使用

 if S.Layer.Name="Style" then

然后

If InStr(1, s.Text.Story, WhatSamp) > 0 Then
 ActivePage.Layers("Sample").Visible = True
 ActivePage.Layers("Sample").Printable = True