EXCEL中用VBA復制整行？你好，我是[thnen]，很高興為你回答。假設表1中的數(shù)據(jù)可以通過A:H列中的函數(shù)輸入到表2的B1中，公式如下：右拉公式（A1輸入序號）=vlookup（$A1，Shee

EXCEL中用VBA復制整行？

你好，我是[thnen]，很高興為你回答。假設表1中的數(shù)據(jù)可以通過A:H列中的函數(shù)輸入到表2的B1中，公式如下：右拉公式（A1輸入序號）=vlookup（$A1，Sheet1！$a:$h，column（），0）。如果使用VBA，無論表1中的數(shù)據(jù)有多少列，都將復制整行。代碼如下：private sub sheetworkuuchange（ByVal Target as Range）If目標.列=1和目標。計數(shù)=1，然后使用表（“sheet1”）表示x=1到.Range（“A65536”）.End（xlUp）.Row If.Cells（x，1）=目標值然后。行（x）。復制目標。行出口接頭End If Next x End With End IfEnd sub將此代碼放入表2中的“代碼”編輯框中，以獲得所需的結果。更專業(yè)的科普知識，請關注我。如果你喜歡我的回答，也請給我表揚或轉發(fā)，你的鼓勵是支持我寫下來的動力，謝謝。

excel vba復制行，復制它的內容和格式？

復制后拆分復制行并特別粘貼：

行（X&；“：”&；n）EntireRow.復制

范圍（“A1”）。Pastespecial xlpastevaluesandnumberformats

如果是復制的單元格格式，請?zhí)砑右韵戮渥?/p>

范圍（“A1”）。Pastespecial[xlpasteformats

此外，行本身是一個整行引用，此處的整個行是重復的，可以取消它并直接更改為：

行（X&“：”&；n）。復制