Excel VBA質問箱 IV

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

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


13548 / 13644 ツリー ←次へ | 前へ→

【4877】アドインについて bishop 03/4/11(金) 17:57 質問
【4879】Re:アドインについて ichinose 03/4/11(金) 20:22 回答
【4901】Re:アドインについて こう 03/4/13(日) 16:46 回答

【4877】アドインについて
質問  bishop  - 03/4/11(金) 17:57 -

引用なし
パスワード
   アドインについて質問があります。

ある様式のシートを用意して、ユーザに入力させるプログラムを
作ったのですが、アドインとして保存するとシートを使用することが
できません。
アドインプログラムと上記シートを持ったブックを切り離して作成しなければ
ならないのでしょうか。

【4879】Re:アドインについて
回答  ichinose  - 03/4/11(金) 20:22 -

引用なし
パスワード
   ▼bishop さん:
こんばんは。
>アドインについて質問があります。
>
>ある様式のシートを用意して、ユーザに入力させるプログラムを
>作ったのですが、アドインとして保存するとシートを使用することが
>できません。
>アドインプログラムと上記シートを持ったブックを切り離して作成しなければ
>ならないのでしょうか。
はっきりとは言えませんが、作成したブックはアドインではなく、通常のブックとして
Startupに保存したらどうでしょうか?
Excel起動時にそのブックがオープンします。こんな方法では駄目なんですか?

【4901】Re:アドインについて
回答  こう E-MAIL  - 03/4/13(日) 16:46 -

引用なし
パスワード
   bishopさん,こんにちわ。

>ある様式のシートを用意して、ユーザに入力させるプログラムを
>作ったのですが、アドインとして保存するとシートを使用することが
>できません。
シートはどのように使っていますか?
以前,AllSheetFind.xlaというアドインファイルを作ったんですが,
このときにSheets(1)を検索キー退避用として使ってました。

あまり参考にならないかもしれませんが,そのときのコードです。

  Set www = Workbooks("AllSheetFind.xla").Sheets(1)
  On Error Resume Next
  www.Range("A1:A21").AdvancedFilter Action:=xlFilterInPlace, Unique:=True
  UserForm1.ComboBox1.Clear
  For Each i In www.Range("A2:A21").SpecialCells(xlCellTypeVisible)
    UserForm1.ComboBox1.AddItem i
  Next i
  Set www = Nothing

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