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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 変数がNull 値かどうかをチェックする（ IsNull 関数）

IsNull 関数の使い方【書式】 result = IsNull ( exp …

: 文字列：アルファベットを小文字または大文字に変換（LCase 関数,UCase 関数）

LCase 関数・UCase 関数の使い方【書式】＜アルファベットの大文字 …

: カレントフォルダ（CurDir 関数、ChDir ステートメント、ChDrive ステートメント）

カレントフォルダカレントフォルダとは、ブックを開いたり保存するときに既定で参照 …

: メッセージボックスを表示（MsgBox関数）

MsgBox関数【書式】 result = MsgBox ( Prompt [ …

: 日付時刻：数値から日付・時刻データを取得（ DateSerial 関数、TimeSerial 関数）

DateSerial 関数（数値を使って日付データを取得）【書式】 date …

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

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

: 文字列：文字列の長さを取得（ Len 関数、LenB 関数）

Len 関数（文字列の長さを取得）【書式】 result_len = Len …

: 文字列：文字列左から指定文字数取得（Left 関数,LeftB 関数）

Left 関数・LeftB 関数の使い方【書式】 result_left = …

: VBA の演算子（算術演算子）

算術演算子算術演算を行うときに使用する演算子です。 ^（べき乗）、*（積）、/ …

: 文字列：文字列の一部を別の文字列で置換（Replace 関数）

Replace 関数の使い方【書式】 result = Replace ( s …

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