SetLinkOnData ©MLinkSources ¦³¤°»ò¥Î³B??
- ©«¤l
- 11
- ¥DÃD
- 4
- ºëµØ
- 0
- ¿n¤À
- 51
- ÂI¦W
- 0
- §@·~¨t²Î
- xp
- ³nÅ骩¥»
- 2010
- ¾\ŪÅv
- 20
- µù¥U®É¶¡
- 2013-11-14
- ³Ì«áµn¿ý
- 2018-8-6
|
SetLinkOnData ©MLinkSources ¦³¤°»ò¥Î³B??
example:
Links = ActiveWorkbook.LinkSources(Sheets("ªÑ²¼").Range("A1").Formula)
ActiveWorkbook.SetLinkOnData Links, "LinkChange"
Q1: SetLinkOnData ©MLinkSources ¦³¤°»ò¥Î³B?? ¦p¦ó¨Ï¥Î?
Q2:°²¦pDDEÂ_½uªº¸Ü....¦³¨S¦³¤èªk¥i¥H¦b¤£«¶}Excel±¡ªp¤U«³]DDE?? ¦]¬°±d©M¥þ³£ÁȦ³®É«J§Ö¥«·|Â_½u,n«¶}Àɮפ~¯à°÷¦A¦¸³s°Ê~
ÁÂÁÂ~ |
|
|
|
|
|
|
- ©«¤l
- 11
- ¥DÃD
- 4
- ºëµØ
- 0
- ¿n¤À
- 51
- ÂI¦W
- 0
- §@·~¨t²Î
- xp
- ³nÅ骩¥»
- 2010
- ¾\ŪÅv
- 20
- µù¥U®É¶¡
- 2013-11-14
- ³Ì«áµn¿ý
- 2018-8-6
|
¦^´_ 2# luhpro
ÁÂÁ luhpro³o»ò¸Ô²Ó¸ÑÄÀ....¸U¤À·PÁÂ!!!!. |
|
|
|
|
|
|
- ©«¤l
- 835
- ¥DÃD
- 6
- ºëµØ
- 0
- ¿n¤À
- 915
- ÂI¦W
- 16
- §@·~¨t²Î
- Win 10,7
- ³nÅ骩¥»
- 2019,2013,2003
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2010-5-3
- ³Ì«áµn¿ý
- 2024-11-14
|
¥»©«³Ì«á¥Ñ luhpro ©ó 2014-9-8 23:06 ½s¿è
...
Q1: SetLinkOnData ©MLinkSources ¦³¤°»ò¥Î³B?? ¦p¦ó¨Ï¥Î?
Q2:°²¦pDDEÂ_½uªº¸Ü....¦³¨S¦³¤èªk¥i¥H¦b¤£«¶}Excel±¡ªp¤U«³]DDE?? ¦]¬°±d©M¥þ³£ÁȦ³®É«J§Ö¥«·|Â_½u,n«¶}Àɮפ~¯à°÷¦A¦¸³s°Ê~
samsung2888 µoªí©ó 2014-9-8 15:52
¥un±N½s¿è´å¼Ð²¾¨ì µ{¦¡½X(§Ö³tÁ䬰 F7)µøµ¡¤¤ªº¥ô¤@Óªº«ü¥O¤å¦r¤¤¶¡,¦A«ö¤U F1 Áä§Y¥i¬Ý¨ì¸Ó«ü¥Oªº»¡©ú:
SetLinkOnData ¤èªk
expression.SetLinkOnData(Name, Procedure)
³]©w¨C·í§ó·s DDE ³s½u®É°õ¦æªºµ{§Ç¦WºÙ¡C
LinkSources ¤èªk
expression.LinkSources(Type)
¶Ç¦^¬¡¶Ã¯¤¤³sµ²ªº°}¦C¡C°}¦C¤¤ªº¦WºÙ¬°³Q³s½u¤å¥óªº¦WºÙ¡B
ª©¥»¦WºÙ©Î DDE ©Î OLE ¦øªA¾¹¦WºÙ¡C¦pªG¨S¦³³sµ²«h¶Ç¦^ Empty¡C¬° Variant¡C
Q1 : ¥Ñ¤Wz»¡©ú¤å¦r¥i±o¸Ó¨â¦¡ªº¥\¯à¬°:
Links = ActiveWorkbook.LinkSources(Sheets("ªÑ²¼").Range("A1").Formula)
±q Sheets("ªÑ²¼").[A1] ªº¤½¦¡¤¤¶Ç¦^¬¡¶Ã¯¤¤DDE³sµ²ªº°}¦C.
ActiveWorkbook.SetLinkOnData Links, "LinkChange"
³]©w¨C·í§ó·s DDE ³s½u®É°õ¦æªºµ{§Ç¦WºÙ¬° LinkChange
Q2:
¸Õ¸Õ ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.LinkSources |
|
|
|
|
|
|