VBA・Office

VBA・Office

【VBA】【Excel(64bit)】WinSockのエラーコードの取得方法まとめ(WSAStartup時は戻り値、WSAStartup成功後はErr.LastDllErrorを使うこと、 VBAではWSAGetLastErrorは使えないぞ!)

C言語系のサンプルコードでは、Winsock関連のエラーコード(詳細)を取得する場合、Microsoftのドキュメント通り、WSAGetLastError()を使うコードが散開している。(一例)if(SOCKET_ERROR==(RecvS...
VBA・Office

【EXCEL】【TIPS】INDIRECT関数で別シートのデータを連続で引用する際にAUTOFILLが使える関数

INDIRECTで別シートのデータを連続で引用したい場合、ROW()関数と組み合わせると実現できる。Sheet1のA列の複数行を引用しようとした例=INDIRECT("Sheet1!$A"&ROW())
VBA・Office

【Excel】【TIPS】SUBTOTALとオートフィルタを使った連番を使う際、データの最終行が範囲から外れフィルターの結果に常に表示される不具合が出た場合は、SUBTOTALを組み込んだ連番付与列をオートフィルター対象から外す。

オートフィルタとSUBTOTAL(例:=SUBTOTAL(3,$B$2:B2) )を使った連番をつける場合で、ドはまりした。データが大量にあったためか、データの連続性を確認するとか、データを補正する状況ではない。どうしたらいいか、ずっど悩ん...
VBA・Office

【VBA】【Excel(64bit)】WinSockの起動(WSAStartup) と終了(WSACleanup)サンプル

Option ExplicitPrivate Const WSA_DESCRIPTIONLEN As Long = 256Private Const WSA_DESCRIPTIONSIZE As Long = WSA_DESCRIPTION...
VBA・Office

【Excel】【VBA】内閣府のHPから祝日情報をダウンロードしてExcel出力

仕事で、祝日を取得する必要があったのでちょっとツールを作成参照設定Microsoft XML を参照設定する。VBAのコードXMLHTTPオブジェクトの機能で、内閣府のHPから祝日情報(CSVファイル)をダウンロードする。ダウンロードしたフ...
VBA・Office

【EXCEL】【VBA】Application.OnTimeを利用し指定時間経過後にサブプロセスを実行する例

Option ExplicitSub Main() Application.OnTime Now + TimeValue("00:00:10"), "SubProc" MsgBox "Main 実行"End SubPrivate Sub S...
VBA・Office

OpenObjectメソッドを活用したサンプルコード集

' Reference to Microsoft ActiveX Data Objects 2.5 Library' Reference to Microsoft CDO for Windows 2000 LibraryFunction L...
VBA・Office

【VBA】【Excel】CDO.Messageを使ったメール解析プログラム例

Sub メール解析sample() '参照設定 Microsoft CDO for Windows 2000 Library Dim CDOMsg As CDO.Message Dim Ws As Worksheet Dim RowInde...
VBA・Office

【VBA】【Word】Word 文書に改ページを挿入する

この記事では、VBScriptまたはVBAを使用して Word 文書を自動作成し、任意の場所に改ページを挿入する方法と、InsertBreak メソッドで使用できる定数の一覧を解説します。前提条件・実行環境検証環境:Windows 10 /...
VBA・Office

【Excel】【VBA】ADODB.Streamを利用したコード変換機能付きCSVファイル出力

Excel VBAでADODB.Stream(Microsoft ActiveX Data Objects)を利用すると、文字コードを明示的に指定しながらCSVファイルを出力することができます。Windows(Excel)以外のシステムへC...