Skip to content

VBA

SubとFunctionの違いとPublicとPrivateの違い

マクロの実行ユーザー定義関数戻り値
Sub表示される表示されない返すことができない
Private Sub表示されない表示されない返すことができない
Function表示されない表示される返すことができる
Private Function表示されない表示されない返すことができる

読み取り専用にする

    ActiveWorkbook.Saved = True
    ActiveWorkbook.ChangeFileAccess Mode:=xlReadOnly
    ActiveWorkbook.Saved = False

セル範囲に一括反映

Sub RangePaste()
    Dim rng As Variant    '型はRangeではなくVariant
    rng = Range("A1:J30") 'Setは書かない

    Dim i, j As Integer
    For i = 1 To UBound(rng)
        For j = 1 To 10
            rng(i, j) = "abc"
        Next
    Next

    Range("A1:J30") = rng '反映
End Sub

Rangeオブジェクト

CSV

PDF

PDF保存

マクロでPDF出力

「Microsoft PDF/XPS 保存アドイン」を使って、マクロ記録でコード生成してみる。

Sub PdfFileOut()
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "C:\Temp\hoge.pdf", Quality:=xlQualityStandard, IncludeDocProperties:=True _
        , IgnorePrintAreas:=False, OpenAfterPublish:=False
End Sub

PDFファイルの結合

pdftk *.pdf cat output hoge.pdf

参考

JSON

Webサービス

シェイプ

メモ

AddIns