excel vba ¦pªG§â¤GÄ檺¸ê®Æcopy¨ì¥t¤GÄæ©O?
- ©«¤l
- 3
- ¥DÃD
- 0
- ºëµØ
- 0
- ¿n¤À
- 2
- ÂI¦W
- 0
- §@·~¨t²Î
- windows7
- ³nÅ骩¥»
- office 2016
- ¾\ŪÅv
- 10
- µù¥U®É¶¡
- 2019-3-7
- ³Ì«áµn¿ý
- 2019-3-10
|
±z¦n¡A¸ÕµÛ¼g¤F£¸Ó²³æªº¡AÅwªï°ª¤â«ü¥¿
¨ìVBA¸Ó¤u§@ªí¤U
Private Sub Worksheet_Change(ByVal Target As Range)
Dim E As Long
E = WorksheetFunction.CountA(Range("B:B")) + 1
Range("E1:F" & E).Value = Range("B1:C" & E).Value
End Sub |
|
|
|
|
|
|