无需VBA实现Excel数组二维平铺的公式求问

需求说明 #

给定布尔数组A = [[1,0],[0,1]]和目标数组B = [[1,2],[3,4]]，需生成一个展开后的二维数组：当A中元素为1时，对应位置平铺完整的B数组；当A中元素为0时，对应位置平铺全0数组，最终输出结果为：

[[1, 2, 0, 0],
 [3, 4, 0, 0],
 [0, 0, 1, 2],
 [0, 0, 3, 4]]

原公式问题分析 #

你尝试的=IF(MUNIT(2), {1, 2;3, 4}, {0, 0;0, 0})无法实现需求，原因是：

• MUNIT生成的单位矩阵仅做元素级判断，没有将B作为整块数组映射到对应位置
• IF函数的数组运算逻辑是元素级替换，而非块级的平铺扩展

解决方案（Excel 365/2021 动态数组版本） #

使用LET函数定义变量简化逻辑，通过生成行列映射矩阵实现块级平铺：

=LET(
    A, [[1,0],[0,1]],
    B, [[1,2],[3,4]],
    rowsA, ROWS(A),
    colsA, COLUMNS(A),
    rowsB, ROWS(B),
    colsB, COLUMNS(B),
    // 生成结果数组中每个元素对应B的行位置
    rowMap, MOD(SEQUENCE(rowsA*rowsB,,0), rowsB)+1,
    // 生成结果数组中每个元素对应B的列位置
    colMap, MOD(SEQUENCE(colsA*colsB,,0), colsB)+1,
    // 将A的每个元素平铺为对应大小的块矩阵
    AMatrix, INDEX(A, INT((SEQUENCE(rowsA*rowsB,,0))/rowsB)+1, INT((SEQUENCE(colsA*colsB,,0))/colsB)+1),
    // 计算最终结果：A块为1时取B对应元素，否则为0
    result, INDEX(B, rowMap, colMap)*AMatrix,
    // 将一维结果重塑为二维数组
    WRAPROWS(result, colsA*colsB)
)

公式拆解 #

1. 变量定义：用rowsA/colsA、rowsB/colsB获取两个数组的行列数，避免硬编码
2. 行列映射：rowMap和colMap实现B数组的重复平铺，确保结果数组每个位置能对应到B的具体元素
3. A数组块扩展：AMatrix把A的单个元素扩展成和B同大小的块，实现块级的布尔判断
4. 结果计算：通过INDEX(B, rowMap, colMap)*AMatrix完成元素级的取值/置0，最后用WRAPROWS转成二维数组

旧版Excel兼容方案（需按Ctrl+Shift+Enter输入数组公式） #

如果使用不支持动态数组的Excel版本，可直接针对2x2的A和B写数组公式，选中4x4的单元格区域后输入：

=INDEX(B,MOD(ROW(1:4)-1,2)+1,MOD(COLUMN(1:4)-1,2)+1)*INDEX(A,INT((ROW(1:4)-1)/2)+1,INT((COLUMN(1:4)-1)/2)+1)

内容的提问来源于stack exchange，提问作者AReubens