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

関連記事

: 引数が省略されたかどうかをチェックする（ IsMissing 関数）

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

: データ型を調べてそのデータ型を示す文字列を返す（TypeName 関数）

TypeName 関数の使い方 TypeName 関数は、引数に、データ型を調 …

: 文字列：文字列の指定した位置から指定文字数取得（Mid 関数,MidB 関数）

Mid 関数・MidB 関数の使い方【書式】 result_mid = Mi …

: 文字列：文字を指定数並べた文字列を返す（String 関数）

String 関数【書式】 result = String ( number, …

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

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

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

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

: ユーザー定義関数：セルを取得する（ThisCell プロパティ）

入力されたセルを取得するワークシート上で使用する Function プロシージ …

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

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

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

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

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

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

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