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

関連記事

: 指定したセル範囲のサイズを変更（Resize プロパティ）

Resize プロパティ指定したセル範囲のサイズ（行数や列数）を変更します。 …

: VBA で正規表現を使う（RegExp オブジェクトのメソッド）

RegExp オブジェクトのメソッド RegExp オブジェクトの詳細に関しては …

: 配列（宣言・要素数の変更について）

配列の宣言【書式】※ 配列の宣言＜Type 型の静的配列（固定長配列）の宣言 …

: 配列の添字の最小値を「1」に設定する

Option Base ステートメントを使用する【書式】 Option Bas …

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

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

: オブジェクトの書式をクリアする（ClearFormats メソッド）

ClearFormats メソッド対象となるオブジェクトの書式（スタイル）を初 …

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

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

: Join 関数（配列の要素を結合）

Join 関数 1次元配列の各要素を指定した区切り文字で連結します。【書式】 …

: 式の値に応じて多分岐を行う（Switch 関数）

Switch 関数の使い方 Switch 関数は、「式・値」を対にして指定して …

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

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

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