½Ð°Ý¨º¸Ì¿ù¤F

mmggmm

Sub Ex()
    With Sheets("FORM").Range("C7:K12")
        Sheets("Data").[A65536].End(xlUp).Offset(1, 0) = Cell.Resize(1, 9).Value
    End With
End Sub

tku0216

³á³á¡C­ì¨Ó¦p¦¹¡A¦hÁ¡A§ÚÁA¸Ñ¤F¡C

oobird

¼Ó¥D¬O»¡¡G¸ê®Æ¥i¥H¦bSheets("Data") A:J Äæ¶}©lÀx¦s(¥i¥H²Ö¿nÀx¦s)
§A§ï¦¨Sheets("Data").range("a2").Resize(1, 9) = .Value
´N¥Ã»·¦bA2¶}©lªºÀx¦s®æ¼g¤J¡A§â­ì¨Óªº¸ê®ÆÂл\±¼¤F¡C

tku0216

¤£¦n·N«ä¡A§Ú·Q½Ð±Ð¤j¤j­Ì¡AÃö©ó¯d¨¥ªÌªº¥Øªº¬O±N¸ê®Æª½±µ±q¥t¤@­Ó¤u§@ªí½Æ»s¨ì¥t¤@­Ó¸ê®Æªí¡A¨Ã¹w¯d²Ä¤@¦C¡A±q²Ä¤G¦C¶}©l¶K¤W¡C
¬JµM¦p¦¹¡A¬°¦ó¤j¤jªºµ{¦¡½X¤£ª½±µ±q"data"¤u§@ªíªºa2¶}©l¶K¤W§Y¥i©O¡H
©Ò¥HHsiehª©¥Dªºµ{¦¡¬O§_¥i¥H§ï¦¨¡G
                         Sheets("Data").range("a2").Resize(1, 9) = .Value

ÁÙ¬O¤j¤j­Ì³o¼Ë¼g¡A¦³¯S§Oªº·Qªk¸ò¥Î·N?

mmggmm

¦hÁÂHsieh  GBKEE ¨â¦ì«ü¾É

GBKEE

¦^´_ 5# mmggmm

1. Sub Ex()
   
2.     With Sheets("FORM").Range("C7:K12")
   
3.         .Copy Sheets("Data").[A65536].End(xlUp).Offset(1, 0)
   
4.         '¤W¦¡ -> ½Æ»s ¨ì«ü©w¦ì¸m         ¤U¦¡ -> «ü©w¦P¼Ë¤j¤pªº½d³ò=ªº­È
   
5.         Sheets("Data").[A65536].End(xlUp).Offset(1, 0).Resize(.Rows.Count, .Columns.Count) = .Value
   
6.     End With
   
7. End Sub

½Æ»s¥N½X

Hsieh

Sub Ex()
    With Sheets("FORM").Range("C7:K12")
        Sheets("Data").[A65536].End(xlUp).Offset(1, 0).Resize(1, 9) = .Value
    End With
End Sub

mmggmm

¹ï¤£°_,¥i¯à§Úªí¹F¤£©ú,Sheets("FORM").Range("c7:k12")¸ê®Æ¥i¥H¦bSheets("Data") A:J Äæ¶}©lÀx¦s(¥i¥H²Ö¿nÀx¦s)

mark15jill

ÁÙ¬O¤£À´±zªº·N«ä...
¦pªG¶È¶È¬O­n±N¤p½d³òªº¸ê®ÆÀx¦sªº¸Ü
¤£¥Î¥Î¨ì         Sheets("Data").[A65536].End(xlUp).Offset(1, 0) = Cell.Resize(1, 9).Value
¤Ó³Â·Ð¤F...

¥H¤U´£¨Ñ¤@­Ó²³æªº¤èªk..(¦]¤£ª¾¹D±z©Ò­n¶K¤Wªº¬Odataªº­þ¨ÇÄæ¦ì ©Ò¥H ¹w³]¬Û¦P¦ì¸m)

    Sheets("Data").Range("c7:k12").Value = Sheets("FORM").Range("c7:k12").Value

mmggmm

§Ú¬O·Q§âSheets("FORM").Range("C7:K12")¸ê®ÆÀx¦s¦ÜSheets("Data")