function tt()
{
const r = Range(`A${Rows.Count}`).End(xlUp).Row
for (let i = r; i > 1; i--) {
const t = Range(`A${i}:K${i}`)
const n = t.Value2.flat().at(-1)
if (n === 1) continue
t.Copy()
Range(`A${i + 1}:K${i + n - 1}`).Insert()
}
}
做好备份，然后试试
大概意思是，从最后一行开始到第二行，每行复制n-1次，包括样式，插入到当前行后面
创作者俱乐部成员