VBA基本(配列変数の利用)

VBA基本(配列変数の利用)

cvsignore でファイルを無視する(CVS)

CVS--Concurrent Versions System (in japanese) - cvsignore

Powered by ScribeFire.

ディレクトリの追加・削除の反映方法(CVS)

CVS使用法メモ(Hishidama's CVS usage Memo)

Powered by ScribeFire.

ファイルの操作[名前を指定してブックを開く]

Office TANAKA - Excel VBA講座：ファイルの操作[名前を指定してブックを開く]

最終行、最終列の取得

Private Sub CommandButton2_Click()
    Dim y As Long
    Dim x As Integer
    
    y = ActiveSheet.UsedRange.Rows.Count
    x = ActiveSheet.UsedRange.Columns.Count
    MsgBox "最終行は" & y & "行、" & _
                            "最終列は" & x & "列です"
    ActiveSheet.Cells(1, 1).Value = "現在の最終行"
    ActiveSheet.Cells(2, 1).Value = "現在の最終列"
    ActiveSheet.Cells(1, 2).Value = y
    ActiveSheet.Cells(2, 2).Value = x
    ActiveSheet.Columns("A:B").AutoFit 'セル幅を自動で最適化
End Sub