株式会社CONFRAGE ITソリューション事業部

VBAでHiddenプロパティを使用して行の表示非表示を切り替えることができます。Rangeオブジェクト.Rows.Hiddenをtrueにすると非表示になります。以下、例です。Sub macro() Dim rng As Range Se...

VBAで全シートを取得するにはWorksheetsオブジェクトで簡単に取得することができます。Sub macro() For Each ws In Worksheets Debug.Print ws.Name Next wsEnd Sub結...

VBAには動的配列があると言いました。動的配列はReDimステートメントを使用して配列の要素数を変更することができますが、再度、要素数を変更すると全要素は破棄されます。以下、例です。Sub macro() Dim arr() As Stri...

VBAには動的配列と言うのが存在します。宣言方法は以下のように宣言します。Dim arr() As Variant動的配列の初期化はArray関数を使用して以下のように初期化することができます。Array関数で初期化する場合は、配列はVar...

VBAの配列とArray関数の使い方についてまとめてみます。まず配列の宣言方法です。Dim arr(3) As VariantVBAでの配列の基底値は0ですが、他の言語と違って0,1,2,3と4つインデックスを持つ配列になります。以下、例で...

VBAのFor Each文は以下のように記述します。For Each i In 配列' 処理Next i以下、具体的な例です。Sub macro() For Each i In Array(1, 2, 3) Debug.Print i Ne...

VBAでCHR(9)というのを良く見かけますが、これはなんでしょう。以下、サンプルソースです。Sub macro15()Dim txt As Stringtxt = "A" & Chr(9) & "B"Debug.Print txtEnd ...

VBAでFormulaプロパティでセルの計算式を取得するには以下のように記述します。Sub macro() Dim txt, i Set txt = Range("D9:D10") For Each i In txt Debug.Print...

VBAでTextプロパティでセルの値を取得するには以下のように記述します。Sub macro() Dim txt, i Set txt = Range("D9:D10") For Each i In txt Debug.Print i.Te...

VBAでSelectメソッドでセルを選択するには、以下のように記述します。範囲を選択するには("A1:A3")というように:で範囲を区切ります。Sub macro() Range("A1:B3").SelectEnd Subこのマクロを実行...

VBAで指定されたセルへ移動するには、ApplicationオブジェクトのGotoメソッドを使用します。以下のように記述します。Sub macro() Application.Goto ActiveSheet.Range("A1")End ...

VBAでUsedRangeを使用してセル範囲を取得することができます。以下のエクセルがあるとします。3行4列を使用しているのがわかると思います。この範囲を取得するには以下のように記述します。Sub macro()Dim rg As Rang...

VBAでWorksheetオブジェクトを宣言するには以下のように記述します。Sub macro() Dim ws As Worksheet Set ws = ActiveSheet Debug.Print ws.NameEnd SubWor...

VBAでInStrを使用して指定文字位置を返します。Sub macro Dim str = As String str = "aiueo" Debug.Print InStr(str, "u") Debug.Print InStr(str,...

VBAで小文字を大文字に変換するには、UCaseを使用します。大文字を小文字に変換するにはLCaseを使用します。Sub macro() Debug.Print UCase("abc") Debug.Print LCase("DEF")En...

VBAでFreeFile関数を使用してファイル出力します。Sub Macro1() Dim n As Integer n = FreeFile Open "D:\work_vba\a.txt" For Output As #n Print ...

VBAでイミディエイトウィンドウを開くには、「表示」-「イミディエイトウィンドウ」で表示します。もしくは、Ctrl + gで、イミディエイトウィンドウが表示されます。

VBAの改行コードはvbLfです。Sub Macro1() Debug.Print "a" & vbLf & "b"End Subイミディエイトウィンドウには以下のように表示されます。ab

VBAで文字列連結をするには&で連結します。Sub Macro1() Debug.Print "a" & "b"End Subイミディエイトウィンドウには以下のように表示されます。ab

VBAで現在開いているエクセルの保存先フルパスを取得するにはSub Macro1() Debug.Print ThisWorkbook.PathEnd Subで取得します。

VBAでTSVファイル読み込み

VBAでCSVファイル読み込みます。CSVファイルを読み込むにはWorkbooks.OpenText Filename:="c:\work_vba\a.csv", _DataType:=xlDelimited, _comma:=Trueとす...

VBAでフォルダを作成することができます。Dim fso As ObjectSet fso = CreateObject("Scripting.FileSystemObject")fso.CreateFolder ("c:\vba")vba...

VBAでハイパーリンクを作成するには、for文でループしてActiveSheet.Hyperlinks.Add anchor:=Range("A" & i), Address:="", SubAddress:=Worksheets(i).N...