-
-
Excel VBAでLoop処理中にキーボードなどで割り込むと処理が止まってしまう場合の対処法
2022/08/02 -EXCELマクロVBA
Excel VBAでLoop処理中にキーボードなどで割り込むと処理が止まってしまう場合の対処法です。 以下のようなLoop処理を作った場合の話です。 Do 処理 DoEvents Loop 処理のとこ …
-
-
Excel VBAで列のアルファベットを取得するコード
2022/03/13 -EXCELマクロVBA
Excel VBAで列のアルファベットを取得する方法です。 こんな表があるとします。 会員番号 名前 1 やまだ 2 いとう 3 ごとう 会員番号はA列、名前はB列です。 名前の列のアルファベットを取 …
-
-
複数のシートを選択して印刷画面を開くコード(Excel VBA)
2022/02/12 -EXCELマクロVBA
複数のシートを選択して印刷画面を開くコードです。
12Sheets(Array("Sheet1", "Sheet2", "Sheet3")).SelectApplication.CommandBars.ExecuteMso "PrintPreviewAndPrint"ファイル→印刷 をクリックしたときの画面を開くことができるので、 微調整して印刷する …
-
-
他のファイルの一部をコピーして貼り付けるコード(Excel VBA)
2022/02/12 -EXCELマクロVBA
Excel VBAで他のエクセルファイルを開き、一部を書式を含めてコピペするコードを書きました。
12345678910111213Dim strPath As StringDim wbOpen As WorkbookstrPath = "ファイルのパス"Set wbOpen = Workbooks.Open(strPath)wbOpen.Worksheets("Sheet1").Columns("A:D").CopyThisWorkbook.Worksheets("Sheet1").Range("A1").PasteSpecial xlPasteAllApplication.CutCopyMode = FalsewbOpen.Closeコピー対象のファイルを …
-
-
Rubyでメールの添付ファイルを保存する方法
2021/12/18 -Ruby
プログラムでメールを送信する方法はよく紹介されていますが、メールを受信して添付ファイルを保存する方法はあまり紹介されていません。 VB.netでもソケットを使って、自分でPOP3クライアントを作成した …
-
-
VBAでフォルダ内のCSVファイルを全部新しいSheetとして追加するコード
2020/12/27 -EXCELマクロVBA
VBAでフォルダ内のCSVファイルを全部新しいSheetとして追加するコードを書きました。 月ごとのCSVファイルを一つのワークブックに追加したいときに便利です。 [crayon-62f4dd6cc1 …
-
-
VBAでシートのデータの最終行、最終列を取得するコード
2020/12/26 -EXCELマクロVBA, プログラミング
を書きました。 以前は、最終行までループさせるために、上から順番に見ていって、 空欄があったら終わりという方法でチェックしていましたが、 もっと良い方法を見つけました。 以下のコードだと、空欄があって …
-
-
VBAでフォルダのプロパティのサイズ、ファイル数、フォルダ数を取得するコード
2020/12/19 -EXCELマクロVBA
VBAでフォルダのプロパティのサイズ、ファイル数、フォルダ数を取得するコードを書きました。 フォルダを右クリックして、プロパティを表示するときと似たような内容を取得することができます。 フォルダサイズ …
-
-
VBAでコンパイルエラーのダイアログを非表示にする方法
2020/12/19 -EXCELマクロVBA
VBAでコードを書いていると、いちいちコンパイルエラーのダイアログがでてめんどくさいです。 パラメータにセットする値を、コピペしようと思ったら、ダイアログが出てOKを押して作業するのは面倒です。 とい …
-
-
「このプロジェクトのマクロは無効に設定されています。」の対処法(Microsoft Excel for Microsoft 365)
2020/11/12 -EXCELマクロVBA
プログラマ15年やってますが、今更、エクセルのマクロはじめました。 図書館に行って、「ExcelVBA逆引き大全 600の極意 Office365/2019/2016/2013/2010対応」を借りて …