Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


15216 / 76734 ←次へ | 前へ→

【66999】Re:ファイル名を取得して特定のファイルを開ける
発言  ZZ TOP  - 10/10/25(月) 7:38 -

引用なし
パスワード
   ▼keisuke さん:
初心者が色々貼り合わせてやってしまってますのでお恥ずかしい限りですが、下記を作ってみたもののうまくいきません。
ワークシートのセルC8には出張から帰って来た帰着日の日付データが入っています。
とりあえずこのセルに出張から帰国した日を入れると、別のフォルダーに格納されている、帰着日の為替換算リストが記載されたアウトルックデータを開きたく。
アウトルックデータは例えば2010年8月20日分なら"200810"という名前でTestというフォルダーに格納されております。
下のコードではC8の日付データを参照させるところまで行っておりませんでして、とりあえずC8のセルデータが変更されると、200810のファイルを開こうとしてみましたが、これもうまく行きませんでした。


Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("C8")) Is Nothing Then
Exit Sub
Else

Dim StrFN As String
StrFN = "C:\Documents and Settings\デスクトップ\Test¥200810.Outlookアイテム"

If Dir(StrFN) <> "" Then
  MsgBox Dir(StrFN) & "が見つかりました。"
Else
  MsgBox "ファイルが見つかりません。"
End If
End If
End Sub

0 hits

【66988】ファイル名を取得して特定のファイルを開ける ZZ TOP 10/10/23(土) 23:10 質問
【66989】Re:ファイル名を取得して特定のファイルを... keisuke 10/10/24(日) 1:44 発言
【66990】Re:ファイル名を取得して特定のファイルを... ZZ TOP 10/10/24(日) 5:56 発言
【66992】Re:ファイル名を取得して特定のファイルを... keisuke 10/10/24(日) 16:21 質問
【66994】Re:ファイル名を取得して特定のファイルを... ZZ TOP 10/10/24(日) 19:38 発言
【66998】Re:ファイル名を取得して特定のファイルを... keisuke 10/10/25(月) 2:33 発言
【66999】Re:ファイル名を取得して特定のファイルを... ZZ TOP 10/10/25(月) 7:38 発言
【67007】Re:ファイル名を取得して特定のファイルを... keisuke 10/10/25(月) 19:55 発言
【67009】Re:ファイル名を取得して特定のファイルを... keisuke 10/10/25(月) 20:20 回答
【67031】Re:ファイル名を取得して特定のファイルを... keisuke 10/10/27(水) 19:20 回答

15216 / 76734 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free