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

[µo°Ý] ¦r¦ê¦ì¸m­pºâ°ÝÃD

[µo°Ý] ¦r¦ê¦ì¸m­pºâ°ÝÃD

½Ð°Ý¦p¦ó±NAÄæ¦r¦ê1ªº¦ì¸m¶¶§Ç¿é¥X¦ÜBÄæ¡AAÄæ¦r¦êAªº¦ì¸m¶¶§Ç¿é¥X¦ÜCÄæ¡A¨Ã¥Î;²Å¸¹¤À¹j(¦p¤U¦C»¡©ú)¡CÁÂÁ¤j®aªºÀ°¦£!
A1 100010A01A0        B1 1;5;9        C1 7;10
A2 001A010A1100A  B2 3;6;9;10  C2 4;8;13
¤p«Ä

Function zz(x, y)
For i = 1 To Len(x)
    If Mid(UCase(x), i, 1) = UCase(y) Then a = a & ";" & i
Next
zz = Mid(a, 2)
End Function
¦Û©w¨ç¼Æ.zip (8.6 KB)

TOP

¦^´_ 2# ikboy
«D±`ÁÂÁ±zªºÀ°¦£^_^
¤p«Ä

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