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

Range ¤º®e«ü©wªº»yªk­n¦p¦ó¼¶¼g¡C

¦^´_ 1# Baracuda


    FormulaArray
   ¶Ç¦^©Î³]©w½d³òªº°}¦C¤½¦¡
¦pªG«ü©w½d³ò¤£¥]§t°}¦C¤½¦¡¡A¥»ÄݩʶǦ^ Null
©Ò¥H©pªº°µªk¬O¤ñ¹ï¤£¥X¨Óªº
  1. Sub nn()
  2. myaddress = "E6:E12"
  3. mystr = Join(Application.Transpose(Sheets("22").Range(myaddress).Value))
  4. mystr1 = Join(Application.Transpose(Sheets("°Ñ¦Òªí®æ").Range(myaddress).Value))
  5. MsgBox IIf(mystr = mystr1, "¬Û¦P", "¤£¦P")
  6. End Sub
½Æ»s¥N½X
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¦^´_ 3# Baracuda

Null ÃöÁä¦r¬O¤@ºØ Variant ¦¸«¬ºA¡C·N«üÅÜ¼Æ ¤¤¥¼§t¥¿½Tªº¸ê®Æ¡C
©Ò¥Hªí¥Ü»¡­Y§A«ü©w½d³ò¤º¨S¦³°}¦C¤½¦¡¦s¦b®É´N·|¶Ç¦^¨S¦³­È

¨Ì·Ó§AÀɮפº®e¨Ó¬Ý,Àx¦s®æ¤º¨Ã¥¼§t¦³°}¦C¤½¦¡¶Ç¦^ªº·íµM³£¬ONULL
ª`·Nªº¬O¤£¦P¤u§@ªí½d³ò¼gªk,¥u¬O«ü©w²M·¡¤u§@ªí¦WºÙ½}¤F
¾Ç®üµL²P_¤£®¢¤U°Ý

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