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

関連記事

: 文字列：指定した文字コードに対応する文字を返す（Chr 関数）

Chr 関数の使い方【書式】 result = Chr ( code ) 引数 …

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

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

: フォント太字・斜体（Bold, Italic, FontStyle プロパティ）

太字の設定（Bold プロパティ） Bold プロパティは、フォントを太字にする …

: 文字列：文字列右から指定文字数取得（Right 関数,RightB 関数）

Right 関数・RightB 関数の使い方【書式】 result_righ …

: 色の設定（Color プロパティ・RGB 関数）

Color プロパティ Color プロパティは、指定したオブジェクトの色を取得 …

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

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

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

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

: 取り消し線を設定する（Strikethrough プロパティ)

取り消し線を設定する（Strikethrough プロパティ) Striketh …

: セルのデータを区切り文字で複数のセルに分割する（TextToColumns メソッド）

TextToColumns メソッド TextToColumns メソッドを使用 …

: 日付時刻：日付・時刻の間隔を取得（ DateDiff 関数）

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

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