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

[µo°Ý] ¤Þ¥Î¨ä¥L±±¨î¶µªº°ÝÃD

¦^´_ 1# stillfish00


    ¥i±N¸ô®|  ¥t³]¤@¤¸¥ó ¥[¥H±±¨î
¨Ã©ó ¶}±Ò®É ¸õ¥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

¦^´_ 3# stillfish00


    ³o»ò»¡¦n¤F

1.§A³]­p¦nªºªí³æ ¬O²[»\¦bExcel VBA ¤º¡AÁÙ¬O¥t¥~¥]¸Ë¦¨°õ¦æÀÉ?
2.©Ò¿×³]©w¤@¶}ÀÉ®×´N°õ¦æªº·N«ä
Private Sub Workbook_Open()
'userform1.show
'applocation XXXX
End Sub

³o¬O·íÀɮ׶}±Ò´N°õ¦æXXXX°Æµ{¦¡ ©Î ªí³æ©I¥s

  ¦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

¥»©«³Ì«á¥Ñ mark15jill ©ó 2013-1-2 09:31 ½s¿è

¦^´_ 5# stillfish00

·|¿ù»~¬O¥¿±`ªº..
¦]¬°«ü¦V¿ù»~ ©Î µL«ü¦V¤§¶µ¥Ø
µ{¦¡·íµM§PŪ¤£¥X¨Ó

«Øij
¥i¦A¶}±Òµ{¦¡«e¥ý§PŪ¸ÓÀɮ׬O§_¦s¦b©ó§PŪ¥Ø¿ý©³¤U
¦p
Private Sub Workbook_Open()
if dir("C:\Windows\System32\COMCTL32.OCX") <>"" then
      Load userform1
     userform1.show
endif
end sub

©ÎªÌ
§PŪµL¦¹ÀÉ®× ©Î ¤£¦A¹w³]¥Ø¿ý©³¤Uªº¸Ü
·j´M¹w³]¥Ø¿ý¥B±NÀɮ׽ƻs¨ì¸Ó¥Ø¿ý(³o¦³ÂIÃþ¦ü¤ì°¨ªº¼gªk)

  ¦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

¦^´_ 8# stillfish00

¥i¥H·s¼W¤@­Ó´£¥Ü°T¸¹(¦p MSGBOX)
¦¹°T¸¹¦b§PÂ_¹w³]¥Ø¿ýµLÀɮפU®Ú¾Úµ²ªG¶i¦æ¬O§_½Æ»sªº¿ï¶µ

  ¦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 : ­×¦æ­nô½t­×¤ß¡AÂǨƽm¤ß¡AÀH³B¾i¤ß¡C
ªð¦^¦Cªí ¤W¤@¥DÃD