＜分類：値抜き取り＞ ＜使用例：123.456という小数点を含む値を整数部(123)と小数部(456)に分ける＞ ＜プログラム例＞ Sub 使用例() Dim s As String Dim rtn1 As String Dim rtn2 As String '123.456 s = "123.456" Call 部品_小数分離(s, rtn1, rtn2) Msg…

＜分類：ファイル作成＞ ＜使用例：Excelファイルのあるフォルダに任意backup￥日付フォルダを作成してワークブックの名前に日付_時間を付けてファイルコピーする＞ ＜プログラム例＞ Sub 使用例() Dim s As String Dim rtn As String '作成するフォルダ名 s…

＜分類：ファイル作成＞ ＜使用例：Excelファイルのあるフォルダにbackup￥日付フォルダを作成してその中に日付_時間(yymmdd_hhnnss).txtのテキストファイルを作成＞ ＜プログラム例＞ Sub 使用例() Dim s As String Dim rtn As String '作成するフォルダ名 …

＜分類：フォルダ作成＞ ＜使用例：Excelファイルのあるフォルダにbackupというフォルダを作成して、さらに日付・時間(YYYYMMDD_HHNNSS)のフォルダを作成する＞ ＜プログラム例＞ Sub 使用例() Dim s As String Dim rtn As String '作成するフォルダ名 s = "…

＜分類：フォルダ作成＞ ＜使用例：Excelファイルのあるフォルダにbackupというフォルダを作成する＞＜プログラム例＞ Sub 使用例() Dim s As String '作成するフォルダ名 s = "backup" Call Excelファイルのあるフォルダに任意のフォルダを作成(s) MsgBox (…