表格插批的內容如何匯出來?使用者35136839745620442020-02-24 10:11:26

Sub DaoChuPiZhun()Dim cm As Comment For Each cm In ActiveSheet。Comments [a65535]。End(xlUp)。Offset(1, 0) = cm。Text Next cm End Sub匯出當前工作表的批准,並放在當前工作表的A列