³]p¤@Ó°}¦C¬Û¥[¥i¬O±o¨ìªºÈ¤@ª½¬O#VALUE
- ©«¤l
- 8
- ¥DÃD
- 4
- ºëµØ
- 0
- ¿n¤À
- 12
- ÂI¦W
- 0
- §@·~¨t²Î
- win7
- ³nÅ骩¥»
- Excel2010
- ¾\ŪÅv
- 10
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥x«n
- µù¥U®É¶¡
- 2015-6-4
- ³Ì«áµn¿ý
- 2015-6-20
|
³]p¤@Ó°}¦C¬Û¥[¥i¬O±o¨ìªºÈ¤@ª½¬O#VALUE
Function Madd(A As Variant, B As Variant)
Dim MC() As Variant
ReDim MC(LBound(A, 1) To UBound(A, 1), LBound(A, 2) To UBound(A, 2))
For i = LBound(A, 1) To UBound(A, 1)
For j = LBound(A, 2) To UBound(A, 2)
MC(i, j) = A(i, j) + B(i, j)
Next j
Next i
Madd = MC
End Function
¤W±¬O§Úªº¨ç¼Æ
¦Ó§Ú¦bªí³æ¿é¤J{=Madd(A1:B2),(C1:D2))}----¦³¨Ï¥Îctrl+shifu+enter
¤j·§¬O³o¼Ë
½Ð°Ý¬°¤°»ò§ÚŪ¤£¨ìA,BªºÈ©O
½Ð¤j®aÀ°À°¦£ ·PÁ |
|
¤j®a¦n~
|
|
|
|
|
- ©«¤l
- 8
- ¥DÃD
- 4
- ºëµØ
- 0
- ¿n¤À
- 12
- ÂI¦W
- 0
- §@·~¨t²Î
- win7
- ³nÅ骩¥»
- Excel2010
- ¾\ŪÅv
- 10
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥x«n
- µù¥U®É¶¡
- 2015-6-4
- ³Ì«áµn¿ý
- 2015-6-20
|
¦^´_ 3# Scott090
ÁÂÁ§A~~~ ¥i¥H°Ê§@¤F¡A¤ß·P®¦ |
|
¤j®a¦n~
|
|
|
|
|
- ©«¤l
- 519
- ¥DÃD
- 54
- ºëµØ
- 0
- ¿n¤À
- 595
- ÂI¦W
- 247
- §@·~¨t²Î
- win 10
- ³nÅ骩¥»
- []
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2013-3-19
- ³Ì«áµn¿ý
- 2024-11-11
|
¦^´_ 1# s100310424
©ÎªÌ¡G- Function Madd(A As Variant, B As Variant)
- Dim MC() As Variant
- A = A.Value: B = B.Value
- ReDim MC(LBound(A, 1) To UBound(A, 1), LBound(A, 2) To UBound(A, 2))
- For i = LBound(A, 1) To UBound(A, 1)
- For j = LBound(A, 2) To UBound(A, 2)
- MC(i, j) = A(i, j) + B(i, j)
- Next j
- Next i
- Madd = MC
- End Function
½Æ»s¥N½X |
|
|
|
|
|
|
- ©«¤l
- 519
- ¥DÃD
- 54
- ºëµØ
- 0
- ¿n¤À
- 595
- ÂI¦W
- 247
- §@·~¨t²Î
- win 10
- ³nÅ骩¥»
- []
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2013-3-19
- ³Ì«áµn¿ý
- 2024-11-11
|
¦^´_ 1# s100310424
Function Madd(A1 As Variant, B1 As Variant)
Dim MC() As Variant,A,B
A=A1.value : B=B1.value
ReDim MC(LBound(A, 1) To UBound(A, 1), LBound(A, 2) To UBound(A, 2))
For i = LBound(A, 1) To UBound(A, 1)
For j = LBound(A, 2) To UBound(A, 2)
MC(i, j) = A(i, j) + B(i, j)
Next j
Next i
Madd = MC
End Function |
|
|
|
|
|
|