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

[µo°Ý] ¦p¦óÅý¤U©Ô¿ï³æ¿ï¨ú«á¦Û°Ê¸õ¨ìÀx¦s®æ¬Û¹ïÀ³³B?

¦^´_ 30# stillfish00

ÁÂÁ¦^ÂÐ

§Ú¬OExcel 2007 (32¦ì¤¸)

debug StrVdFml ¬O ªÅ¦r¦ê

¶}³]­p¼Ò¦¡§R±¼combobox1¡A¥Î¦Û¤vªºExcel­«·s·s¼W¤@­Ócombobox1¡A¤]¬O¤£¦æ

¦pªG¬O§Ú¦Û¤vEXCELªº°ÝÃD´N¤£­n¦A®ö¶O¤j®aªº®É¶¡¡AÁÂÁ¤j®a
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

¦^´_ 31# c_c_lai

ÁÂÁÂ
³o¤Ó²`¶ø¤F¡A¦³¬Ý¨S¦³À´
°²¤é¦h¤@ÂI®É¶¡§Ú¦A¨Ó¬ã¨s
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

¦^´_ 34# stillfish00


§Ú¤U¸üªºÀɮ׸̬O¨S¦³³] ¸ê®ÆÅçÃÒ²M³æ¡A©Ò¥H¥u­n³]©w¤F  ¸ê®ÆÅçÃÒ²M³æ ´N°õ¦æµL»~¡C

§Ú¨ä¤¤¤ñ¸û¤£À´ªº¬O¡A¬JµM¨Ï¥Î ¸ê®ÆÅçÃÒ²M³æ ¬°¦óÁÙ­n¥Î COMBOBOX ¿ï³æ¡A
¦pªG­n¥Î COMBOBOX ¿ï³æ¤]³]¤FLIST¶µ¥Ø¡AÀ³¸Ó´N¤£»Ý¨Ï¥Î ¸ê®ÆÅçÃÒ²M³æ¤~¹ï¡A
ı±o¦³ÂIµe³D²K¨¬ªº·Pı
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

¦^´_ 38# c_c_lai

§Ú¤U¸ü§A´£¨ÑªºÀɮסASheet2!AÄæ ¬O¨S¦³³]©w ¸ê®ÆÅçÃÒ²M³æ¡A
©Ò¥H Worksheet_SelectionChange §PÂ_©Ò¿ïÀx¦s®æ¨S¦³³]©w ¸ê®ÆÅçÃÒ²M³æ¡A´N¨S¦³§@¥Î

­«³] ¸ê®ÆÅçÃÒ²M³æ Àx¦s¡A¦b¥´¶}¤´·|¦s¦b¡C

µ{¦¡¤¤¦³¤U­±³o¤@¬q¡A¦ý³£¨S¦³³Q©I¥s¡A§Ú¤]¨S¦³¥J²Ó¬ã¨s¡A©Ò¥H¤@ª½¥H¬°VBAÀ³¸Ó·|±N  ¸ê®ÆÅçÃÒ²M³æ ¦Û°Ê³]¦n¡C
Sub CellValidation()      '  stillfish00 ´£¨Ñ
    With Sheets("Sheet2").[A2:A25].Validation
        .Delete
        .Add Type:=xlValidateList, Formula1:="=Sheet1!$A$3:$A$20"
    End With
End Sub

¥H³o¨Ò¤l¥i¯à¤@¶}©l¬O¨Ï¥Î  ¸ê®ÆÅçÃÒ²M³æ ¡A«á¨Ó§ï¥ÎCOMBOBOX¨Ó´À¥N ¸ê®ÆÅçÃÒ²M³æ¡A
Åý§Ú¤@ª½·d¤£²M·¡(VBA¥\¤O¤Ó®z)¡A¬JµM¨Ï¥ÎCOMBOBOX¨Ó·í ÅçÃÒ²M³æ¡A¬°¦ó¤S­n³]©wÀx¦s®æªº  ¸ê®ÆÅçÃÒ²M³æ¡A
·Pı2­Ó¬Û¦P¥\¯à¤¬Å|¦b¤@°_¡C
Á`¤§ÁÂÁ§A¤@ª½­@¤ß¦^ÂЧڪº°ÝÃD¡A·PÁÂ
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

¦^´_ 44# c_c_lai

ÁÂÁ»¡©ú¡A¤w¸g¤F¸Ñ°ÝÃD©Ò¦b
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

        ÀR«ä¦Û¦b : ¡i»X½ªªº¦Û¥Ñ¡j¤H±`¦b¤°»ò³£¥i¥H¦Û¥Ñ¦Û¦bªº®É­Ô¡A«o³Q³oºØÀH¤ß©Ò±ýªº¦Û¥Ñ»X½ª¡AµêÂY®É¥ú¦Ó²@µLıª¾¡C
ªð¦^¦Cªí ¤W¤@¥DÃD