我的办公软件是WPS，恳求老师帮忙写一个打印工作表的代码，谢谢老师

kouxuyao

具体要求：A 工作表 引用[接收数据]工作表 A1单元格后 显示【全身麻醉】时，点击打印按钮打印工作表 A  B  C  D
E  F  H  .要是A 工作表 引用[接收数据]工作表显示【腰硬联合麻醉】或其他麻醉方式时，点击打印按钮打印工作表 A  B  C  D  E 这几张工作表内容




希望老师们帮帮忙
详细看附件

xd3210

function printtest(){
        let arr=['A','B','C','D','E','F','H'];
        let iend=Sheets("A").Range("d1").Formula=="全身麻醉"?6:4;
        for(let i=0;i<=iend;i++){
                Sheets.Item(arr[i]).PrintOut()
        }
       
}

kouxuyao

xd3210 发表于 2024-8-22 08:32
function printtest(){
        let arr=['A','B','C','D','E','F','H'];
        let iend=Sheets("A").Range("d1").Fo ...

老师：为什么就打出来两页内容？我是把代码复制后关联了  打印 按钮，是我的哪一步不正确吗？

xd3210

kouxuyao 发表于 2024-8-22 12:08
老师：为什么就打出来两页内容？我是把代码复制后关联了  打印 按钮，是我的哪一步不正确吗？

是不是其他表格没有内容？

kouxuyao

xd3210 发表于 2024-8-22 14:41
是不是其他表格没有内容？

是的，其他表格都是空表格，我是拿我发的附件试的

xd3210

kouxuyao 发表于 2024-8-22 16:50
是的，其他表格都是空表格，我是拿我发的附件试的

有内容才会打印输出

kouxuyao

xd3210 发表于 2024-8-22 14:41
是不是其他表格没有内容？

老师你好：这次打印出6张工作表，但是不管选择全身麻醉还是其他麻醉都是6张

xd3210

function printtest(){
        console.clear()
        let arr=['A','B','C','D','E','F','H'];
        let iend=Sheets("A").Range("d1").Formula=="全身麻醉"?6:4;
        for(let i=0;i<=iend;i++){
                Console.log(arr[i]);
                Sheets.Item(arr[i]).PrintOut()
        }
       
}
你查看下立即窗口的输出信息

xd3210

打印了几页不代表打印了几个工作表

kouxuyao

xd3210 发表于 2024-8-22 18:47
function printtest(){
        console.clear()
        let arr=['A','B','C','D','E','F','H'];

老师：不管是全身麻醉还是其他麻醉方式即时窗口都是打印A B C D E