- ベストアンサー
ExcelVBAでShowDatasFormがエラーになる
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
やったことはないですが、上に2行以上ある場合、リストにDataBaseと名前を定義づければ可能と聞いたことがあります。
その他の回答 (1)
- Puh3
- ベストアンサー率16% (6/36)
原因は多分、リストの上に2行以上空白があるからでしょう。
お礼
補足欄にお礼を書いてしまったようで大変失礼しました、改めて御礼を申し上げます
補足
回答ありがとうございました リストの上にはボタンなどを配置していて御指摘のように10行ほどの空白があります 実は別のBOOKにあるデーターベースからこのSheetにデーターの一部をコピーして、データーのあいまい検索をしようとしたのですがマクロでは速度も遅いし記述するだけでも大変なので、何とかデーターフォームを使えないかと思ったのですが基本的なことを忘れていたようです 質問内容をもっと詳しく書けばよかったのでしょうが、残された道はレイアウトを変えるしかないようですね ありがとうございました
関連するQ&A
- エクセルに関する質問です。
エクセルに関する質問です。 マクロである原本となるシートをどんどんコピーしてシートを追加していったのでですが、「実行時エラー 1004 worksheetクラスのcopyメソッドが失敗しました」の表示がでてコピーできなくなりました。最大枚数の256枚にも達しておらず、マクロではない通常の操作でもシートの追加が不可能になりました。解決方法はあるでしょうか。エクセル2000です。
- ベストアンサー
- その他MS Office製品
- マクロをボタンに登録するとエラーになる
ツールのマクロから実行すると、成功するのですが、そのマクロをフォームコントロールのボタンに割り当てると失敗します。RangeクラスのAutofillメソッドが失敗しました、と。 中身としては、(会社のパソコンなので、コードが書けなくてすみません。) 関数を最終行までオートフィルして、フィルターをかけて0以外を表示させ、そのページを印刷する、という形です。 ただ作成したマクロをボタンにすることはできないのでしょうか？？ よろしくお願いします。
- ベストアンサー
- Visual Basic
- なぜエラーになるのかわかりません。
コードとしては問題ないはずなのに なぜエラーになるのかわかりません。 Private Sub Worksheet_Activate() Cells(1, 1).Select End Sub というコードで、 実行時エラー1004 rangeクラスのselectメソッドが失敗しました。 となります。
- ベストアンサー
- Excel（エクセル）
- エクセルVBA 実行時エラーって出るんですけど・・・；；
いつもお世話になってます またまた質問載せさせていただきます。 マクロで２つのファイルをSaveasで各保存をした後に、 エクセルを閉じると、 実行時エラー'1004' WorksheetクラスのSelectメソッドが失敗しました と出るのです。 デバックボタンもグレーのままなので、デバックは使えないし、そのまま終了をかけると、エクセル自体が閉じられるので、 さっぱり何がなにやらって感じなのです。 どなたか分かる方いらっしゃいますでしょうか？？
- ベストアンサー
- その他(ソフトウェア)
- ExcelVBA マクロエラー値の取り出し方
Excel2002VBAを利用してcsvファイルを読込み、任意のシートへ貼り付ける処理を作成しています。 フォームのボタン押下により、マクロ記録で作成したシートへの貼りつけ処理を行う際、csvファイルが存在していないと、Err.Number=1004が発生してしまいます。 これをOnErrorでキャッチしてマクロの中でWk_ErrCode(フォームモジュールでPublicで定義)へセットし、フォームモジュールへ戻る処理を組んだのですが、戻り値が0になってしまい、後続処理を迂回出来ない様です。 出来れば、Err.Numberを利用したままエラー判定処理をフォームモジュールで行いたいのですが、良い方法は有りませんでしょうか。。。
- ベストアンサー
- オフィス系ソフト
- ExcelVBAでのエラー処理について
Excel2003のVBAでマクロを作成しています。 On Error Gotoを使用して開こうとしたブックを開こうとして目的のブックがなかった場合のエラー処理コードを書いたのですがうまくエラー処理行に飛んでくれず、実行時エラーのメッセージがでてマクロがとまってしまいます。 コードを見返したところ記述ミスはないようなのですが、考えられるミスは何なのでしょうか？
- ベストアンサー
- オフィス系ソフト
- Excelvba2000でExcelファイル間のコピーを行いたい
現在マクロ実行中のExcelブックのシートのセルの値を、 新規作成したブックのシートのセルに値を貼り付けたいのですが、 うまくいきません。 ただし、コピーの条件として、クリップボードは使用しない Activeメソッドや、Selectメソッドも使用しないという制約があります 以前は、うまくいっていたのですが、コードの書き方を忘れてしまいました。以下の★印の行で、 「RangeクラスのCopyメソッドが失敗しました。」とエラーが出ます。 以前は、以下のコードに似た、ロジックで、問題なかったのですが、 どこか間違っていますでしょうか？ Dim xlsApp As Excel.Application Dim xlsBook As Excel.Workbook Dim xlsSheet As Excel.Worksheet Set xlsApp = CreateObject("Excel.Application") Set xlsBook = xlsApp.Workbooks.Add Set xlsSheet = xlsBook.Worksheets(1) '★エラー発生 ThisWorkbook.Worksheets("Sheet1").Range("A1:D4").Copy _ Destination:=xlsBook.Worksheets("Sheet2").Range("E5")
- ベストアンサー
- Visual Basic
- エクセル共有化のトラブル
マクロを含むエクセルファイル（AUTO_OPEN()で起動）を共有化したところ、「実行時エラー'1004：Worksheetクラスの Unprotectメソッドが失敗しました。」という表示が出て、止まってしまいます。共有化する前は問題なく動いていたのですが、何が原因なのか、教えてください。よろしくお願いします。
- 締切済み
- Visual Basic
- ExcelVBAでシートの保護が出来ません
お世話になります。Excel2000です。 VBAで、Protectを使用してシートを保護しようとしているのですが、 実行しても保護がされません。それだけでなく、その後に VBEでソースなどを確認しようとすると、「DLL読み込み時のエラーです。」という メッセージが表示されるほか、マクロが「記録できません」という 状況になってしまいます。 これはどうすればよろしいでしょうか。 ご返答、お待ちしております。 よろしくお願い致します。
- 締切済み
- Visual Basic
お礼
貴重なお時間を割いてご回答いただき、ありがとうございました、何とかなりそうです