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

¦p¦ó¥h§äÂ÷¦Û¤v³Ìªñªº­È?

¦p¦ó¥h§äÂ÷¦Û¤v³Ìªñªº­È?

¨D­È.rar (7.45 KB)
ª©¤W¤j¤j¡A½Ð°Ý¦p¦Pªþ¥ó¤¤ªºÀɮ׼ХܡA¦p¦ó¼g¨ç¼Æ¥h´M§äÂ÷¦Û¤v³Ìªñªº­È¥h°µ¬Û´î©O?

¦^´_ 1# ÂŤÑÄR¦À


    ÁÂÁ«e½úµoªí¦¹¥DÃD»P½d¨Ò
¥H¤UÃìµ²©«©Î³\¾A¦X«e½úªº»Ý¨D,¦ý¬O¦n¹³­n¥ÎVBA
https://forum.twbts.com/viewthre ... &from=favorites
¥Î¦æ°Ê¸Ë¸mÂsÄý½×¾Â¾Ç²ß«Ü¤è«K,ÁÂÁ½׾¸gÀç¹Î¶¤
½Ð¤j®a¤@°_¤W½×¾Â¨Ó¥æ¬y

TOP

(·j´M½s¸¹12384) googleºô§}:https://hcm19522.blogspot.com/
google"EXCEL°g"  blog  ©Îgoogleºô§}:https://hcm19522.blogspot.com/

TOP

¦^´_ 3# hcm19522

H¤j¡A·PÁ§Aªº¦^ÂСA¦ý§Ú¦³ÂI¬Ý¤£¤ÓÀ´¡A¯à¤j­P»¡©ú¤@¤U¦¹¨ç¼Æ¶Ü?

TOP

¥»©«³Ì«á¥Ñ ­ã´£³¡ªL ©ó 2024-2-5 12:19 ½s¿è

K2/°}¦C¤½¦¡/¥k©Ô¤U©Ô
=IF(OR($C$1:$F1=C2),G2-MOD(MAX(($C$1:$F1=C2)*(ROW($A$1:$A1)*10^5+$G$1:$J1)),10^5),"")

¥H"¦C¸¹"*10^5 + ¼Æ¦r...¨D¥X³Ì¤j­È, ¦AMOD¾l¼Æ...§Y¬O¤W¤@­Ó³Ì«á¥X²{ªº¼Æ¦r

TOP

¦^´_ 4# ÂŤÑÄR¦À


    ¦³¥t¸Ñ ¸û²³æ
google"EXCEL°g"  blog  ©Îgoogleºô§}:https://hcm19522.blogspot.com/

TOP

¥»©«³Ì«á¥Ñ ÂŤÑÄR¦À ©ó 2024-2-5 14:10 ½s¿è

¦^´_ 5# ­ã´£³¡ªL


    ­ã¤j¡A¨ç¼Æ¤º®e¦³»Ý­n§ó§ï¶Ü?§Ú½Æ»s¶K¤W«á¥X²{¿ù»~­È

TOP

ÁÂÁ½׾Â,ÁÂÁ¦U¦ì«e½ú
«á¾ÇÂǦ¹©«½m²ß¦r¨å,½Ð¦U¦ì«e½ú«ü±Ð
°õ¦æ«e:


°õ¦æµ²ªG:


Option Explicit
Sub test()
Dim i&, Z, xA As Range, T$
Set Z = CreateObject("Scripting.Dictionary")
Set xA = [C2:H5]
For i = 1 To xA.Count
   T = xA(i): xA(i)(1, 9) = IIf(Z(T) = "", "", xA(i)(1, 5) - Z(T)): Z(T) = xA(i)(1, 5)
Next
End Sub
¥Î¦æ°Ê¸Ë¸mÂsÄý½×¾Â¾Ç²ß«Ü¤è«K,ÁÂÁ½׾¸gÀç¹Î¶¤
½Ð¤j®a¤@°_¤W½×¾Â¨Ó¥æ¬y

TOP

¦^´_ 7# ÂŤÑÄR¦À


°}¦C¤½¦¡
Ctrl + Alt, Enter ¤TÁ䧹¦¨

TOP

¦^´_ 9# ­ã´£³¡ªL


    ??¡A­ã¤j¡A§Ú¤£¤ÓÀ´§Aªº·N«ä

TOP

        ÀR«ä¦Û¦b : ¡i¦æµ½­n¤Î®É¡j¦æµ½­n¤Î®É¡A¥\¼w­n«ùÄò¡C¦p¿N¶}¤ô¤@¯ë¡A¥¼¿N¶}¤§«e¤d¸U¤£­n°±º¶¤õ­Ô¡A§_«h­«¨Ó´N¤Ó¶O¨Æ¤F¡C
ªð¦^¦Cªí ¤W¤@¥DÃD