Excel [VBA]

EXCEL

【Excel(64bit) VBA】【Winsock API】recvfrmの第2引数(char* buf)にはVBAからByval string型で渡す必要がある件

3日くらいドはまりした。しかも、あまり納得できていないがそういうものだと思うしかない。そして、調べてみたら、この件について思うことや対応策を考えている人がわずかにいて、安心した。まず前提(自分の思い込みかもしれないが)VB(VBA)を多少か...
EXCEL

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

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

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

Option ExplicitPrivate Const WSA_DESCRIPTIONLEN As Long = 256Private Const WSA_DESCRIPTIONSIZE As Long = WSA_DESCRIPTION...
EXCEL

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

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

【VBA XML操作】ドコモバックアップのファイル復旧

ドコモバックアップでsdbファイル(写真、動画等のファイル)と、xmlファイル(sdbファイル化される前につけられた本来のファイル名、拡張子等が含まれたファイル)に分かれれ保存されたファイルを調査し、最終的にsdbファイルを、xmlファイル...
EXCEL

【EXCEL VBA】0〜9、A~Zの全36種を連続でセル上に取得するサンプル

0〜9、A~Zの全36種を連続でセル上に取得するサンプルSheet1に張り付けて使う。Sub 連番取得ゼロからキューの数値とAからZのアルファベットを表示() Dim i As Long Dim r As Range: Set r = Me...
EXCEL

【Excel VBA】ユーザーフォームTIPS(リストボックスとセルの連動サンプル

VBAでのユーザーフォームサンプルリストボックス(ListBox)とセルを連携させるサンプル①初期化時に、所定のセルと、そのセルのアドレスを保持しておく②リストボックスをクリックする毎に、保存したアドレスの位置を選択させる。このソースには表...
EXCEL

【Excel VBA】4択式マークシート

「MarkSheet.zip」をダウンロードIPAのような4択式問題の勉強用マークシート。電子書籍等で問題を解く時、わざわざノートを使うまではないかなってときに、Excelのセルをクリックするだけで答が選択(マーク)できるようにしている。他...
EXCEL

【Excel VBA】バブルソートのループ処理イメージの骨格

バブルソートのアルゴリズムについて、骨格となるループ処理部分をVBAで表現Sub バブルソートのループ処理イメージ() Dim i As Integer, j As Integer, N As Integer N = 10 '配列数 For...
EXCEL

【VBA】Excelののセルを利用したスタック(Pop/Push)の実装サンプルコード

スタックのイメージと勉強のため調査スタックといえば、後入れ先出し(LIFO: Last In First Out; FILO: First In Last Out)データ入れることをPop、データ出すことをPushと言う。Unixやdosコ...