■サンプルフロー ■⑤-Aの中身

マクロに渡す引数をExcelの引数リストから渡す ■引数リスト ■実行するマクロのコード Function fncTest(strArg1 As String, intArg2 As Integer, dobArg3 As Double, dateArg4 As Date) As String Dim intResult As Integer Dim doubleResult As Double Dim …

VBA ファイルシステムオブジェクト・TextStreamオブジェクトの主なプロパティとメソッド - ray88’s diary■サンプルコード Dim Fso 'ファイルシステムオブジェクト格納用 Dim St 'テキストストリームオブジェクト格納用 Dim buf '１行分の文字列格納用 Dim da…

※TextStreamオブジェクトを取得するにはこちら↓ VBA ファイルシステムオブジェクト・OpenTextFile - ray88’s diary ※FileSystemObjectのプロパティとメソッド一覧↓ VBA FileSystemObjectの主なプロパティとメソッド - ray88’s diary■TextStreamオブジェクト…

Stream オブジェクト内の現在の位置を取得、または設定する。 【書式】 ＜取得＞ long = object.Position ＜設定＞ object.Position = long object ・・・ 対象となる Stream オブジェクトを指定します。 long ・・・ Stream オブジェクト内の位置を示す長整…

ファイルの文字コードを指定する 【書式】 object.Charset = CharacterCode object ・・・ 対象となる Stream オブジェクトを指定します。 CharacterCode ・・・ 文字コードを表す文字列（String 型）を指定します。 （例）UTF-8、Shift_JIS、euc-jp、ISO-20…

Stream オブジェクト内のデータ型（テキスト or バイナリ）を設定する。 【書式】 object.Type = StreamType object ・・・ 対象となる Stream オブジェクトを指定します。 StreamType ・・・ StreamTypeEnum 列挙型の定数またはその値を指定します。 【引数…

Stream オブジェクトにバイナリデータまたはテキストデータを書き込みます。 【書式】 object.Write Buffer object.WriteText Data [ ,Options ] bject ・・・ 対象となる Stream オブジェクトを指定する。 Buffer ・・・ Stream オブジェクトに書き込むバリ…

Stream オブジェクトから指定したバイト数または文字数のデータを読み取る。 【書式】 object.Read [ NumBytes ] object.ReadText [ NumChars ] object ・・・ 対象となる Stream オブジェクトを指定します。 NumBytes ・・・ ファイルから読み取るバイト数…

EOS プロパティ :Stream オブジェクト内の現在の位置が末尾かどうかを確認する。 SetEOS メソッド:Stream オブジェクト内の位置をを末尾に設定する。【書式】 ＜末尾かどうかを確認＞ boolean = object.EOS ＜末尾に設定＞ object.SetEOS object ・・・ 対象…

■ADODB.Stream SaveToFileメソッド Stream オブジェクトの内容を指定したファイルに保存します。 object.SaveToFile FilePath [, SaveOptions] object ・・・ 対象となる Stream オブジェクトを指定する。 FileName ・・・ ファイルの名前を文字列型（String…

■ADODB.Stream LoadFromFileメソッド 指定したファイルの内容を Stream に読み込む。 【書式】 object.LoadFromFile FilePath object ・・・ 対象となる Stream オブジェクトを指定する。 FileName ・・ ファイルパスを文字列型（String）で指定する 指定し…

【書式】 object.Open object.Close ※object ：対象となる Stream オブジェクトを指定します。 VBA ADODB.Stream - ray88’s diary

■ADODB.Streamのバインディング方法 '＜CreateObjects 関数を使用する場合＞ Dim st As Object Set st = CreateObject(“ADODB.Stream”) '＜参照設定を行う場合＞ Dim st As ADODB.Stream Set st = New ADODB.Stream ※参照設定の場合 Excel2003 以前では、Mic…

■CSV→Excelへ変換するには、ただ単にファイル拡張子の変更して保存するっていう方法をとる人もいますが、 それですとデータ上よくないこともありそうなので（数値の先頭の０が欠けるとか）、一旦テキストファイルを読み取ってExcelへ書き込む形式で変換 ■呼…

参考URL Thisworkbook.PathがURLを返すようになった時の対応 - Excelが大好きだ！ VBAでOneDriveに保存してあるファイルのパスが「https://d.docs.live.net/」になって困った時の解決法はコレだ | 気楽生活 - OFFICE & OUTDOOR - [Excel][VBA] OneDrive 下に…

Option Explicit Public Sub createExcelFileTest() Dim newBookName As String Dim newBookPath As String Dim newBook As Workbook '新しいファイルの名前を指定 newBookName = "test.xlsx" '新しいファイルのフルパスを設定 newBookPath = ThisWorkbook.P…

■VBScript で起動時に指定された引数を取得するには Wscript.Arguments プロパティに格納された WshArguments コレクションを使用する。 以下の書式で引数の値を取得することができる。 '1 個目の引数はインデックス 0 に格納される。 変数 = Wscript.Argume…

■簡単に覚書 ・セルの日付を読み取る際、Excel関数により日付が表示されている場合はWorkBook のReadCellでは読み取れない場合がある。ExcelApplicationScopeのReadCellでは 読み取れる。また、プロパティの「表示形式を保持」に☑をいれておくと値取得時 に…

■Cronスケジュールのパターン 各サブフィールドをスペースで区切る形式で記述する。 (例)「毎週水曜日の午後 12:00」をスケジュールする場合：「 0 0 12 ? * WED 」と記述 ■各サブフィールドで使用可能な値 ■サブフィールドには範囲やリストを指定することも…

■参考URL https://knowledge.bizrobo.com/hc/ja/articles/360034654472-Cron-%E3%82%AF%E3%83%BC%E3%83%AD%E3%83%B3-%E5%BD%A2%E5%BC%8F%E3%81%AE%E3%82%B9%E3%82%B1%E3%82%B8%E3%83%A5%E3%83%BC%E3%83%AB