デスクトップパスの取得
Dim WSH As Object Dim strPath as string Set WSH = CreateObject(“WScript.Shell”) strPath = WSH.Spec […]
カテゴリー: Access開発備忘録
ADO/DAO 宣言とコネクション
ADOの場合 Dim cnn As ADODB.Connection Set cnn = CurrentProject.Connection ※ライブラリの参照設定で、「Microsoft ActivX Data Obj […]
文字変換
・大文字に変換?strconv(“あいうえお12345ABCDEabcde”,vbUpperCase)あいうえお12345ABCDEABCDE ・小文字に変換?strconv(“あいう […]
日付関連色々
・Date ＝ 日付だけ Now ＝ TimeStamp ?date,now 2021/04/26 2021/04/26 10:55:16 ・対象の日付から、XX日後、XX月後、XX年後 の日付の取得（マイナス値でXX前 […]
画像の表示
画像を表示させるには、「イメージ」コントロールを設置する。OLEサイズの選択で表示が変わる。「クリップ」→図のサイズがコントロールのサイズより大きい場合は切れて表示「ストレッチ」→コントロールのサイズに合わせて図の縦横比 […]
テーブルの種類
Accessの利点はAccess以外のDatabaseやDatabase以外のものもテーブルとして使用できる点にある。 上記のオブジェクトウィンドウの①以外はアイコンに「⇒」がついているが、「⇒」はリンクテーブルのマーク […]
Query に任意の値をパラメータで渡す
VBAでQueryに任意の値をパラメータで渡す方法。 Queryにパラメータを追加し、そのパラメータの値を使ったクエリーを作成する。
LISTBOXテクニック
・リストボックスをクリアする ・リストボックスの値を取得する
REPORT の小技
・レポートの背景のシマシマを消したり、シマシマの色を変更する 背景のシマシマを消すには → 「代替の背景色」を「背景色」と同じにする 背景のシマシマの色を変更するには → 「代替の背景色」または「背景色」の色を変更する […]
一時的にクエリをVBAで作成する
※↑でQuery がうまく削除されずに残ったままになっている場合はエラーになるので、OnErrorの処理で以下を入れておく。 ERR_EXT: If Err.Number = 3012 Then CurrentDb […]