ブログ レンタルサーバー

2021/8/1

初心者向けレンタルサーバーを選ぶなら!ロリポップorXSERVER?

初心者向けのレンタルサーバーを選定する上で人気のレンタルサーバー「ロリポップ」と「XSERVER」。   悩む女性1 でも、どっちを選んだらいいの? 以外とわからない方も多いかと思います。 そこで、ロリポップとXSERVERのどちらを選んぶとよいのか。その比較ポイント・レンタルサーバーの選び方についてその実体験をもとに解説していきましょう。   但し、初心者向けと言えども、本気でブログやサイトを立ち上げたい方向けです。 検索エンジン最適化(SEO)戦略向けに上位表示。人に見られるサイト ...

ReadMore

プログラミング

2021/7/29

Power BIとは?利用用途・メリット・デメリットを徹底解説

業務を最大限効率化したり、ビッグデータを取り扱う際に効果的な方策の一つに「Power BI」というツールがあります。 しかし、その利用用途や利用メリットやデメリットを知らない方も少なくありません。 そこで本章では、このPower BIの利用用途やメリット・デメリットについて詳しく解説していきます。   目次1 Power BIとは1.1 Power BIでできること2 Power BIの種類3 ExcelでできなくてPower BIでできること4 Power BIの利用するメリット・デメリット4 ...

ReadMore

チャーガ 健康法・ケア

2021/7/28

チャーガに含むβグルカン!高免疫力・高癌抑制効果おすすめサプリ5選

高免疫力や癌の抑制効果、ダイエット効果など、様々な健康効果が期待され、国内需要が高まってきているチャーガ(カバノアナタケ)茶。   しかし、癌抑制効果が高いのはチャーガなどのお茶だけではないことをご存じでしたか。 癌が治るとされているチャーガにはβグルカンという成分が含まれており、この成分にその癌抑制効果や健康効果が高く、需要がいっそう拡大してきています。   そこで、品質は当然のこと、そのチャーガのみならず、このβグルカンを多く含む癌抑制効果や健康効果の高いサプリメントを厳選してご紹 ...

ReadMore

エクセル関数 プログラミング

2021/7/26

【初心者向け】Power BIおすすめ教本5選!使い方が手軽に分かる

  データサイエンティストが利用されると言われる「Power BI」。しかし、その機能や使い方も知らない方も多いのが実情です。 そこで、Power BIの機能性や利用メリットなどを理解するためにはどんな教本がおすすめなのか、初心者でもわかりやすいおすすめ教本5つ厳選してご紹介していきます。   目次1 Power Biを購入する前に知っておきたい3つのポイント2 Power Biを始める際の教本の選定ポイントは?3 Power BIの使い方が初心者でも基礎からわかる!おすすめ教本ランキ ...

ReadMore

映画 洋画

2021/7/15

海外映画『トゥモロー・ウォー』フル動画を無料視聴するならこれ一択!おすすめの視聴方法とは

最新人気映画「トゥモロー・ウォー」。海外のフル動画で見たり、無料視聴する方法にはあらゆる視聴方法が普及してきています。 そんな中でも、こんな悩み。 悩む女性1 海外映画無料視聴したい。 映画が今すぐ見たい。 借りに行くのが面倒くさい。 簡単にフル動画をみたい。   そんな海外映画を見て、有意義なひと時を過ごしたい。そんなふうに感じる事もあるかと思います。そこで、海外映画を無料視聴する方法やフル動画を見る方法があるのか。そんな悩みについて解説していきましょう! 管理者   また海外映画を ...

ReadMore

テレワーク 生活情報

2021/7/28

テレワーク業務効率10倍UP!コスパ最強おすすめ便利グッズ8選

  COVID19の影響に伴って加速する「テレワーク・在宅勤務」。   悩む女性1 しかし、実際に自宅で仕事をしてみると、案外仕事ができる環境じゃなくて、仕事が捗らない! そこで、このテレワークで充実した仕事ができるような環境を整備することも非常に大切です。 私もテレワークは、とても小さい椅子と縦長の狭い机でパソコン2台を使って作業をしていたので、非常にやりづらさを感じていました。   そこで、心機一転テレワーク環境を整備するためにデスクやチェア、PCガジェットを購入して、非 ...

ReadMore

AFFINGER6 Wordpress

2021/7/12

【AFFINGER6】購入者限定10大特典付き!初心者向けおすすめアイコン・戦略あり

当サイトからAFFINGER6(ACTION)をご購入頂いた方のために、当サイトでしか受け取れない購入者限定特典をお付けして、皆様のブログ運営を全力でサポートさせて頂きます。 またそれ以外にも、ブログで大切なことはいったいなんなのか、その根源を教える内容を盛り込んでご紹介していこうと思います。   目次1 「AFFINGER6(ACTION)」について2 購入する前に「AFFINGER6」の魅力を知ろう!3 AFFINGER6-当サイト限定10購入者特典について3.1 AFFINGER6当サイト ...

ReadMore

AFFINGER6 Wordpress

2021/7/12

AFFINGER6(ACTION)の購入メリット・デメリットを徹底解説【特典あり】

有料のWordpressテーマを選ぶなら「AFFINGER6(ACTION)」が絶対におすすめです。   悩む女性1いったいどうしてAFFINGER6がおすすめなの? 実際に無料のテーマと有料のテーマを利用した私が実体験を元にそのおすすめの理由とメリット・デメリット、そして詳細の機能について実体験に基づいてレビューしました。 管理者   ぜひ皆様の参考になれば幸いです。   目次1 有料Wordpressテーマ「AFFINGER6(ACTION)」を利用すべきおすすめ理由3つ ...

