Home > EA Functions > WorkSheet-Ctrl > EA_InsColA1

EA_InsColA1

機能説明
指定したワークシート上の指定した位置に列を挿入します。

定義
Public Function EA_InsColA1 (
ByRef ea_wsh As Worksheet,
ByVal ea_pos As String
) As Integer

引数
ea_wsh
対象のワークシートオブジェクトを指定します。
ea_pos
挿入対象となる列を指定します。
("A:A,B:B,E:G,....."：カンマ区切りで複数設定可能)

戻り値
挿入成功：(0)が返却されます。
挿入失敗：(1)が返却されます。

使用例
ワークシートのセル(A:A)に列を追加します。 
                                    
Sub Main()
    Dim ea_wsh As Worksheet
    Dim ea_res As Long

    Set ea_wsh = ThisWorkbook.Worksheets("Sheet1")
    ea_res = EA_InsColA1(ea_wsh, "A:A")
    MsgBox "結果:" & ea_res
    Set ea_wsh = Nothing
End Sub
クラウドソーシング「ランサーズ」