VBA小技集(Office Boole)Public Sub ReadText1() ' Openステートメントを使用 ' 行単位で読み込み Dim FileNumber As Long Dim FilePath As String Dim TextLine As String Dim ar As Variant Dim i As Long Dim gyo As Long FileNumber = FreeFile FilePath = ThisWorkbook.Path & "\test.txt" Open FilePath For Input As #FileNumber gyo = 1 Do While Not EOF(FileNumber) Line Input #FileNumber, TextLine ar = Split(TextLine, ",") For i = 0 To UBound(ar) Cells(gy
VBAで使用できるワークシート関数一覧:エクセルマクロ・Excel VBAの使い方/WorksheetFunction
Excel VBA(エクセル マクロ) 小技集その�D 列幅、行幅調整
Access 関数表 (日付) | アイビースター
