¦U¦ì¦n
§Ú§Q¥Î¤U¦Cªº¥N½X- Dim N11, N2, N3, N4, N5, MaxRow As Integer
- N11 = Cells(Rows.Count, 2).End(xlUp).Row 'BÄ檺³Ì«á¤@¸ê®Æ®æªº¦C¼Æ
- N2 = Cells(Rows.Count, 3).End(xlUp).Row 'CÄ檺³Ì«á¤@¸ê®Æ®æªº¦C¼Æ
- N3 = Cells(Rows.Count, 4).End(xlUp).Row
- N4 =Cells(Rows.Count, 5).End(xlUp).Row
- N5 = Cells(Rows.Count, 6).End(xlUp).Row
-
- MaxRow1 = Application.WorksheetFunction.Max(N1, N2, N3, N4, N5) '¨D¥X³Ì¤Wz½d³ò¤¤³Ì¤j¼Æ
½Æ»s¥N½X §ä¥XB¦ÜFÄ檺½d³ò¤¤ªº³Ì¤j¦C¼Æ
·Q½Ð°Ý¦U¦ì¦³¨S¦³¨ä¥L§ó§Öªº¤è¦¡,©Î¬O§ó¦nªº¤è¦¡,¥i¥H¹F¨ì©ó¯S©w½d³ò¤º§ä¥X³Ì¤j¦C¼Æ
ÁÂÁÂ |