Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

指定した数のスペースを挿入する（Spc 関数）

2016/02/12

指定した数のスペースを挿入

指定した数のスペースを挿入するには、Spc 関数を使います。Spc 関数は、Print メソッドまたは、Print # ステートメントと共に使用します。

【書式】

Spc ( n )

引数・戻り値

n ・・・印刷または表示する前に挿入するスペースの数を指定します（省略不可）。

Spc 関数使用例

サンプルVBAソース 1

　
Sub Sample_Spc1()

    Debug.Print "12345678901234567890"
    Debug.Print "abcde"; Spc(5); "fghij"

End Sub

1

2

3

4

5

6

7

8

　

Sub Sample_Spc1()

Debug.Print "12345678901234567890"

Debug.Print "abcde"; Spc(5); "fghij"

End Sub

　

実行結果 1

サンプルVBAソース 2

　
Sub Sample_Spc2()

    Dim FName As String
    Dim FNumb As Long
    
    FName = "C:\Documents\mydata\test07.txt"
    FNumb = FreeFile
    
    Open FName For Output As #FNumb
        
    Print #FNumb, "abcde"; Spc(5); "fghij"
    
    Close FNumb

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

　

Sub Sample_Spc2()

Dim FName As String

Dim FNumb As Long

FName = "C:\Documents\mydata\test07.txt"

FNumb = FreeFile

Open FName For Output As #FNumb

Print #FNumb, "abcde"; Spc(5); "fghij"

Close FNumb

End Sub

　

実行結果 2

サンプルVBAソース 2 を実行して作成されたファイル（test07.txt）の内容

- VBA基本 Print # ステートメント, Print メソッド, Spc 関数, VBA基本, エクセルVBA

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 指定した値を16進数で表記した文字列に変換する（Hex 関数）

Hex 関数の使い方【書式】 result = Hex ( expressi …

: 式を評価し、結果（真・偽）に応じた式・値を返す（IIf 関数）

IIf 関数の使い方 IIf（アイイフ）関数は、式を評価してその結果（真・偽） …

: カレントフォルダの取得・設定（DefaultFilePath プロパティ）

DefaultFilePath プロパティカレントフォルダとは、ブックを開いた …

: セルのデータを固定長形式で複数のセルに分割する（TextToColumns メソッド・Parse メソッド）

固定長形式でセルを分割 TextToColumns メソッドや Parse メソ …

: 日付時刻：年・月・日を取得（Year、Month、Day 関数）

日付から年・月・日を取得する関数【書式】 date_year = Year ( …

: 配列の要素数を取得する（UBound 関数・LBound 関数）

UBound 関数・LBound 関数【書式】 result = UBound …

: 日付時刻：経過時間を取得（ Timer 関数）

Timer 関数の使い方【書式】 result = Timer () 【戻り値 …

: ポイント単位の値に変換（CentimetersToPoints,InchesToPoints）

CentimetersToPoints メソッドセンチメートル単位の値をポイン …

: XlThemeColor 列挙型

XlThemeColor 列挙定数値内容 xlThemeColorDark …

: 四捨五入・切り上げ・切り捨て・丸め（Round 関数他）

Round 関数（丸め）の使い方【書式】 value = Round ( ex …

PREV: 出力位置、書き込み位置を設定（Tab 関数）
NEXT: ユーザー定義関数：セルを取得する（ThisCell プロパティ）