ªð¦^¦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 : ¤Hªº¤ß¦a¬O¤@²¥¥Ð¡A¤g¦a¨S¦³¼½¤U¦nºØ¤l¡A¤]ªø¤£¥X¦nªºªG¹ê¡C -
ªð¦^¦Cªí ¤W¤@¥DÃD