Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
6467 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【45150】変数を利用したファイルのopen/closeの方法 質問（煮詰まった） 06/12/13(水) 18:03 質問[未読]
【45159】Re:変数を利用したファイルのopen/closeの... Statis 06/12/14(木) 7:58 発言[未読]
【45162】Re:変数を利用したファイルのopen/closeの... 質問（煮詰まった） 06/12/14(木) 9:34 お礼[未読]
【45150】変数を利用したファイルのopen/closeの方...
質問  質問（煮詰まった）  - 06/12/13(水) 18:03 -
引用なし
パスワード
   　　度々すいませんが教えて下さい。
　　シートのセルにファイル名を指定させて
　　その指定させたファイル名をワーク項目に
　　取得し作業を行い、ファイルを閉じたいのですが
　　★の箇所の指定はこれでいいのでしょうか？
　
　　dim para1 as string
　　Windows("aaa.XLS").Activate
　　Sheets("aaa").Select
　　Range("C9").Select
　　para1 = ActiveCell.FormulaR1C1

　　シートaaaのｃ９にファイル名：bbbbbとある場合に
　　そのbbbbのシートを閉じたい場合の処理です。
　　
　　bbbb = para1 に取得しています。

　　★Windows(para1.xls).Activate
　　　ActiveWorkbook.Close
　　 Range("C9").Select

　　お手数ですが宜しくお願いします。
【45159】Re:変数を利用したファイルのopen/close...
発言  Statis  - 06/12/14(木) 7:58 -
引用なし
パスワード
   ▼質問（煮詰まった） さん：
こんにちは
>　　度々すいませんが教えて下さい。
>　　シートのセルにファイル名を指定させて
>　　その指定させたファイル名をワーク項目に
>　　取得し作業を行い、ファイルを閉じたいのですが
>　　★の箇所の指定はこれでいいのでしょうか？
ワーク項目て何ですか？
セルC9の値のファイルは事前に開いているのですか？
　
>　　dim para1 as string
>　　Windows("aaa.XLS").Activate
>　　Sheets("aaa").Select
>　　Range("C9").Select
>　　para1 = ActiveCell.FormulaR1C1
>
>　　シートaaaのｃ９にファイル名：bbbbbとある場合に
>　　そのbbbbのシートを閉じたい場合の処理です。
>　　
>　　bbbb = para1 に取得しています。
>
>　　★Windows(para1.xls).Activate
>　　　ActiveWorkbook.Close
> 　　 Range("C9").Select
>
>　　お手数ですが宜しくお願いします。

上記のコードをまとめると下記になります。

para1 = Workbooks("aaa.xls").Worksheets("aaa").Range("C9").Value
If para1 = "bbbbb" Then
　 Workbooks(para1 & ".xls").Close
End If
【45162】Re:変数を利用したファイルのopen/close...
お礼  質問（煮詰まった）  - 06/12/14(木) 9:34 -
引用なし
パスワード
   助かりました。
求めることはできました。

workbooks(para1 & ".xls").close

の箇所でした。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
6467 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free