【分享成果，隨喜正能量】讓心情變好的秘訣，就在于讓想不開的事隨煙消散，把心中不快的事丟掉。。
跟我學VBA，我這里專注VBA, 授人以漁。我98年開始，從源碼接觸VBA已經20余年了，隨著年齡的增長，越來越覺得有必要把這項技能傳遞給需要這項技術的職場人員。希望職場和數據打交道的朋友，都來學習VBA,利用VBA,起碼可以提高自己的工作效率，可以有時間多陪陪父母，多陪陪家人，何樂而不為呢？
這講我們繼續學習64位Office API聲明語句第82講，這些內容是MS的權威資料，看似枯燥，但對于想學習API函數的朋友是非常有用的。
Const TYPE_E_INVALIDID=&H800288CF
Const TYPE_E_TYPEMISMATCH=&H80028CA0
Const TYPE_E_OUTOFBOUNDS=&H80028CA1
Const TYPE_E_IOERROR=&H80028CA2
Const TYPE_E_CANTCREATETMPFILE=&H80028CA3
Const TYPE_E_CANTLOADLIBRARY=&H80029C4A
Const TYPE_E_INCONSISTENTPROPFUNCS=&H80029C83
Const TYPE_E_CIRCULARTYPE=&H80029C84
Const STG_E_INVALIDFUNCTION=&H80030001
Const STG_E_FILENOTFOUND=&H80030002
Const STG_E_PATHNOTFOUND=&H80030003
Const STG_E_TOOMANYOPENFILES=&H80030004
Const STG_E_ACCESSDENIED=&H80030005
Const STG_E_INVALIDHANDLE=&H80030006
Const STG_E_INSUFFICIENTMEMORY=&H80030008
Const STG_E_INVALIDPOINTER=&H80030009
Const STG_E_NOMOREFILES=&H80030012
Const STG_E_DISKISWRITEPROTECTED=&H80030013
Const STG_E_SEEKERROR=&H80030019
Const STG_E_WRITEFAULT=&H8003001D
Const STG_E_READFAULT=&H8003001E
Const STG_E_SHAREVIOLATION=&H80030020
Const STG_E_LOCKVIOLATION=&H80030021
Const STG_E_FILEALREADYEXISTS=&H80030050
Const STG_E_INVALIDPARAMETER=&H80030057
Const STG_E_MEDIUMFULL=&H80030070
Const STG_E_ABNORMALAPIEXIT=&H800300FA
Const STG_E_INVALIDHEADER=&H800300FB
Const STG_E_INVALIDNAME=&H800300FC
Const STG_E_UNKNOWN=&H800300FD
Const STG_E_UNIMPLEMENTEDFUNCTION=&H800300FE
Const STG_E_INVALIDFLAG=&H800300FF
Const STG_E_INUSE=&H80030100
Const STG_E_NOTCURRENT=&H80030101
Const STG_E_REVERTED=&H80030102
Const STG_E_CANTSAVE=&H80030103
Const STG_E_OLDFORMAT=&H80030104
Const STG_E_OLDDLL=&H80030105
Const STG_E_SHAREREQUIRED=&H80030106
Const STG_E_NOTFILEBASEDSTORAGE=&H80030107
Const STG_E_EXTANTMARSHALLINGS=&H80030108
Const STG_S_CONVERTED=&H30200
Const RPC_E_CALL_REJECTED=&H80010001
Const RPC_E_CALL_CANCELED=&H80010002
Const RPC_E_CANTPOST_INSENDCALL=&H80010003
Const RPC_E_CANTCALLOUT_INASYNCCALL=&H80010004
Const RPC_E_CANTCALLOUT_INEXTERNALCALL=&H80010005
Const RPC_E_CONNECTION_TERMINATED=&H80010006
Const RPC_E_SERVER_DIED=&H80010007
Const RPC_E_CLIENT_DIED=&H80010008
Const RPC_E_INVALID_DATAPACKET=&H80010009
Const RPC_E_CANTTRANSMIT_CALL=&H8001000A
Const RPC_E_CLIENT_CANTMARSHAL_DATA=&H8001000B
Const RPC_E_CLIENT_CANTUNMARSHAL_DATA=&H8001000C
Const RPC_E_SERVER_CANTMARSHAL_DATA=&H8001000D
Const RPC_E_SERVER_CANTUNMARSHAL_DATA=&H8001000E
Const RPC_E_INVALID_DATA=&H8001000F
Const RPC_E_INVALID_PARAMETER=&H80010010
Const RPC_E_CANTCALLOUT_AGAIN=&H80010011
Const RPC_E_SERVER_DIED_DNE=&H80010012
Const RPC_E_SYS_CALL_FAILED=&H80010100
Const RPC_E_OUT_OF_RESOURCES=&H80010101
Const RPC_E_ATTEMPTED_MULTITHREAD=&H80010102
Const RPC_E_NOT_REGISTERED=&H80010103
Const RPC_E_FAULT=&H80010104
Const RPC_E_SERVERFAULT=&H80010105
Const RPC_E_CHANGED_MODE=&H80010106
Const RPC_E_INVALIDMETHOD=&H80010107
Const RPC_E_DISCONNECTED=&H80010108
Const RPC_E_RETRY=&H80010109
Const RPC_E_SERVERCALL_RETRYLATER=&H8001010A
Const RPC_E_SERVERCALL_REJECTED=&H8001010B
Const RPC_E_INVALID_CALLDATA=&H8001010C
Const RPC_E_CANTCALLOUT_ININPUTSYNCCALL=&H8001010D
Const RPC_E_WRONG_THREAD=&H8001010E
Const RPC_E_THREAD_NOT_INIT=&H8001010F
Const RPC_E_UNEXPECTED=&H8001FFFF
' /////////////////////////
' //
' Winnet32 Status Codes //
' //
' /////////////////////////
' The specified username is invalid.
Const ERROR_BAD_USERNAME=2202&
' This network connection does not exist.
Const ERROR_NOT_CONNECTED=2250&
' This network connection has files open or requests pending.
Const ERROR_OPEN_FILES=2401&
' The device is in use by an active process and cannot be disconnected.
Const ERROR_DEVICE_IN_USE=2404&
' The specified device name is invalid.
Const ERROR_BAD_DEVICE=1200&
' The device is not currently connected but it is a remembered connection.
Const ERROR_CONNECTION_UNAVAIL=1201&
' An attempt was made to remember a device that had previously been remembered.
Const ERROR_DEVICE_ALREADY_REMEMBERED=1202&
' No network provider accepted the given network path.
Const ERROR_NO_NET_OR_BAD_PATH=1203&
' The specified network provider name is invalid.
Const ERROR_BAD_PROVIDER=1204&
' Unable to open the network connection profile.
Const ERROR_CANNOT_OPEN_PROFILE=1205&
' The network connection profile is corrupt.
Const ERROR_BAD_PROFILE=1206&
' Cannot enumerate a non-container.
Const ERROR_NOT_CONTAINER=1207&
' An extended error has occurred.
Const ERROR_EXTENDED_ERROR=1208&
' The format of the specified group name is invalid.
Const ERROR_INVALID_GROUPNAME=1209&
' The format of the specified computer name is invalid.
Const ERROR_INVALID_COMPUTERNAME=1210&
' The format of the specified event name is invalid.
Const ERROR_INVALID_EVENTNAME=1211&
' The format of the specified domain name is invalid.
Const ERROR_INVALID_DOMAINNAME=1212&
' The format of the specified service name is invalid.
Const ERROR_INVALID_SERVICENAME=1213&
' The format of the specified network name is invalid.
Const ERROR_INVALID_NETNAME=1214&
' The format of the specified share name is invalid.
Const ERROR_INVALID_SHARENAME=1215&
' The format of the specified password is invalid.
Const ERROR_INVALID_PASSWORDNAME=1216&
' The format of the specified message name is invalid.
Const ERROR_INVALID_MESSAGENAME=1217&
' The format of the specified message destination is invalid.
Const ERROR_INVALID_MESSAGEDEST=1218&
' The credentials supplied conflict with an existing set of credentials.
Const ERROR_SESSION_CREDENTIAL_CONFLICT=1219&
' An attempt was made to establish a session to a Lan Manager server, but there
' are already too many sessions established to that server.
Const ERROR_REMOTE_SESSION_LIMIT_EXCEEDED=1220&
' The workgroup or domain name is already in use by another computer on the
' network.
Const ERROR_DUP_DOMAINNAME=1221&
' The network is not present or not started.
Const ERROR_NO_NETWORK=1222&
我20多年的VBA實踐經驗，全部濃縮在下面的各個教程中：
【分享成果，隨喜正能量】凡事都要做絕的人，是沒有福氣的。也就是說，你把利益計算得滴水不漏，自然走不長久。你看周圍，太聰明的人難有摯友，太精細的人反倒財路不寬。真正的有福之人，他的慷慨比他的名譽更耀眼奪目。舍得讓人占便宜，實在是處事的大智慧。。
【分享成果，隨喜正能量】讓心情變好的秘訣，就在于讓想不開的事隨煙消散，把心中不快的事丟掉。。
跟我學VBA，我這里專注VBA, 授人以漁。我98年開始，從源碼接觸VBA已經20余年了，隨著年齡的增長，越來越覺得有必要把這項技能傳遞給需要這項技術的職場人員。希望職場和數據打交道的朋友，都來學習VBA,利用VBA,起碼可以提高自己的工作效率，可以有時間多陪陪父母，多陪陪家人，何樂而不為呢？
這講我們繼續學習64位Office API聲明語句第82講，這些內容是MS的權威資料，看似枯燥，但對于想學習API函數的朋友是非常有用的。
Const TYPE_E_INVALIDID=&H800288CF
Const TYPE_E_TYPEMISMATCH=&H80028CA0
Const TYPE_E_OUTOFBOUNDS=&H80028CA1
Const TYPE_E_IOERROR=&H80028CA2
Const TYPE_E_CANTCREATETMPFILE=&H80028CA3
Const TYPE_E_CANTLOADLIBRARY=&H80029C4A
Const TYPE_E_INCONSISTENTPROPFUNCS=&H80029C83
Const TYPE_E_CIRCULARTYPE=&H80029C84
Const STG_E_INVALIDFUNCTION=&H80030001
Const STG_E_FILENOTFOUND=&H80030002
Const STG_E_PATHNOTFOUND=&H80030003
Const STG_E_TOOMANYOPENFILES=&H80030004
Const STG_E_ACCESSDENIED=&H80030005
Const STG_E_INVALIDHANDLE=&H80030006
Const STG_E_INSUFFICIENTMEMORY=&H80030008
Const STG_E_INVALIDPOINTER=&H80030009
Const STG_E_NOMOREFILES=&H80030012
Const STG_E_DISKISWRITEPROTECTED=&H80030013
Const STG_E_SEEKERROR=&H80030019
Const STG_E_WRITEFAULT=&H8003001D
Const STG_E_READFAULT=&H8003001E
Const STG_E_SHAREVIOLATION=&H80030020
Const STG_E_LOCKVIOLATION=&H80030021
Const STG_E_FILEALREADYEXISTS=&H80030050
Const STG_E_INVALIDPARAMETER=&H80030057
Const STG_E_MEDIUMFULL=&H80030070
Const STG_E_ABNORMALAPIEXIT=&H800300FA
Const STG_E_INVALIDHEADER=&H800300FB
Const STG_E_INVALIDNAME=&H800300FC
Const STG_E_UNKNOWN=&H800300FD
Const STG_E_UNIMPLEMENTEDFUNCTION=&H800300FE
Const STG_E_INVALIDFLAG=&H800300FF
Const STG_E_INUSE=&H80030100
Const STG_E_NOTCURRENT=&H80030101
Const STG_E_REVERTED=&H80030102
Const STG_E_CANTSAVE=&H80030103
Const STG_E_OLDFORMAT=&H80030104
Const STG_E_OLDDLL=&H80030105
Const STG_E_SHAREREQUIRED=&H80030106
Const STG_E_NOTFILEBASEDSTORAGE=&H80030107
Const STG_E_EXTANTMARSHALLINGS=&H80030108
Const STG_S_CONVERTED=&H30200
Const RPC_E_CALL_REJECTED=&H80010001
Const RPC_E_CALL_CANCELED=&H80010002
Const RPC_E_CANTPOST_INSENDCALL=&H80010003
Const RPC_E_CANTCALLOUT_INASYNCCALL=&H80010004
Const RPC_E_CANTCALLOUT_INEXTERNALCALL=&H80010005
Const RPC_E_CONNECTION_TERMINATED=&H80010006
Const RPC_E_SERVER_DIED=&H80010007
Const RPC_E_CLIENT_DIED=&H80010008
Const RPC_E_INVALID_DATAPACKET=&H80010009
Const RPC_E_CANTTRANSMIT_CALL=&H8001000A
Const RPC_E_CLIENT_CANTMARSHAL_DATA=&H8001000B
Const RPC_E_CLIENT_CANTUNMARSHAL_DATA=&H8001000C
Const RPC_E_SERVER_CANTMARSHAL_DATA=&H8001000D
Const RPC_E_SERVER_CANTUNMARSHAL_DATA=&H8001000E
Const RPC_E_INVALID_DATA=&H8001000F
Const RPC_E_INVALID_PARAMETER=&H80010010
Const RPC_E_CANTCALLOUT_AGAIN=&H80010011
Const RPC_E_SERVER_DIED_DNE=&H80010012
Const RPC_E_SYS_CALL_FAILED=&H80010100
Const RPC_E_OUT_OF_RESOURCES=&H80010101
Const RPC_E_ATTEMPTED_MULTITHREAD=&H80010102
Const RPC_E_NOT_REGISTERED=&H80010103
Const RPC_E_FAULT=&H80010104
Const RPC_E_SERVERFAULT=&H80010105
Const RPC_E_CHANGED_MODE=&H80010106
Const RPC_E_INVALIDMETHOD=&H80010107
Const RPC_E_DISCONNECTED=&H80010108
Const RPC_E_RETRY=&H80010109
Const RPC_E_SERVERCALL_RETRYLATER=&H8001010A
Const RPC_E_SERVERCALL_REJECTED=&H8001010B
Const RPC_E_INVALID_CALLDATA=&H8001010C
Const RPC_E_CANTCALLOUT_ININPUTSYNCCALL=&H8001010D
Const RPC_E_WRONG_THREAD=&H8001010E
Const RPC_E_THREAD_NOT_INIT=&H8001010F
Const RPC_E_UNEXPECTED=&H8001FFFF
' /////////////////////////
' //
' Winnet32 Status Codes //
' //
' /////////////////////////
' The specified username is invalid.
Const ERROR_BAD_USERNAME=2202&
' This network connection does not exist.
Const ERROR_NOT_CONNECTED=2250&
' This network connection has files open or requests pending.
Const ERROR_OPEN_FILES=2401&
' The device is in use by an active process and cannot be disconnected.
Const ERROR_DEVICE_IN_USE=2404&
' The specified device name is invalid.
Const ERROR_BAD_DEVICE=1200&
' The device is not currently connected but it is a remembered connection.
Const ERROR_CONNECTION_UNAVAIL=1201&
' An attempt was made to remember a device that had previously been remembered.
Const ERROR_DEVICE_ALREADY_REMEMBERED=1202&
' No network provider accepted the given network path.
Const ERROR_NO_NET_OR_BAD_PATH=1203&
' The specified network provider name is invalid.
Const ERROR_BAD_PROVIDER=1204&
' Unable to open the network connection profile.
Const ERROR_CANNOT_OPEN_PROFILE=1205&
' The network connection profile is corrupt.
Const ERROR_BAD_PROFILE=1206&
' Cannot enumerate a non-container.
Const ERROR_NOT_CONTAINER=1207&
' An extended error has occurred.
Const ERROR_EXTENDED_ERROR=1208&
' The format of the specified group name is invalid.
Const ERROR_INVALID_GROUPNAME=1209&
' The format of the specified computer name is invalid.
Const ERROR_INVALID_COMPUTERNAME=1210&
' The format of the specified event name is invalid.
Const ERROR_INVALID_EVENTNAME=1211&
' The format of the specified domain name is invalid.
Const ERROR_INVALID_DOMAINNAME=1212&
' The format of the specified service name is invalid.
Const ERROR_INVALID_SERVICENAME=1213&
' The format of the specified network name is invalid.
Const ERROR_INVALID_NETNAME=1214&
' The format of the specified share name is invalid.
Const ERROR_INVALID_SHARENAME=1215&
' The format of the specified password is invalid.
Const ERROR_INVALID_PASSWORDNAME=1216&
' The format of the specified message name is invalid.
Const ERROR_INVALID_MESSAGENAME=1217&
' The format of the specified message destination is invalid.
Const ERROR_INVALID_MESSAGEDEST=1218&
' The credentials supplied conflict with an existing set of credentials.
Const ERROR_SESSION_CREDENTIAL_CONFLICT=1219&
' An attempt was made to establish a session to a Lan Manager server, but there
' are already too many sessions established to that server.
Const ERROR_REMOTE_SESSION_LIMIT_EXCEEDED=1220&
' The workgroup or domain name is already in use by another computer on the
' network.
Const ERROR_DUP_DOMAINNAME=1221&
' The network is not present or not started.
Const ERROR_NO_NETWORK=1222&
我20多年的VBA實踐經驗，全部濃縮在下面的各個教程中：
【分享成果，隨喜正能量】凡事都要做絕的人，是沒有福氣的。也就是說，你把利益計算得滴水不漏，自然走不長久。你看周圍，太聰明的人難有摯友，太精細的人反倒財路不寬。真正的有福之人，他的慷慨比他的名譽更耀眼奪目。舍得讓人占便宜，實在是處事的大智慧。。