[µo°Ý] §ä¥X³Ì¤Öªº²Õ¦X

basarasy

½Ð°Ý¤j¤j,¦p¦ó§ä¥X A+B+C+...=ªº©M¬O³Ì¤Öªº²Õ¦X?

hugh0620

³o­Ó°ÝÃD~ ¼Ó¥DÀ³¸Ó¥ý±N°ÝÃDªºÅÞ¿èÂç²M~
¦bx=yªº ¯x°} ¥¦¿ï¾Üªº­ç°£±ø¥ó¬°¦ó?
  x=3 , y=3
¦bx<>y®É ¯x°} ¥¦¿ï¾Üªº­ç°£±ø¥ó¬°¦ó?
  x=3, y=4

  ³o¨Ç¼Ó¥D¤£¬O¥æ«Ýªº«Ü²M·¡­ò~

³oºØÃD¥Ø¦n¹³¬OorªºÃD¥Ø~ ¦³ÂI¹³¬O½u©Ê³W¹º~

GBKEE

¦^´_ 1# basarasy
¸Õ¸Õ¬Ý

1. Sub Ex()
   
2.     Dim Rng(1 To 2) As Range, E, R As Variant, C As Variant
   
3.     With Sheets("eg.1")
   
4.         Set Rng(1) = .[D1:G4]
   
5.         Set Rng(2) = .[Q2:R4]
   
6.     End With
   
7.     For Each E In Rng(2).Rows
   
8.         R = Application.Match(E.Cells(1, 1), Rng(1).Columns(1), 0)
   
9.         C = Application.Match(E.Cells(1, 2), Rng(1).Rows(1), 0)
   
10.         If IsNumeric(C) And IsNumeric(R) Then E.Cells(1, 3) = Rng(1).Cells(C, R)
    
11.     Next
    
12.     With Rng(2)
    
13.         .Cells(.Cells.Count).Offset(1, 1) = "=SUM(" & .Columns(.Columns.Count + 1).Address & ")"
    
14.     End With
    
15. End Sub

½Æ»s¥N½X

basarasy

¦^´_ 3# GBKEE


    ÁÂÁÂGBKEE¤j¤j±`±`¥Î¤ßªº±Ð¾É.
¥i¯à¬O§Úªº¨Ò¤l¤£¦n,§Ú°µ¤F1­Ó¤ñ¸û©ö©úªº¨Ò¤l.

¤U¸ü (104.75 KB)

2011-3-30 19:56

¤U¸ü (48.75 KB)

2011-3-30 19:56

GBKEE

¦^´_ 4# basarasy
[ ¦p¦ó¥Î³Ì¤Öªº¿ú¥h¶R©Ò¦³¼Æ¶qªº°Ó«~? ]
§Aªº½d¨Ò¤¤,¨S¬Ý¨ìª÷¿ú??  ,½Ð¦A¸Ô¦C½d¨Ò Åý¤j®a¸Õ¸Õ¬Ý

basarasy

¦^´_ 5# GBKEE


    ¤£¦n·N«ä><  
    c3:f5 ¬O°Ó«~ªºª÷¿ú.

hugh0620

¦^´_  basarasy
[ ¦p¦ó¥Î³Ì¤Öªº¿ú¥h¶R©Ò¦³¼Æ¶qªº°Ó«~? ]
§Aªº½d¨Ò¤¤,¨S¬Ý¨ìª÷¿ú??  ,½Ð¦A¸Ô¦C½d¨Ò Åý¤j®a ...
GBKEE µoªí©ó 2011-4-1 14:42

    GBKEE ¤j¤j~ ³o¯uºw¬O½u©Ê³W¹º(Linear Programming¡A²ºÙLP) ªºÃD¥Ø~
    ³Ì¤p¦¨¥»~ ·|¦³°ß¤@¸Ñ,¦h²Õ¸Ñ,....
   ¤j¤j¥i¯à­n¹ïLPªº­pºâ¤è¦¡¤F¸Ñ,¤~¯à°÷²Å¦X¼Ó¥D­nªº»Ý¨D
   ¤p§Ì¨D¾Ç®É¦³±µÄ²¹L³oÃþ«¬ªº´£¥Ø~ ¦³·|¥Î¤âºâ~
    ÁÙ¥¼¹³¼Ó¥D³o·N·Q­n¼g¦¨µ{¦¡¨Ó¨D¸Ñ~
    ´£¨Ñ¤j¤jºû°ò¦Ê¬ì,¹ïLPªº¸Ñ»¡
    http://zh.wikipedia.org/wiki/%E7%BA%BF%E6%80%A7%E8%A7%84%E5%88%92

diabo

±Ò¥Î¡u³W¹º¨D¸Ñ¡v¼W¯q¶°¡A§Q¥Î¡u³W¹º¨D¸Ñ¡v§Y¥i§Ö³t±o¨ì§A­nªºµª®×¡C

¤U¸ü (85.3 KB)

2011-4-6 23:12

³W¹º¨D¸Ñ¡A³ÌÃøªº¬O¦C¥XÃä¬É±ø¥ó¡A¦C§¹¾ã¤F¡Aµª®×¦ÛµM´N¥X¨Ó¤F....

³W¹º¨D¸Ñ.rar (77.73 KB)

¤U¸ü¦¸¼Æ: 8

2011-4-6 23:18

basarasy

¦^´_ 8# diabo


    ÁÂÁ§Aªº¤èªk.
¦ý¦³®É¤£ª¾¤°»ò¨Æ·|¥X¿ù.
§Ú²Ä1¦¸­pºâ®É¬O¨S¦³°ÝÃD,¦ý­pºâ«á§âÂŦ⪺¼Æ§ï¤F¦A­pºâ´N¦³°ÝÃD.><
µª®×¥X²{4.1  ¦³¤p¼Æ.
³o­Ó³W¹º¨D¸Ñ¥i¥H¨D¦h­«¸Ñ¶Ü?

¤U¸ü (124.1 KB)

2011-4-7 00:06

diabo

½Õ¾ã¡i¿ï¶µ¡j¸Ìªººë½T«×¡A½Õ¤p¤@ÂI¡A¨Ò¦p0.0001....