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

[µo°Ý] §Ú¥ý°Ý §Ú³o¬q¥¨¶°­n¦p¦ó¥[¤W¦Û°Ê½T»{¸ò§å¦¸¶×¥X

[µo°Ý] §Ú¥ý°Ý §Ú³o¬q¥¨¶°­n¦p¦ó¥[¤W¦Û°Ê½T»{¸ò§å¦¸¶×¥X

Function ¶×¥X()
On Error GoTo ¶×¥X_Err

    DoCmd.OutputTo acOutputQuery, "abc", "ExcelWorkbook(*.xlsx)", "", False, "", , acExportQualityScreen


¶×¥X_Exit:
    Exit Function

¶×¥X_Err:
    MsgBox Error$
    Resume ¶×¥X_Exit

End Function





°²³]§Úªº¬d¸ßªí20­Ó  ¦p¦ó§å¦¸¶×¥X   ½Ð±Ð¦U¦ì¤j¤j

        ÀR«ä¦Û¦b : ¤@­Ó¤H¤£©È¿ù¡A´N©È¤£§ï¹L¡A§ï¹L¨Ã¤£Ãø¡C
ªð¦^¦Cªí ¤W¤@¥DÃD