wps js宏 入库单

### WPS JS 宏实现入库单功能

在WPS表格中使用JavaScript (JS)宏来创建和管理入库单可以极大地提高工作效率。下面是一个简单的例子，展示如何通过编写JS宏来自动生成入库单。

#### 创建一个新的工作表用于存储数据

// 打开新的工作簿并获取活动的工作表对象
var workbook = Application.Workbooks.Add();
var worksheet = workbook.ActiveSheet;
worksheet.Name = "入库单";

#### 设置列标题

// 设定每一列表头名称
worksheet.Cells(1, 1).Value = "编号";      // A1单元格输入“编号”
worksheet.Cells(1, 2).Value = "物品名";    // B1单元格输入“物品名”
worksheet.Cells(1, 3).Value = "数量";      // C1单元格输入“数量”
worksheet.Cells(1, 4).Value = "单价";      // D1单元格输入“单价”
worksheet.Cells(1, 5).Value = "总金额";    // E1单元格输入“总金额”

// 对表头应用样式
for(var i=1; i<=5; ++i){
    var cell = worksheet.Cells(1,i);
    cell.Font.Bold = true;                 // 加粗字体
}

#### 添加一些示例条目到库存记录里

function addEntry(id, name, quantity, pricePerUnit){
    let row = findNextEmptyRow(worksheet); // 寻找下一个空白行
    
    worksheet.Cells(row, 1).Value = id;            // 编号
    worksheet.Cells(row, 2).Value = name;          // 物品名
    worksheet.Cells(row, 3).Value = quantity;      // 数量
    worksheet.Cells(row, 4).Value = pricePerUnit;  // 单价
    worksheet.Cells(row, 5).Formula = "=C"+row+"*D"+row; // 总金额计算公式
}

addEntry('001', '笔记本电脑', 10, 5999.99);
addEntry('002', '打印机', 5, 1299.00);

#### 查找可用的新行位置函数定义

function findNextEmptyRow(ws){
    return ws.Cells(ws.Rows.Count, 1).End(-4162).Offset(1, 0).Row; //-4162代表xlUp常数，在此表示向上寻找最后一个非空单元格
}

以上代码片段展示了基本的框架结构以及如何利用循环语句批量插入多条记录。为了使这个过程更加自动化，还可以进一步扩展这些脚本的功能，比如读取外部CSV文件中的数据自动填充入库单，或是增加验证逻辑防止重复录入相同的商品信息等[^1]。