Ｐａｇｅ 529 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼VB からExel のBook を開きたい Miru 03/1/9(木) 10:45 ┗もう少し詳しく教えてください JuJu 03/1/9(木) 11:49 ┗Re:もう少し詳しく教えてください Miru 03/1/9(木) 19:02 ┗Re:もう少し詳しく教えてください JuJu 03/1/10(金) 10:42 ┗Re:もう少し詳しく教えてください、もう一度 Miru 03/1/10(金) 20:25 ┗Re:もう少し詳しく教えてください、もう一度 JuJu 03/1/10(金) 20:45 ┗Re:もう少し詳しく教えてください、もう一度 Miru 03/1/10(金) 21:46 ┗ごみレス JuJu 03/1/11(土) 12:33 ─────────────────────────────────────── ■題名 ： VB からExel のBook を開きたい ■名前 ： Miru ■日付 ： 03/1/9(木) 10:45 -------------------------------------------------------------------------
| VBのフォームからExelのBookを開いたり、閉じたりしたいのですが、 どうすればいいのでしょうか。 さらに、そのBookを他からアクセスできないようにしたいのですが。 どなたかお教えください。 VB6 で Exel2000 です。 |
| Miruさん、こんにちはぁ もう少し詳しく教えてください。 > VBのフォームからExelのBookを開いたり、閉じたりしたいのですが、 > どうすればいいのでしょうか。 開いて何をするのでしょうか？Excelを起動するだけで良いのですか？ その開くBookは既に作成済みのファイルですか？ >さらに、そのBookを他からアクセスできないようにしたいのですが。 どこから？ 他の共有パソコンから、それとも同時に立ち上げているExcelからですか？ アクセスできないようにするのはいつですか？ パソコンを立ち上げているときは常に、それともVBからブックを開いている時だけですか？ |
| 早速ありがとうございます JuJu さん。 説明不足ですみません。 >開いて何をするのでしょうか？Excelを起動するだけで良いのですか？ >その開くBookは既に作成済みのファイルですか？ Bookはすでに作成されていて、１０個 あります。 それぞに名前が付いています。 >>さらに、そのBookを他からアクセスできないようにしたいのですが。 > >どこから？ >他の共有パソコンから、それとも同時に立ち上げているExcelからですか？ > >アクセスできないようにするのはいつですか？ >パソコンを立ち上げているときは常に、それともVBからブックを開いている時だけですか？ 初心者なので、質問の意味がいまいち分からないのですが、 共有パソコンなので、データの書き換えはいいのですが、Bookの設定などをいじられたくないのです。 何とかなるでしょうか? |
| Miruさん、こんにちはぁ >>開いて何をするのでしょうか？Excelを起動するだけで良いのですか？ >>その開くBookは既に作成済みのファイルですか？ > Bookはすでに作成されていて、１０個 あります。 それぞに名前が付いています。 Excelを起動終了するだけで良いのですか？ ためしにＶＢから開いて閉じるだけのサンプルです。 （フォームにボタンを２つ作ってね） '---- 8< ---- 8= ---- 8< ---- 8= ---- 8< ---- 8= ---- Private objBook As Object ' ブックを開く Private Sub Command1_Click() '' ブックを開く（実際のファイル名に変更してね） Set objBook = GetObject(シートのファイル名) '' ブックの表示 objBook.Windows(1).Visible = True '' Excelの表示 objBook.Application.Visible = True End Sub ' Excelを閉じる Private Sub Command2_Click() '' Excelを閉じる objBook.Application.DisplayAlerts = False objBook.Application.Quit Set objBook = Nothing End Sub '---- 8< ---- 8= ---- 8< ---- 8= ---- 8< ---- 8= ---- > 初心者なので、質問の意味がいまいち分からないのですが、 >共有パソコンなので、データの書き換えはいいのですが、Bookの設定などをいじられたくないのです。 何とかなるでしょうか? そういうことでしたら、シートの保護機能を使ってみてください。 場所は、メニューのツール−保護−シートの保護(P)です。 ではではぁ |
| JuJu さん 丁寧にありがとうございます。 > '' ブックを開く（実際のファイル名に変更してね） > Set objBook = GetObject(シートのファイル名) 初心者なのでまことに申し訳ありませんが、ファイル名の書き方をお教え願います。 Bookの名前は 「会社関係」 です。 そのシートには 各課の名前が付いています。 パスなどはどうするのでしょう。 あまりに初歩的な質問ですみませんが、よろしくお願いします。 |
| Miruさん、こんにちはぁ >初心者なのでまことに申し訳ありませんが、ファイル名の書き方をお教え願います。 > Bookの名前は 「会社関係」 です。 そのシートには 各課の名前が付いています。 > パスなどはどうするのでしょう。 実際にどのフォルダに格納してますか？ 例えば、Cドライブの "My Documents" という名前のフォルダに格納してあれば、 Set objBook = GetObject("C:\My Documents\会社関係") になります。 ではではぁ |
| JuJu さんありがとう。 フルパスで入れるんですね。 こんな簡単なことも理解できなくてすみません。 おかげさまで、安心して、連休出来ます。 今後ともよろしくお願いします。 |
| > おかげさまで、安心して、連休出来ます。 連休を休めますっていう意味ですよね。 連続で休出で会社に来るのかと思ったりして^^;;; |