wsCopy.Range("B4").Copy wsDest.Range("B" & Rows.Count).End(xlUp)(1,0)
从一个工作表复制并粘贴到另一工作表中的另一个工作表
wsCopy.Range(“ B4”)。CopywsDest.Range(“ B”&Rows.Count).End(xlUp).Offset(1,0).PasteSpecial
简单修复