![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?8acaa2e)
No.1ベストアンサー
- 回答日時:
こんにちは。
>C:\ProgramFiles\commonFiles\MicrosoftShared\VBA\VEJPLR3HLP
たぶん、
VEjpLR3.HLP
のことだと思うのですが、このファイルがなくても、
#「このオートメーションタイプはVisualBasicではサポートされていません」
というエラーは出ないはずです。
>ファイル(エクセル)を開いたら...
それよりも、こちらのほうが問題です。
ツール-マクロ-Visual Basic Editor で、
Visual Basic Editorの画面のモジュールは開けられますか?
開けられたら、その最初の、Sub プロシージャ名の下の宣言、Dim のところの全てを教えてください。
開けることが出来ないようでしたら、もう一度、使用説明か何かをお読みください。Excelのバージョン(正確に言うと、使う周辺のダイナミック・リンク・ライブラリなどのバージョン)が違うかもしれません。または、別のファイルをダウンロードして、インストールしなければならないかもしれません。
この回答への補足
早速お返事いただいてありがとうございます。
まったくの素人の為よく解らないので最初の方を貼り付けてみましたが、これでよかったでしょうか。よろしくお願いいたします。
Public Sub Compute_Sub( _
sh As Worksheet, _
op() As Boolean, _
start_row As Long, start_col As Long, _
keisan_row As Long, keisan_col As Long, _
set_col As Long)
'Dim total As Long
Dim shiki As String
Dim i As Long, j As Long, k As Long
'オンエラー処理
On Error GoTo ErrProc
Application.ScreenUpdating = False
No.4
- 回答日時:
こんにちは。
> □ 参照不可: JS DialogExtension Controls
> □ 参照不可: JS CheckListBox Control
> □ 参照不可: JS Dialog Library
JS DialogExtension Controls
JS CheckListBox Control
JS Dialog Library
この「参照不可」の文字自体は、そのライブラリを持っている方には、参照不可は出てきませんが、それは、MS社のものではないコントロールですから、外してください。外して、再度、立ち上げれば、MS社のライブラリが使えるはずです。
ちなみに、私のほうでは、それを外せば当面の問題は出ていません。
何度もありがとうございます。参照不可の文字自体はでてくるのですが、ののあとが空欄で
JS DialogExtension Controls
JS CheckListBox Control
JS Dialog Library
というのが見つけられなかったのです、参照不可の部分を消そうとおもいましたが「使用中のコントロールまたは参照を削除することはできません」と
でてきて消せそうがありません。どうやら手書きになりそうです。
まったく解らないのに大変親切丁寧に教えてくださって本当にありがとうございました。
No.3
- 回答日時:
こんにちは。
ダウンロードしてみました。
VBAのコードは、プロの人のコードのようです。しかし、しがかり品です。最終段階で、すべき点をいくつか忘れているようです。VBA側からみると、全体の作りがかなり雑のようですね。
使っていない変数が数多く点在し、プロジェクト名,シート名,モジュール名が、そのままですし、使用していないモジュールやクラスが放置されています。
問題の個所は、ジャストシステム社のコントロールを使って、繋がったままになっています。これはひじょうにまずいです。タイムスタンプをみると、2005-10-6 17:38:06 となっていますから、おそらく、すぐに修正版が入るはずです。
前置きが長すぎてしまいました。
まず、お使いの Excel97のVersion でも、何の支障もありません。
-----------------------------------------------------------
「調査票様式h17ベース:Excel機能追加済.xls」の修正の仕方
-----------------------------------------------------------
1) メニューから、ツール-マクロ-Visual Basic Editor を開けていただきます。
2) メニューから ツール-参照設定(R) でクリックしますと、
で、参照不可になっているものの□の中のチェックを外します。
□ 参照不可: JS DialogExtension Controls
□ 参照不可: JS CheckListBox Control
□ 参照不可: JS Dialog Library
この三点のはずです。
これを外したら、「OK」をクリックします。
3) そして、もう一度、ツール-参照設定(R) を開けて、それらの項目がきれいになくなって いることを確認してください。
そうしたら、メニューから ファイル-終了 Microsoft Excel に戻る(C)をクリック
次に、シート「様式2」を開けて、E14から下の「休日出勤」のチェックボックスが、正しく作動するか確かめてください。
問題ないようでしたら、
4) 一旦、シート「様式1」に戻ってから、ファイル-上書き保存(S)で、保存してください。
5) 念のため、一旦、Excelを終了して、再度開けて、「様式2」のチェックボックスが正しく作動するか、調べてみてください。
これで、このファイルを何度も使うようでしたら、別の場所に置いて、これをオリジナルファイルとしたらよいと思います。
'-------------------------------
これで、しばらく様子をみてください。
この回答への補足
早速、修正をしようとしたのですが、
) メニューから ツール-参照設定(R) でクリックしますと、
で、参照不可になっているものの□の中のチェックを外します。
□ 参照不可: JS DialogExtension Controls
□ 参照不可: JS CheckListBox Control
□ 参照不可: JS Dialog Library
のところで、参照不可というのがでてこなくてつまづいてしまいました。
修正版がでるまでまってみたほうが、いいでしょうか。。。
No.2
- 回答日時:
こんにちは。
それには、特に、問題になるものは存在していませんね。たぶん、開いた時の最初に目についたものをコピーしてみたようですね。
もしかしたら、そういう、Sub ~が、他にも、一杯あるのではないでしょうか?
Project とか、Module とか、一杯ありますか?
そのコードの作り方をみると、Public Sub としているならば、別のブックが立ち上っているはずですが、そうではありませんか?通常は、単独のブックのプロシージャには、Public ステートメントはつけません。
(なお、製作者に連絡が取れるなら、そちらにしたほうが早いです。もし、公開されていて、私が見れるものなら直接見ます。ただし、プライベートURL は、掲示が削除されてしまいます。)
なお、Excelのバージョン と、OS のバージョンと、そのマクロ群(ブック)の行う目的を教えてください。( 例えば、データベースのデータを取り込んで、それを表にする、とか。データベースの場合は、そのデータベースの種類)
それから、ダウロードしたものに、インストローラーはついていませんでしたか?
ご自身で調べる方法
'-----------------------------------
1)
とりあえず、そのVisual Basic Editor の画面のところの
ツール-参照設定 で、
[参照不可]とか、なっているものはありませんか?
合ったら教えてください。
2)
次に、もし、双眼鏡のツールアイコンが出ていたら、それをクリック。出ていなかったら、Ctrl + F で、「検索ダイアログ」を出して、
検索する文字列
「CreateObject」
対象
カレントプロジェクト
三個並んだ、チェックボックスは、どれもチェックいれません。
そして、次を検索(N)
を押して、検索した行の内容を教えてください。
1) で、見つかったら、2) は必要ありません。
調べてみてください。
この回答への補足
はい、そのとおりです…いっぱいありました。
Excelのバージョンは97、OSのバージョンはXPです。http://www.mlit.go.jp/sogoseisaku/const/sinko/ro …から調査票をダウンロードしました。
よろしくお願いいたします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルでcsvファイルを開いてVBAを使いたい 7 2022/04/28 11:12
- Excel(エクセル) CSVファイルでVBAを動かす方法 3 2023/04/04 10:22
- Visual Basic(VBA) DisplayAlertsブロパティで ”実行時エラー424オブジェクトが必要です” 5 2022/05/15 18:02
- Excel(エクセル) OFFICEに詳しい方 Microsoft 365 personal をを使ってます。(¥1,284 1 2023/02/20 16:40
- PDF エクセルのVBAでファイルをpdfで保存するとソフトによっては開けなくなる 3 2022/06/08 10:20
- Windows 10 Windows10にてjpg形式の画像が開けません 4 2022/08/24 14:37
- PDF パソコンについて質問です。 スマホでクレジットカードの明細をPDFでダウンロードしました。 その後、 6 2022/09/18 15:05
- HTML・CSS エクセルのファイルのダウンロード 前にアップしたファイルがダウンロードされる 1 2022/11/13 13:02
- その他(クラウドサービス・オンラインストレージ) firestorage_androidスマホでダウンロードできない 1 2022/10/25 08:18
- Excel(エクセル) エクセルのVBAについて とあるサイトのコードを参考に、CSVの文字化けを直すVBAを作成しているの 7 2022/11/04 14:15
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCEL VBA 指定したファイルが...
-
エクセルマクロで不特定なファ...
-
エクセルのxls形式からxlsx形式...
-
フォルダ内のブック全部にパス...
-
VBAでワークブックの名前を変数...
-
エクセル 複数ファイルの一括...
-
vlookup関数の引数を変数で指定...
-
accessフォルダを移動したらフ...
-
エクセルVBA ユーザーフォーム...
-
Excel:上書き保存時にワークシ...
-
エクセルファイルを開く時、関...
-
ACCESS VBAでファイルを開くダ...
-
エクセルのシートの数を数えた...
-
フォルダ内のexcelファイルを順...
-
【VBA】フォルダ内のファイル全...
-
vba初心者です。 質問です。 毎...
-
エクセルファイルをHTML化する...
-
VBAで開いているファイルの...
-
Excelファイルに書かれた文書の...
-
Excel VBA でファイルが開かれ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
EXCEL VBA 指定したファイルが...
-
エクセルマクロで不特定なファ...
-
フォルダ内のexcelファイルを順...
-
VBAでワークブックの名前を変数...
-
エクセル(マクロ)のファイル...
-
エクセルのxls形式からxlsx形式...
-
エクセル 複数ファイルの一括...
-
エクセルのシートの数を数えた...
-
【マクロ】名前を保存する際に...
-
【Excel VBA】ファイル名が一...
-
ファイルを開かずにマクロを実行
-
accessフォルダを移動したらフ...
-
フォルダ内のブック全部にパス...
-
vlookup関数の引数を変数で指定...
-
Excel VBA でファイルが開かれ...
-
ファイルの保存場所を変えたら...
-
Accessのaccdbファイルを起動で...
-
リンク切れチェックを行うマクロ
-
エクセルマクロ 異なるファイ...
-
データ参照先が別ファイルの場...
おすすめ情報