match ·j´M¤£¦P¤u§@ªí¥i¥H«ü©wÅܼƶÜ?
- ©«¤l
- 5923
- ¥DÃD
- 13
- ºëµØ
- 1
- ¿n¤À
- 5986
- ÂI¦W
- 0
- §@·~¨t²Î
- win10
- ³nÅ骩¥»
- Office 2010
- ¾\ŪÅv
- 150
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥xÆW°ò¶©
- µù¥U®É¶¡
- 2010-5-1
- ³Ì«áµn¿ý
- 2022-1-23
        
|
¥»©«³Ì«á¥Ñ GBKEE ©ó 2015-9-24 15:37 ½s¿è
¦^´_ 42# EGBT
x As Single (¬O°w¹ï·¸¦ì ק諸«¬ºA )
Match §ä¤£¨ì¶Ç¦^¿ù»~È,»Pxªº«¬ºA¤£¹ï,¬Gµ{¦¡¦³«¬ºA¤£²Å¦Xªº»~È.
©Ò¥H¥²¶·¬O Dim x As Variant
Match¥´ 1 or -1 ³£¤£¦æ...¥´0´N¥i¥H
À³¸Ó¬O Match¥´ 0 or -1 ³£¤£¦æ...¥´1´N¥i¥H- Match_type ¬OӼƦr¡A¨äȦ³¤TºØ¥i¯à¡G-1¡B0 ©Î 1¡C¥Î¥H«ü©w Microsoft Excel ¦p¦ó±q lookup_array ¸Ì´M§ä lookup_value¡C
- ¦pªG match_type ¬O 1¡A«h MATCH ¨ç¼Æ·|§ä¨ìµ¥©ó©Î¶È¦¸©ó lookup_value ªºÈ¡CLookup_array ¥²¶·¥H»¼¼W¦¸§Ç±Æ¦C¡G...-2, -1, 0, 1, 2, ..., A-Z, FALSE, TRUE¡C
- ¦pªG match_type ¬O 0¡A«h MATCH ¨ç¼Æ·|§ä²Ä¤@Ó§¹¥þµ¥©ó lookup_value ªº¤ñ¸ûÈ¡CLookup_array ¥i¥H¨Ì¥ô·N¦¸§Ç±Æ¦C¡C
- ¦pªG match_type ¬O -1¡A«h MATCH ¨ç¼Æ·|§ä¨ìµ¥©ó©Î¤j©ó lookup_value ªº³Ì¤pÈ¡CLookup_array ¥²¶·¥H»¼´î¦¸§Ç±Æ§Ç¡GTRUE, FALSE, Z-A, ...2, 1, 0, -1, -2, ...¡A¥H¦¹Ãþ±À¡C
- ¦pªG match_type ¤Þ¼Æ³Q¬Ù²¤¡A«h°²³]¨äȬ° 1¡C
½Æ»s¥N½X |
|
|
|
|
|
|
- ©«¤l
- 5923
- ¥DÃD
- 13
- ºëµØ
- 1
- ¿n¤À
- 5986
- ÂI¦W
- 0
- §@·~¨t²Î
- win10
- ³nÅ骩¥»
- Office 2010
- ¾\ŪÅv
- 150
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥xÆW°ò¶©
- µù¥U®É¶¡
- 2010-5-1
- ³Ì«áµn¿ý
- 2022-1-23
        
|
¦^´_ 44# EGBT
match_type ¬O 1¡A«h MATCH ¨ç¼Æ·|
§ä¨ìµ¥©ó©Î¶È¦¸©ó lookup_value ªºÈ¡CLookup_array ¥²¶·¥H»¼¼W¦¸§Ç±Æ¦C¡G...-2, -1, 0, 1, 2, ..., A-Z, FALSE, TRUE¡C
match_type ¬O -1¡A«h MATCH ¨ç¼Æ·|
§ä¨ìµ¥©ó©Î¤j©ó lookup_value ªº³Ì¤pÈ¡CLookup_array ¥²¶·¥H»¼´î¦¸§Ç±Æ§Ç¡GTRUE, FALSE, Z-A, ...2, 1, 0, -1, -2, ...¡A¥H¦¹Ãþ±À¡C
¦pªG match_type ¤Þ¼Æ³Q¬Ù²¤¡A«h°²³]¨äȬ° 1- Sub test()
- Dim x As Variant, Mdate As Date
- x = Application.Match(Range("A1"), Range("B:B"), -1)
- If IsNumeric(x) Then
- Mdate = Range("b" & x)
- x = Range("A1") - Mdate
- If x >= 0 And x <= 5 Then MsgBox Mdate
- End If
- End Sub
½Æ»s¥N½X |
|
|
|
|
|
|