第123回.APIについて（Win32API）
一般的にはAPIは、アプリケーションプログラミングインタフェースのことです。
ソフトウェアコンポーネントが互いにやりとりするのに使用するインタフェースの仕様です。
APIを使用するには、
まず、Declareステートメントで宣言が必要となります。
Declare ステートメン
モジュール レベルで使います。
APIごとに引数の指定が違いますし、つまりは引数の指定方法が知りたいはずです。
使いたいAPIのサンプルを書籍やネットで探して、基本的にはそのまま使えば良いでしょう。
ネット等のサンプルは、その多くが32Bit版ですので、適宜PtrSafeキーワードを追加します。
また、
アドレス参照(ポインターおよびハンドルを格納する場合) の引数は、
32Bit版では、Long型ですが、
64Bit版では、LongPtr型 または Longlong型になります。
32ビットシステムでは、符号付き32ビット (4 バイト) の数値
64ビットシステムでは、符号付き64ビット (8 バイト) の数値
APIの中には、LongPtr型ではなくLonglong型を指定しなければならないものもあるようです。
つまり、2010以降でしか使わないのであれば、
PtrSafe キーワードは必ず入れておけば良いことになります。
APIの使用例
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
'64bit版のExcelの場合は、以下のようにPtrSafeを付けて下さい。
'Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Sub untilReady(objIE As Object)
Dim starttime As Date
starttime = Now()
Do While objIE.Busy = True Or objIE.ReadyState <> READYSTATE_COMPLETE
Sleep 100
DoEvents
If Now() > DateAdd("S", 10, starttime) Then
Exit Do
End If
Loop
End Sub
Sleepはプログラムを任意の時間だけ待機させることができ ます。
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
これで定義し、
Sleep 100
これで、100ミリ秒待機させています。
いろいろなAPIについて
よく使われる一部の Windows API をリストし、日本語ドキュメントと英語ドキュメントへのリンクを案内しています。
Windows API リスト
良く使うと書かれていても、膨大な数になっています。
この中から目的の機能を持ったAPIを探すというのは厳しいとは思いますが、いつか役に立つこともあるかと思い掲載しておきます。
ConnectToConnectionPoint
GdiplusStartup,GdiplusShutdown,
GdipLoadImageFromFile,GdipGetImageDimension
SetTimer,KillTimer
OpenClipboard,EmptyClipboard,CloseClipboard,IsClipboardFormatAvailable,
GetClipboardData,SetClipboardData,GlobalAlloc,GlobalLock,GlobalUnlock,GlobalSize,lstrcpy
RtlMoveMemory
GetSystemMetrics
GetDesktopWindow,GetDC,GetDeviceCaps,ReleaseDC
keybd_event
Sleep,Beep
GetInputState
URLDownloadToFile
SHCreateDirectoryEx,MakeSureDirectoryPathExists
mciGetErrorString,mciGetErrorString
GetCursorPos
同じテーマ「マクロVBA入門」の記事
第120回.OnTimeメソッド
第121回.SendKeysメソッドとAppActivateステートメント
第122回.Shell関数
第123回.APIについて（Win32API）
第124回.Workbookのイベントプロシージャー
第125回.Worksheetのイベントプロシージャー
第130回.テーブル操作の概要（ListObject）
第131回.テーブル操作のVBAコード（ListObject,DataBodyRange）
第142回.テーブル全件処理とデータ最終行（ListObject,DataBodyRange）
第127回.他のブックのマクロを実行（Runメソッド）
第128回.マクロをショートカットで起動（OnKeyメソッド）
新着記事NEW ・・・新着記事一覧を見る
列全体を指定する時のRangeとColumnsの違い｜ツイッター出題回答 (2023-09-24)
シートのActiveXチェックボックスの指定方法｜ツイッター出題回答 (2023-09-24)
ByRef引数の型が一致しません。｜ツイッター出題回答 (2023-09-22)
シートコピー後のアクティブシートは何か｜ツイッター出題回答 (2023-09-19)
Excel関数の引数を省略した場合について｜ツイッター出題回答 (2023-09-14)
セル個数を返すRange.CountLargeプロパティとは｜VBA技術解説(2023-09-08)
記号を繰り返してグラフ作成（10単位で折り返す）｜ツイッター出題回答 (2023-08-28)
シートを削除：不定数のシート名に対応｜VBAサンプル集(2023-08-24)
ランクによりボイントを付ける（同順位はポイントを分割）｜ツイッター出題回答 (2023-08-22)
OneDrive使用時のThisWorkbook.Pathの扱い方｜VBA技術解説(2023-07-26)
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得（End,Rows.Count）｜VBA入門
2.RangeとCellsの使い方｜VBA入門
3.繰り返し処理（For Next)｜VBA入門
4.変数宣言のDimとデータ型｜VBA入門
5.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
6.マクロとは？VBAとは？VBAでできること｜VBA入門
7.ブックを閉じる・保存（Close,Save,SaveAs）｜VBA入門
8.並べ替え（Sort）｜VBA入門
9.Range以外の指定方法（Cells,Rows,Columns）｜VBA入門
10.条件分岐（IF）｜VBA入門
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。