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

[µo°Ý] ¦p¦ó¥ÎÀx¦s®æªº­È¨Ó¨Ï¥Îfilter?

[µo°Ý] ¦p¦ó¥ÎÀx¦s®æªº­È¨Ó¨Ï¥Îfilter?

  1.     Dim stocknumber As Range
  2.     Set stocknumber = Range("A2")
  3.     ActiveSheet.Range("$A$1:$G$4").AutoFilter Field:=3, Criteria1:=stocknumber.value
½Æ»s¥N½X
Criteria1:=stocknumber.value¦n¹³¦³°ÝÃD, ¦p¦ó­×§ï, thz a lot

¦^´_ 1# qwwe

Range("A2")¬O¤£¬O·Q®³¥t¤@­¶ªºA2?
§Ú¬Ý§A·QFILTERªº¬OCÄæ(FIELD:=3), ¦ý±ø¥ó«o¬O¥ÎAÄæ.
¦pªGRANGE("A2")¬O¦b¥t¤@­¶,¥i¥H³o¼Ë¼g
  1.       Dim stocknumber As Range
  2.     Set stocknumber = worksheets("¥t¤@­¶­¶¦W").Range("A2")
  3.     ActiveSheet.Range("$A$1:$G$4").AutoFilter Field:=3, Criteria1:=stocknumber.value
½Æ»s¥N½X
¦pªG·QFILTERªº¬OAÄæ,¥i¥H³o¼Ë
  1.       Dim stocknumber As Range
  2.     Set stocknumber = Range("A2")
  3.     ActiveSheet.Range("$A$1:$G$4").AutoFilter Field:=1, Criteria1:=stocknumber.value
½Æ»s¥N½X
À´±oµo°Ý,µª®×´N·|¦b¨ä¤¤

¤µ¤éの¤@¬íは  ©ú¤éにない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

        ÀR«ä¦Û¦b : ¡i¥Í©R¦b©I§l¶¡¡j¦òªû»¡¡G¡u¥Í©R¦b©I§l¶¡¡C¡v¤HµLªkºÞ¦í¦Û¤vªº¥Í©R¡A§óµLªk¾×¦í¦º´Á¡AÅý¦Û¤v¥Ã¦í¤H¶¡¡C¬JµM¥Í©R¥h¨Ó³o»òµL±`¡A§Ú­Ì§óÀ³¸Ó¦n¦n¦a·R±¤¥¦¡B§Q¥Î¥¦¡B¥R¹ê¥¦¡AÅý³oµL±`¡BÄ_¶Qªº¥Í©R¡A´²µo¥¦¯uµ½¬üªº¥ú½÷¡A¬M·Ó¥X¥Í©R¯u¥¿ªº»ù­È¡C
ªð¦^¦Cªí ¤W¤@¥DÃD