Home > EA Functions > WorkSheet-Ctrl > EA_BackUpSH

EA_BackUpSH

機能説明
指定したワークシートのバックアップを行います。バックアップ先のワークシート名は通番が振られカウントアップします。

定義
Public Function EA_BackUpSH (
ByRef ea_wb As Workbook,
ByVal ea_shnm As String
) As String

引数
ea_wb
対象のワークブックオブジェクトを指定します。
ea_shnm
バックアップ対象となるワークシート名を指定します。

戻り値
ワークシート名：("Sheet1")を指定した場合、("Sheet1_1")となります。
("":空白)：バックアップの対象となるワークシートが存在しない場合

使用例
指定したワークシート("Sheet1")を複製します。 
                                    
Sub Main()
    Dim ea_wb As Workbook
    Dim ea_bkshnm As String
    
    Set ea_wb = ThisWorkbook
    ea_bkshnm = EA_BackUpSH(ea_wb, "Sheet1")
    MsgBox "結果:" & ea_bkshnm
    Set ea_wb = Nothing
End Sub
クラウドソーシング「ランサーズ」