Access VBA 質問スレ Part2 (788ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞
35: 2019/03/10(日)17:46:58.02 ID:f/eJ/LOS(2/2) AAS
>>15
Visual Studio ExpressでDLL作れ
85(1): 2019/04/26(金)13:04:47.02 ID:azgsbPV3(1) AAS
新人の頃は良く失敗した
数値フィールドをテキスト型で定義したり
データ、システム分離しなくてmdb破損させたり
手元の最新版壊して顧客PCまで最新版取りに戻ったり
：
130: 2019/11/06(水)06:37:51.02 ID:jiZZUv+M(2/2) AAS
IsNumeric 関数 VBA 外部ﾘﾝｸ:vba-auto.com
9CF
199(2): 2021/01/14(木)16:43:18.02 ID:eeXKDacn(2/2) AAS
>>198
ループ中の AddNew を SQL の INSERT に置き換えたのでしょうか？
インポート対象(9万件程度)を1度の INSERT で行います
Null レコードは Where で除外可能かと思います
現実的なのは SQL 直発行かインポート機能の2択かと思います
インポート機能も定義を固めれば使い物になります
効率というのは人によって変わります
普段からコードに触れている人なら VBA からの SQL 発行が効率的
コードは書かないが Access を使い慣れている人ならインポート機能やクエリ定義が効率的
両者の方法とも取り込み実行時間はほぼ同じです
474: 2022/02/24(木)15:49:02.02 ID:G5PhgONP(1) AAS
>>466
Excel.ApplicationのDefaultFilePathを設定していったん終了したら、
次からそこで開くっぽいぞ
Set exApp = CreateObject("Excel.Application")
exApp.DefaultFilePath = "C:\x\y"
exApp.Quit
Set exApp = CreateObject("Excel.Application")
res = exApp.GetOpenFilename("Csv Files (*.csv), *.csv")
こんな感じか
実行したらエクセルのオプション変わっちまったｗｗ
省1
610: 2023/03/27(月)19:43:31.02 ID:zT0GYsm+(2/2) AAS
>>607
ビットマスクって考え方があって、別にＶＢＡに限った話じゃない
が、VarTypeで18ってリファレンス見る限りないな。
どんな変数がその値だったんだ？
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.034s