ReadMore

ママが得する!富士山の玄武岩層・地下約200メートルから汲み上げた大人気ウォーターサーバー

Microsoft ACCESS プログラミング

【ACCESS-VBA】ファイル選択するダイアログボックスを表示してみよう!

今人気沸騰中!テレワーク低糖質ダイエット商品

 

サラリーマン

サラリーマン

Microsoft ACCESSを利用してファイル選択するためのダイアログボックスを表示したい。

 

ただMicrosoft ACCESS自体には、こうした「ダイアログボックスでファイル選択する」ようなデフォルト機能がありません。

Right Caption

管理者

まあExcelにもないんですけどね。だから自分で作る必要があります。

そんな悩みにお答えして、ACCESSで埋め込むVBAの記述を活用したダイアログボックスの作り方を解説していこうと思います。

 

ダイアログ表示の画面イメージ

まずダイアログボックスの表示画面のイメージ画像からみていきましょう。

【ダイアログ表示画面はこちら】

 

こんな感じでファイル選択できる画面が表示されます。

 

ダイアログボックスを活用したファイル選択の使い方

Right Caption

管理者

そもそもダイアログボックスを活用する時には、どんな時に使用するのか、その使い方についても知っておきましょうね!

ダイアログボックスを活用する主な目的は3つです。

 

<ダイアログボックスを活用する主な目的>

  • CSV,TXT,Excel等のファイルを選択してデータをDBに取り込む
  • ファイルを読み込む
  • ACCESSの機能にあるImport機能はエラーが多いため

※DB:データベース

 

まず、上記3つの場合に利用します。

ACCESSのImport機能を利用すればDBに取り込むことが可能ですが、このImport機能の場合には、取り込むデータエラー値が存在するとデータが取り込めないことがあります。

なので、ちょっと精度に不安があるのが難点でもあります。

 

それだけ、データの精度がしっかりしていないと、ダメなんですね。

 

そんな時に役立つのがこのダイアログボックスによるデータ取り込み機能を設けてあげることで、ファイルのデータをスムーズに取り込めるように機能を作ります。

 

 

参照設定を設定しよう!

ダイアログボックスを表示するためには、ACCESSの参照設定のコンポーネントを追加する必要性があります。

➡その設定方法がこちら

 

これらの設定は、データベースへの更新機能を用いたり、Excelと連携する際に必要な設定項目なので、基本的に✔を付けておくことをおすすめします。

 

ただ、このダイアログと関係するのは、「Microsoft ActiveX DataObjects ●● Library」です。

 

上記の設定をご確認の上、チェックを入れておきましょう。

 

さあ、これで初期設定は完了です。それでは実際にプログラミングについて確認していきましょう。

 

ファイル選択するためのダイアログボックスを表示するソース

ファイル選択するためのダイアログボックスを表示するためのソースは下記になります。

'|==========================================================================================
'| 定義 : ダイアログボックス表示
'|------------------------------------------------------------------------------------------
'| PG名 : blnTestGetFileName() As Boolean
'|------------------------------------------------------------------------------------------
'|  説明 :ファイル選択用ダイアログボックス表示する。
'|==========================================================================================
Public Function blnTestGetFileName() As Boolean
<span style="font-size: 12px;" data-mce-style="font-size: 12px;">Const ENABLE_WIZHOOK = 51488399
Const DISABLE_WIZHOOK = 0
Dim strFile&nbsp;&nbsp; As String
Dim intResult As Integer
Dim intRet As Integer

blnTestGetFileName = False

WizHook.Key = ENABLE_WIZHOOK&nbsp;&nbsp;&nbsp; ' WizHook 有効化

intResult = WizHook.GetFileName( _
0, "", "", "", strFile, "", _
"すべてのファイル (*.*)|*.*", _
0, 0, 0, True _
)
WizHook.Key = DISABLE_WIZHOOK&nbsp;&nbsp;&nbsp; ' WizHook 無効化

If intResult <> -302 Then
   If strFile <> "" Then
      Call FileExe(strFile)
      gstrReadFilePath = strFile
      blnTestGetFileName = True
      gintGetFlag = 1

   Else
      blnTestGetFileName = False
   End If
Else
   MsgBox "処理が中断されました。", vbCritical
End If

End Function



</span>

 

こちらのソースを参考にして、ダイアログを表示させてみて見て下さい。

もし表示がうまくいかない場合は、ご連絡下さいね。^^

 

ACCESSでダイアログを表示するためのおすすめ参考書はこちら

ACCESSには、色々な機能が設けられており、その機能をしっているかいないかだけの違いです。私も色々な参考書を購入してきましたが、その中でも色々な機能を知るためには、下記が特におすすめです。

 


 

ACCESSの機能をもっと知りたいという方は、ぜひこちらの参考書をご参考にして見て下さいね。

 

 

まとめ

 

このように、ACCESSを活用したダイアログボックスの表示については、色々な部分で活用できる部分があります。

Excelのデータを取得したり、テキストデータをセットすることで、値を取得することができますので、この機能ができるとACCESSとエクセルの連携ができたり、メリットが盛だくさんなので、必要な方はぜひ挑戦して見て下さい。

 

 

 

 

 

 

大人気自宅飲み放題!多彩なビールをご自宅で楽しめる【DREAM BEER】

楽天おすすめ商品はこちら

人気急上昇中!累計販売数40万本突破『どこでもミラバス』

Copyright© 副業ケアネット , 2021 All Rights Reserved Powered by AFFINGER5.