ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ¦¹µ{§Ç¦p¦ó­×§ï??

[µo°Ý] ¦¹µ{§Ç¦p¦ó­×§ï??

Sub Ma3333()
Dim ABC As Range
Set ABC = Sheets("Sheet1").Range("e" & [e1:e200].Find("*", SearchOrder:=xlByRows, LookIn:=xlValues, _
   SearchDirection:=xlPrevious).EntireRow.Row)
Sheets("Sheet1").Range("A1:ABC").Select  '==>¿ù»~

End Sub

  1. Sub Ma3333()
  2. Dim ABC As Range
  3. Set ABC = Sheets("Sheet1").Range("e" & [e1:e200].Find("*", SearchOrder:=xlByRows, LookIn:=xlValues, _
  4.    SearchDirection:=xlPrevious).EntireRow.Row)
  5. Sheets("Sheet1").Range("A1:A" & ABC).Select
  6. End Sub
½Æ»s¥N½X

TOP

¥»©«³Ì«á¥Ñ t8899 ©ó 2014-2-15 13:54 ½s¿è
zxcxz µoªí©ó 2014-2-15 09:26

§Ú­n¿ï¾Ü¯x§Î½d³ò
abc ªºÄ泡¥÷¨S¦³§@¥Î ??
"A1:A" ===>½Ð±Ð³o¦p¦ó¸ÑÄÀ??

TOP

¦pªGABC=10
"A1:A" & ABC ´Nµ¥©ó "A1:A10"

TOP

        ÀR«ä¦Û¦b : ÀR§¤±`®¦¤v¹L¡B¶¢½Í²ö½×¤H«D¡C
ªð¦^¦Cªí ¤W¤@¥DÃD