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

[µo°Ý] ¨ú¥X¥]§÷"+"or"-"¸¹¤§«áªº¼Æ­È

¦^´_ 10# PJChen

¤£¹L§Ú¨Ã¤£­n³o­Ó­ìµ{¦¡¾Þ§@,§Æ±æ¦³¤H¥i¥HÀ°¦£¬Ý¬Ý,¥d¤F«Ü¦h¤Ñ¤F....
    ¥]§÷³øªí_¨ú¥X³Ì«á¤@­Ó¥¿­t¸¹ªº­È.rar (47.94 KB)

TOP

¦^´_ 11# PJChen

¦³ªÅÀ°§Ú¸Õ¸Õ¬Ý ¬O¤£¬O§A­nªº

¥]§÷³øªí_¨ú¥X³Ì«á¤@­Ó¥¿­t¸¹ªº­È0409.rar (56.12 KB)

TOP

¦^´_ 12# °a¤ªºµ
ÁÂÁºµ¤j,
µy·L­×§ï«á,ºI¨ú¸ê®Æ¥¿½T,½Ð°Ý:
1) §Ú¤£·QÃö³¬¨Ó·½ÀÉWorkbooks("¥]§÷³øªí.xlsx").Close False,¦ý·|µLªk°õ¦æ,¥B¨C°õ¦æ¤@¦¸´N¼W¥[¤GÄæ,­ì¦]¬O¤°»ò¡H
2) ¬O§_¦]¬°³o­ÓFor I = 1 To 2: Columns(4).Insert , 2: Next I,¬°¤°»Ý­n¼W¥[2Äæ©O?
3) §Ú¨S¬Ý¹L³oºØ¼gªk,½d³ò¬°¦ó¬O­ËµÛ¼g©O?Arr = Range("AK11:C2").FormulaR1C1Local
4) ¯à§_À°¦£µù¸Ñµ{¦¡ªº·N«ä?
·P¿E¤£ºÉ....

Range("E16:AJ25").ClearContents
    Workbooks.Open ThisWorkbook.Path & "\" & "¥]§÷³øªí.xlsx"
    For I = 1 To 2: Columns(4).Insert , 2: Next I
    Arr = Range("AK11:C2").FormulaR1C1Local
    Workbooks("¥]§÷³øªí.xlsx").Close False
    Brr = Range("B16:AJ25")
   
    For X = 1 To UBound(Arr, 1)
        For Y = 1 To UBound(Brr, 1)
            If Trim(Arr(X, 1)) = Trim(Brr(Y, 1)) Then
                 For E = 1 To UBound(Arr, 2)
                    If Arr(X, E) Like "*-*" Then
                        G = Split(Arr(X, E), "-")(1)
                        Brr(Y, E) = "=-" & G
                    ElseIf Arr(X, E) Like "*+*" Then
                        G = Split(Arr(X, E), "+")(1)
                        Brr(Y, E) = "=+" & G
                    End If
                Next E
            End If
        Next Y
    Next X

      Range("B16:AJ25") = Brr

TOP

¦^´_ 13# PJChen
§âBrr(Y, E) = "=-" & G
¸òBrr(Y, E) = "=+" & G
§ï¦¨Brr(Y, E+2) = "=-" & G
¦b§â´¡¤JÄæ删°£

TOP

¥»©«³Ì«á¥Ñ °a¤ªºµ ©ó 2021-4-10 21:00 ½s¿è

¦^´_ 13# PJChen
³o¬O°Ñ¦Ò jcchiang «e½úªº¼gªk©Ò­×§ïªº  ·PÁ jcchiang «e½úªº´£ÂI
¤w¥[¤Jµù¸Ñ ¦³µy·L­×§ï¹L ¦³ªÅ¦AÀ°§Ú¸Õ¸Õ¬Ý ·PÁÂ

¥]§÷³øªí_¨ú¥X³Ì«á¤@­Ó¥¿­t¸¹ªº­È0410.rar (40.7 KB)

TOP

¦^´_ 15# °a¤ªºµ

²{¦b¥i¥H¥¿±`ºI¨ú¸ê®Æ¤F,·PÁ±z....

TOP

¦^´_ 10# PJChen


  Ãø¹D§A¨S¦³µo²{ÅçºâÀɮתº¤é´Á¤w¸g¬O4¤ë¶Ü
  ¦Ó¥]§÷ªº¤é´ÁÁÙ¬O3¤ë,¤ë¥÷³£¤£¤@¼Ë¤F,¦p¦ó¬Û²Å?

TOP

¦^´_ 15# °a¤ªºµ
ºµ¤j¦n,
µ{¦¡¦b¨Ï¥Î®É,µo²{¤@­Ó°ÝÃD:
¨Ò¦p¡G¥]§÷³øªíªº4/24«Ê½c½¦±a(±ø)ªº¼Æ¶q¬O4,
4/25¦³¶i³f,¦ý·í½LÂI®É,¤w¥Î±¼2,§Ú¦b4/25 key -2+50·|µ¥©ó48,¦ý»Ý­nºI¨úªº¼Æ¦r¬O¶i³f¶q50,
¹³³oºØ±¡§Î¦p¦ó²¤¹L-2¥u§ì50?
µù¡G¥]§÷³øªí¨C­ÓÀx¦s®æªº¼Æ¦r,³£¥u­n§ì³Ì«á¤@­Ó+ or -ªº¼Æ¦r´N¦n.
¥]§÷³øªí_¨ú¥X³Ì«á¤@­Ó¥¿­t¸¹ªº­È.rar (42.91 KB)

TOP

¦^´_ 15# °a¤ªºµ
ºµ¤j¦n,
ªþ¥ó¤w±Nµ{¦¡update    ¥]§÷³øªí_¨ú¥X³Ì«á¤@­Ó¥¿­t¸¹ªº­È.rar (45.62 KB)
¥]§÷Åçºâ³øªí¨C­ÓÀx¦s®æ³£®Ö¹ï,µo²{¦³¨Ç­È·|§ì¿ù,
1) 4/10[O17]=16000*2....§ì¨ìªº¸ê®Æ6000*2
2) 4/30[AI25]...§ì¤£¨ì¼Æ­È
¦A³Â·ÐÀ°¦£¬Ý¤U....·PÁÂ

TOP

        ÀR«ä¦Û¦b : ¯àµ½¥Î®É¶¡ªº¤H¡A¥²¯à´x´¤¦Û¤v§V¤Oªº¤è¦V¡C
ªð¦^¦Cªí ¤W¤@¥DÃD