AccessVBA開発 SQL Server のユーザー定義関数(スカラー値関数)確認 生成したユーザー定義関数は、SQL Server Management Studio の プログラミング > 関数 > テーブル値関数 ・スカラー値関数の箇所で見つけることができます。 ユーザー定義関数の作成 ・スカラー関数 (スカラー U... 2019.10.25 AccessVBA開発SQLサーバー未分類
AccessVBA開発 型文字(0♯)-VB- ♯記号などは、「リテラル」というもので型を 暗黙に示すもので、#はDouble型を示す。 Dim i as Double と宣言すれば i はDouble型に決まって いますので♯は要らないが、 稀に Dim i as Variant(何で... 2019.10.25 AccessVBA開発未分類
AccessVBA開発 ステータスバーに進捗状況等の情報を表示させる(Applicationオブジェクト、SysCmd メソッド) <Excel VBA> Application.StatusBar = “こんな感じで表示されます。" <Access VBA> Application.CommandBars("Status Bar").Visible = True ' ... 2019.10.25 AccessVBA開発
AccessVBA開発 砂時計の表示(Hourglass メソッド) (1)マウスポインタの形状を砂時計にする DoCmd.Hourglass True/False (2)いろいろな形状 Screen.MousePointer = 値 【 値 】 0:規定値 1:矢印 3:I字型 7:上下の矢印 9:... 2019.10.25 AccessVBA開発未分類
AccessVBA開発 配列の初期化(ReDim、Preserve、Array、Erase) 可変長配列の場合 ①はじめは、 Dim 配列名() As データ型名 ②後から要素数や次元数を宣言 ReDim 配列名(添字の上限値, ・・・) 配列を初期化する方法 ①Eraseを使って初期化する Erase 配... 2019.10.25 AccessVBA開発
AccessVBA開発 SSMS で設定されているすべてのトリガーを表示するスクリプト SSMS で設定されているすべてのトリガーを表示するスクリプト SELECT sys.triggers.name ,sys.sql_modules.definition FROM sys.triggers INNER JOIN sys.ob... 2019.10.24 AccessVBA開発SQLサーバー
AccessVBA開発 実行時エラー ‘3265’ オブジェクトがコレクションで見つかりませんでした。 レコードセットの値を取得するときに出たエラー。 フィールド名は絶対に間違っていないのになぜ?と思っても 実際にレコードセットのフィールド名を取得してみるのが、賢明。 ---------------------------- Dim i As... 2019.10.23 AccessVBA開発
AccessVBA開発 サブフォームのソース表示順を指定 ●サブフォームのソース表示順を指定 With Me!明細フォーム.Form '並べ替えの基準とするフィールドを設定 .OrderBy = "フィールド名1,フィールド名2 DESC, フィールド名3,フィールド名4" '並べ替えを実行 .O... 2019.10.09 AccessVBA開発未分類
AccessVBA開発 複数の値をフォームからレポートに渡す ●複数の値をフォームからレポートに渡す 【フォーム側】 Dim strOpenArgs As String '別フォームに渡す引数を組み立てる(選択項目、タイトル、日付を渡す) strOpenArgs = Nz(Me.cmb選択.Value... 2019.10.09 AccessVBA開発未分類
AccessVBA開発 目障りな一瞬の画面ちらつきを防止(Application.ScreenUpdatingで更新停止) VBAの画面のちらつきがたった1行で解決して処理も高速化 VBAコード処理の前に Application.ScreenUpdating = False と書いて、画面更新処理を停止します。 最後に(End Sub)の前に Applicati... 2019.10.08 AccessVBA開発