【vba】任意フォルダを開く

AccessでCSVファイルを書き出した後、その保存先フォルダーを開くには

Dim MyOpenFolder As String

DoCmd.TransferText acExportDelim, "商品エクスポート定義", "Q01商品ex", "c:katabeyahoo商品.csv", True, ""

MyOpenFolder = "c:katabe"
Shell "explorer " & MyOpenFolder, vbNormalFocus

新しいDBを開発中。

阿南市にデカいイオン系量販店がオープンし地元小売店と卸問屋は七色吐息。
そこで、新しい販路を求め完全無料と宣伝してる「Yahooショッピング」を申し込みました。

でも、初めて行うネットショップの準備がうまく出来ず申し込みから1か月過ぎても何も出来ていない。

一番苦労してるのが商品説明文とキャッチコピー。
文才の無い私、書いては消しを繰り返しまったく先へ進めません。

そこで作戦変更、Yahooショッピングに商品・カテゴリー用CSVファイル一括登録機能があるのでこれを利用することに。

その専用Accessの開発を今始めました。
さて、いつ完成出来るんだろう?

これが完成すれば、商品登録はあとから一括登録する段取りで、取りあえずはショッピングサイトの構成を考える余裕が出来る。

「Yahooから5月31日までに開店しないと申し込みは取り消すぞ」とメールが来たばかり。
あと1か月でAccessを開発し、サイト構成を考え、そして最後の山、しゃれたデザインが僕に出来るんだろうか・・・・

なによりも宅配代1000円プラスした価格で商品を買ってくれるお客様はいるのだろうか?
取りあえずは早くAccessを完成させないと 🙁

Yahooショッピング商品管理Accessシステム開発中

コメントを残す

メールアドレスが公開されることはありません。

CAPTCHA