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

Ãö©ó¶W³sµ²

Ãö©ó¶W³sµ²

ÂI¿ï¬Y¤@¶W³sµ²(¤u§@ªí1)«á,¦b¥t¤@­Ó¤u§@ªí(¤u§@ªí2)B1¦Û°Ê¿é¤J9999µ{¦¡­n¦p¦ó¼g?

To   kuoliang123  »P winint1  ¨â¦ì

1.¤u§@ªí2 ¬° OFFICE 2010 ¹w³]¤u§@ªí¦WºÙ
2.Sheet2 .......
3.·íµM  ¦WºÙ¥i¥H§ïÅÜ~ ¦b¦¹¶È¥H¹w³]ªº¦WºÙ§iª¾

  ¦h°µ¦h·Q¦h¾Ç²ß¡A¤Ö¬Ý¤Ö¿ù¤Ö°g³~

  ¦h°µ=¦h¦h½m²ß¡A¦h¦h½s¼g¡C
  ¦h·Q=·Q·Q¬°¤°»ò¤H®aµ{¦¡­n¨º¼Ë¼g¡A¦pªG´«¦¨¦Û¤v¡A¤S·|«ç¼g¡C
  ¦h¾Ç²ß=¾Ç²ß¤H®aªºµo°Ý¨Ã¸Ñµª¡A¾Ç²ß¤H®aªº¼gªk

  ¤Ö¬Ý=¥u¬Ý¤£°µ¤]ªPµM

TOP

À³¸Ó¬O "SHTTE2" §a

TOP

¦^´_ 10# ddhh4053


    ¤u§@ªí2  ¦WºÙ¬O§_¥¿½T?
kuoliang

TOP

¦^´_ 10# ddhh4053


§Ú¶Kªº¨º­Ó  ³£¦³¦Û¤v´ú¸Õ¹L..

ª½±µ©ñ¦b ¬¡­¶Ã¯ªºµ{¦¡½X¤º
¨S²o§è¨ìª«¥ó§a..

  ¦h°µ¦h·Q¦h¾Ç²ß¡A¤Ö¬Ý¤Ö¿ù¤Ö°g³~

  ¦h°µ=¦h¦h½m²ß¡A¦h¦h½s¼g¡C
  ¦h·Q=·Q·Q¬°¤°»ò¤H®aµ{¦¡­n¨º¼Ë¼g¡A¦pªG´«¦¨¦Û¤v¡A¤S·|«ç¼g¡C
  ¦h¾Ç²ß=¾Ç²ß¤H®aªºµo°Ý¨Ã¸Ñµª¡A¾Ç²ß¤H®aªº¼gªk

  ¤Ö¬Ý=¥u¬Ý¤£°µ¤]ªPµM

TOP

GBK¤j¤jªº¼gªk¬O¹ïªº!! ÁÂÁÂ

TOP

¦^´_ 11# ddhh4053
¥Î¤u§@ªí¦WºÙ  SheetS("¤u§@ªí2").Range("B2")=9999
¥Î¼Ò²Õ ¦WºÙ  Sheet1.Range("B2")=9999



   

TOP

§Ú­n¦b¤u§@ªí2ªºB2¼g¤J¼Æ¦r9999

TOP

´«¦¨§Aªºµ{¦¡·|¦³¿ù»~¥¦Åã¥Ü:°õ¦æ¶¥¬q¿ù»~'424' ¦¹³B»Ý­nª«¥ó

TOP

½Ð°Ý±z¿é¤J¦b­þ..¨S¤ÏÀ³­ì¦]?
9999 ¥i¥H¬O «ü¼Æ(«ü©w¦Û­q) ¥i¥H¬O¤p¨ç¼Æ(¦Û³]°Ï¶¡) ¥i¥H¬O¤å¦r ¥i¥H¬O¼Æ¦r...
  1. Private Sub Worksheet_SelectionChange(ByVal Target As Range)         '¤u§@ªí1(²¾°ÊÀx¦s®æ)ªºÄ²°Ê¨Æ¥ó

  2.     If Target.Hyperlinks.Count Then ¤u§@ªí2.[b1] = "9999"    '¤u§@ªí2.B1¦Û°Ê¿é¤J9999

  3. End Sub
½Æ»s¥N½X

  ¦h°µ¦h·Q¦h¾Ç²ß¡A¤Ö¬Ý¤Ö¿ù¤Ö°g³~

  ¦h°µ=¦h¦h½m²ß¡A¦h¦h½s¼g¡C
  ¦h·Q=·Q·Q¬°¤°»ò¤H®aµ{¦¡­n¨º¼Ë¼g¡A¦pªG´«¦¨¦Û¤v¡A¤S·|«ç¼g¡C
  ¦h¾Ç²ß=¾Ç²ß¤H®aªºµo°Ý¨Ã¸Ñµª¡A¾Ç²ß¤H®aªº¼gªk

  ¤Ö¬Ý=¥u¬Ý¤£°µ¤]ªPµM

TOP

        ÀR«ä¦Û¦b : ¤£©È¨Æ¦h¡A¥u©È¦h¨Æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD