ゆっくり

ゆっくり

記事一覧

【VBA】検索結果一覧

#basicFunction GetCellsAddress( _ ByRef CellsList As Variant _ , ByRef varObject As Variant _ , ByRef What As Variant _ …

ゆっくり
2年前

【VBA】ExcelのDB化

#VBAFunction ExcelDBconnect( _ ByRef ExcelPath As String _ , Optional ByRef HeaderExists As Boolean = True _ ) As Boolean …

ゆっくり
2年前

【VBA】2次元配列の要素追加

#VBA '2次元配列の要素追加Function AddItemsArray( _ ByRef varArray As Variant _ , Optional ByRef AddRows As Integer _ , Optional B…

ゆっくり
2年前

【VBA】存在確認

#VBA '存在確認Function ExistCheck(ByRef パス As String) As Boolean Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") If fso.File…

ゆっくり
2年前

【VBA】拡張子取得

#VBA '拡張子取得Function GetExtension(ByRef パス As String) As String Dim str As String Dim fso As Object Set fso = CreateObject("Scripting.FileSyste…

ゆっくり
2年前

【VBA】文字列分割

#VBA '文字列分割Function SplitString( _ ByRef 対象文字列 As String _ , ByRef 区切り文字列 As String _ , O…

ゆっくり
2年前

【VBA】開始処理、終了処理

#VBASub ApplicationStartSetting( _ Optional ByVal ScreenUpdating As Boolean = False _ , Optional ByVal EnableEvents As Boolean = False _ , O…

ゆっくり
2年前

【VBA】検索結果一覧

#basicFunction GetCellsAddress( _ ByRef CellsList As Variant _ , ByRef varObject As Variant _ , ByRef What As Variant _ , Optional ByRef After As Variant _

もっとみる

【VBA】ExcelのDB化

#VBAFunction ExcelDBconnect( _ ByRef ExcelPath As String _ , Optional ByRef HeaderExists As Boolean = True _ ) As Boolean On Error GoTo Catch Const adOpenKe

もっとみる

【VBA】2次元配列の要素追加

#VBA '2次元配列の要素追加Function AddItemsArray( _ ByRef varArray As Variant _ , Optional ByRef AddRows As Integer _ , Optional ByRef AddColumns As Integer _ ) As Boolean

もっとみる

【VBA】存在確認

#VBA '存在確認Function ExistCheck(ByRef パス As String) As Boolean Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") If fso.FileExists(パス) Then ExistCheck = True Else

もっとみる

【VBA】拡張子取得

#VBA '拡張子取得Function GetExtension(ByRef パス As String) As String Dim str As String Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") str = fso.GetExtensionName(パス) Ge

もっとみる

【VBA】文字列分割

#VBA '文字列分割Function SplitString( _ ByRef 対象文字列 As String _ , ByRef 区切り文字列 As String _ , Optional ByRef 取得位置 As Integer = 1 _ )

もっとみる

【VBA】開始処理、終了処理

#VBASub ApplicationStartSetting( _ Optional ByVal ScreenUpdating As Boolean = False _ , Optional ByVal EnableEvents As Boolean = False _ , Optional ByVal DisplayStatusBar As Boolea

もっとみる