2

文書管理システムを構築しています。メイン ドキュメント リポジトリ内の各サブディレクトリには、ドキュメント テンプレートへのショートカットがあります。ユーザーが新しいドキュメントを作成する場合、ドキュメントの適切なサブディレクトリに移動し、ショートカットをクリックします。

ユーザーがショートカットをクリックすると、MS Word が起動し、テンプレートに基づく新しいドキュメントが表示されます。ユーザーが [保存] をクリックすると、通常、ドキュメントは現在のディレクトリに保存されます。このディレクトリは、 Word の [オプション]で指定された新しいドキュメントの既定の場所になります。

新しいドキュメントの現在のディレクトリを、それが作成されたショートカットのディレクトリと同じにしたいです。ユーザーは、適切なサブディレクトリに移動してショートカットをクリックすることにより、ドキュメントを配置する場所を既に決定しています。ユーザーが [名前を付けて保存... ] ダイアログ内で再度同じ場所に移動する必要はありません。

ショートカットへのパスを取得できれば、プログラムでドキュメントを同じディレクトリまたは新しいサブディレクトリに保存できます。

また、MSDN VBA フォーラムおよびVBA Expressで質問されました。

4

2 に答える 2

1

ファイルシステムのトロールに関するひどいハッキングを行わずにこれを行うことはできないと思います（ショートカットの「開始」プロパティについて脳波がありましたが、残念ながらうまくいきませんでした）。

残念ながら、最善の解決策は、ショートカットを削除して、ドキュメント テンプレートのコピーをたくさん置いておくことだと思います。

クリス

于 2011-02-09T20:28:48.017 に答える
0

もしかしてこれ？

Public Sub OriginalPath()

    Debug.Print TemplateProject.ThisDocument.Path

End Sub
于 2011-02-09T13:39:58.050 に答える