パソコン関連の書籍等を読んで試したりしながらアウトプットしまくります。

アウトプットしながら学ぶ

「プログラミング」一覧

: 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

複数のシートを選択して印刷画面を開くコードです。

    Sheets(Array("Sheet1", "Sheet2", "Sheet3")).Select
    Application.CommandBars.ExecuteMso "PrintPreviewAndPrint"

1 2	Sheets(Array("Sheet1", "Sheet2", "Sheet3")).Select Application.CommandBars.ExecuteMso "PrintPreviewAndPrint"

ファイル→印刷　をクリックしたときの画面を開くことができるので、微調整して印刷する …

他のファイルの一部をコピーして貼り付けるコード（Excel VBA）

2022/02/12 -EXCELマクロVBA

Excel VBAで他のエクセルファイルを開き、一部を書式を含めてコピペするコードを書きました。

    Dim strPath As String
    Dim wbOpen As Workbook
    
    strPath = "ファイルのパス"
    
    Set wbOpen = Workbooks.Open(strPath)
    wbOpen.Worksheets("Sheet1").Columns("A:D").Copy

    ThisWorkbook.Worksheets("Sheet1").Range("A1").PasteSpecial xlPasteAll
    
    Application.CutCopyMode = False
    
    wbOpen.Close

1

2

3

4

5

6

7

8

9

10

11

12

13

Dim strPath As String

Dim wbOpen As Workbook

strPath = "ファイルのパス"

Set wbOpen = Workbooks.Open(strPath)

wbOpen.Worksheets("Sheet1").Columns("A:D").Copy

ThisWorkbook.Worksheets("Sheet1").Range("A1").PasteSpecial xlPasteAll

Application.CutCopyMode = False

wbOpen.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

プログラマ１５年やってますが、今更、エクセルのマクロはじめました。図書館に行って、「ExcelVBA逆引き大全 600の極意 Office365/2019/2016/2013/2010対応」を借りて …

1 2 3 … 6 次へ »

Copyright© アウトプットしながら学ぶ , 2022 AllRights Reserved Powered by AFFINGER4.