请教老师能不能解决这个问题

kouxuyao

function Macro2()
{

        let arr=["麻醉记录单","手术室术前 术后护理访视记录","麻醉前访视","麻醉后随访","新麻醉知情同意书","麻醉镇静","药品清单"];
       let s=Sheets("麻醉记录单").Range("$Y$3").Formula; let endnumber=s=="全身麻醉"?7:5; Application.EnableEvents=false; for(let i=0;i<endnumber;i++)
    Sheets.Item(arr[i]).PrintOut(1, 2147483647, 1, false, "Lenovo LJ2400 Pro", false, false, undefined, false);
    Application.EnableEvents =true;

这段代码也是请教老师给出的，我的想法是让"麻醉记录单","手术室术前 术后护理访视记录","麻醉前访视","麻醉后随访","新麻醉知情同意书","麻醉镇静","药品清单"这 七 张工作表在麻醉记录单的   Y3  单元格显示  全身麻醉  的时候全打这 七 张表，在  Y3 单元格显示其他麻醉方式的时候就打印"麻醉记录单","手术室术前 术后护理访视记录","麻醉前访视","麻醉后随访","新麻醉知情同意书"这 五 张表格，但是麻醉方式是公式生成引用过来的，在  Y3  单元格显示的是   全身麻醉   但是实际是单元格引用的一个公式，但是每次只打印 五 张表，请教老师有没有办法解决

xd3210

连着几个但是，有点懵，建议上传附件，帮助理解

kouxuyao

xd3210 发表于 2024-5-14 11:40
连着几个但是，有点懵，建议上传附件，帮助理解

我的工作薄有六张工作表，分别是；A，B，C，D，E，F，G 七张工作表，在A表W3单元格选择：全身麻醉 时七张工作表全部打印，W3单元格选择其他麻醉方式时就打印A，B，C，D，E 五张工作表这个代码怎么写？盼老师们指导下但是A表w单元格的麻醉方式是函数引用生成的

xd3210

kouxuyao 发表于 2024-5-15 00:14
我的工作薄有六张工作表，分别是；A，B，C，D，E，F，G 七张工作表，在A表W3单元格选择：全身麻醉 时七张 ...

function printtest(){
        let arr=["A","B","C","D","E","F","G"];
        let smode=Worksheets("资产").Range("w3").Formula;
        let imode=smode=="全身麻醉"?6:4;
        Application.EnableEvents=false;
        for(let i=0;i<imode;i++){
                Worksheets(arr).PrintOut();
        }
        Application.EnableEvents=true;
        
}

LIUZHU

这个应该就是放在sheet_change事件里面的