Excel VBA質問箱 IV

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

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


16872 / 76738 ←次へ | 前へ→

【65329】Re:テキストボックスが7つあり、それに入力して検索するとデータを抽出するには?
質問  ろんろん  - 10/5/12(水) 11:49 -

引用なし
パスワード
   Jaka様、お答え頂きありがとうございました。
試してみたのですが、結果オブジェクト名の名前が間違っていました。
txtTnanaban.Text = Worksheets(SheetName).Cells(TourokuNo + 1, 7).Text
  ↑Tanaban

オブジェクト名のエラーは出なくなったのですが、
実行時エラー 1004 このコマンドには2行以上必要です。
選択したセルの範囲が1行だけの場合はこのコマンドを実行できません。
?フィルタオプションを使用している場合、2行以上のデータで構成されるセル範囲を選択し、「フィルタオプションの設定コマンドを再度クリックします。
?ピボットテーブルレポートまたはピボットグラフレポートを作成している場合は、セル参照を入力するか、または2行以上のデータで構成されるセル範囲を選択します。と出て、黄色くなったのが以下の部分です。

  Range(Cells(1, 1), Cells(TourokuKensuu + 1, 7)).AdvancedFilter _
    xlFilterCopy, _
    Worksheets("抽出条件").Range("A1:G2"), _
    Worksheets("抽出結果").Range("A1:G65536")

どうすれば動くようになるでしょうか?お手数ですが、よろしくお願いいたします。
0 hits

【65319】テキストボックスが7つあり、それに入力して検索するとデータを抽出するに... ろんろん 10/5/11(火) 15:45 質問
【65320】Re:テキストボックスが7つあり、それに入力... ろんろん 10/5/11(火) 15:49 質問
【65322】Re:テキストボックスが7つあり、それに入力... Jaka 10/5/11(火) 17:17 発言
【65329】Re:テキストボックスが7つあり、それに入力... ろんろん 10/5/12(水) 11:49 質問
【65330】Re:テキストボックスが7つあり、それに入力... Jaka 10/5/12(水) 15:16 発言
【65339】Re:テキストボックスが7つあり、それに入力... ろんろん 10/5/13(木) 10:41 お礼
【65331】Re:テキストボックスが7つあり、それに入力... teian 10/5/12(水) 16:03 発言
【65340】Re:テキストボックスが7つあり、それに入力... ろんろん 10/5/13(木) 10:45 お礼
【65401】Re:テキストボックスが8つになったのですが ろんろん 10/5/18(火) 15:28 質問
【65404】Re:テキストボックスが8つになったのですが Jaka 10/5/18(火) 17:03 発言
【65406】Re:テキストボックスが8つになったのですが ろんろん 10/5/18(火) 17:12 お礼

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