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

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

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


¬O§Ú¥´¿ù¤F, À³¸Ó¬OShift + Ctrl + Enter

TOP

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

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


   ­ã¤j¡A§Ú¤@¶}©l¦bK2¥ÎCtrl + Alt+ Enter¡Aµ²ªG¨S¤ÏÀ³¡A«á¨Ó¬Ý¨ì¥t¤@½g¬O¥ÎCtrl + Shift + Enter¡Aµ²ªG¥L´N¦Û¤v§e²{¥k©Ô¸ò¤U©Ôªº¥\¯à¡A¦]¬°¨â­Ó¦³ÂI¹³¡A©Ò¥H¤~·|»~¸Ñ¬O¥´¿ù¡A©Î¬O¦³¨ä¥L¥Îªk¡A©êºp

TOP

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

1) ³æ®æªº°}¦C¤½¦¡, ¦b¤@­ÓÀx¦s®æ½s¿è¤½¦¡, ¦A¥Î¤TÁä¿é¤J, µM«á½Æ»s¨ì¨ä¥¦Àx¦s®æ(³q±`¬O:¥k©Ô/¤U©Ô)
2) °Ï°ìªº°}¦C¤½¦¡, «h­n¿ï¨ú¤@­Ó°Ï°ì¦A«ö¤TÁä

³q±`²ßºD¨Ï¥Î³æ®æ°}¦C¤½¦¡, ¾A¦XÂX±i½d³ò~~

googleÀ³¥i§ä¨ì§ó¦h¸ÑÄÀ, «o¥u¥h¬Ý¤@­Ó...???

TOP

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

­ã¤j¡A§Ú»¡¤£À´¬O¦]¬°¬d¨ìªº¸ò§A»¡ªº¤£¤Ó¤@¼Ë¡A¤£ª¾¹D¬O¥´¿ù¡AÁÙ¬O¦³¨ä¥L¥Îªkhttps://support.microsoft.com/zh-tw/office/%E5%BD%B1%E7%89%87-%E9%99%A3%E5%88%97%E5%85%AC%E5%BC%8F-8ff8257a-b28e-4e81-b4f8-30f793412dfa

TOP

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

GOOGLE¤@¤U//°}¦C¤½¦¡ªº¥Îªk§a!!!
Xl0000216.rar (4.11 KB)

TOP

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


    ­ã¤j¡A¯à³Â·Ð§AÀ°§Ú¥´¦b½d¨Ò¤W­±§Ú¦A¬ã¨s¬Ý¬Ý¶Ü?

TOP

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


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

TOP

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


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

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

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

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


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

TOP

        ÀR«ä¦Û¦b : ¤Ñ¤W³Ì¬ü¬O¬P¬P¡A¤H¥Í³Ì¬ü¬O·Å±¡¡C
ªð¦^¦Cªí ¤W¤@¥DÃD