Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
36264 / 76738 ←次へ　｜　前へ→
【45657】Re:年度情報を集約ファイルに書き込むには？
発言  vang  - 07/1/9(火) 11:44 -
引用なし
パスワード
   かみちゃん様
こんにちは。返信ありがとうございます。

>>この状態だとやはり店所情報のH列に何も入ってないと
>>集約表のＥ列（Ｅ列に表示させたい）に店所情報の題字が入ってきてしまいます。
>
>H列は、もしかして、数式が設定されていませんか？
>""という空白を示すデータが入っていると、目には見えないがデータは入っている
>ことになります。
>
>以下のコードでどのように表示されるか確認してみてください。
>With ws1
>　MsgBox "H列の最終行は " & .Cells(Rows.Count, 8).End(xlUp).Row
>　If .Cells(Rows.Count, 8).End(xlUp).Row > 3 Then

With ws1
　MsgBox "H列の最終行は " & .Cells(Rows.Count, 8).End(xlUp).Row
　If .Cells(Rows.Count, 8).End(xlUp).Row > 3 Then
　　　 .Range("H3", .Cells(Rows.Count, 8).End(xlUp)).Resize(, 1).Copy _
　　　Workbooks("集約表.xls").ActiveSheet.Range("E2")
　End If
　End With
　WB1.Close
End Sub
で試してみましたが「最終行は２」と表示されました。数式は入っていないです。

With ws1
　 If .Cells(Rows.Count, 2).End(xlUp).Row > 3 Then　
'2だとH列から取り込みE列に表示するが店所情報に何も入っていないと題字が取り込まれる。8だと取り込まない。このようなのようない状態になります。
　　　.Range("H3", .Cells(Rows.Count, 8).End(xlUp)).Resize(, 1).Copy _
　　　Workbooks("集約表.xls").ActiveSheet.Range("E2")
　End If
　End With
　WB1.Close
End Sub

どこを改良すればよいのでしょうか？
頼ってばかりで本当にすいません。
0 hits
▼ 【45528】年度情報を集約ファイルに書き込むには？ vang 06/12/29(金) 14:42 質問
【45532】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 06/12/29(金) 17:24 発言
【45533】Re:年度情報を集約ファイルに書き込むには？ vang 06/12/29(金) 19:14 質問
【45535】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 06/12/29(金) 21:26 発言
【45538】Re:年度情報を集約ファイルに書き込むには？ vang 06/12/30(土) 15:27 発言
【45539】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 06/12/30(土) 17:56 発言
【45553】Re:年度情報を集約ファイルに書き込むには？ vang 06/12/31(日) 20:55 発言
【45558】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 06/12/31(日) 22:10 発言
【45625】Re:年度情報を集約ファイルに書き込むには？ vang 07/1/7(日) 11:46 発言
【45626】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 07/1/7(日) 11:59 発言
【45627】Re:年度情報を集約ファイルに書き込むには？ vang 07/1/7(日) 12:49 発言
【45628】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 07/1/7(日) 13:17 発言
【45629】Re:年度情報を集約ファイルに書き込むには？ vang 07/1/7(日) 13:33 発言
【45630】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 07/1/7(日) 18:34 発言
【45636】Re:年度情報を集約ファイルに書き込むには？ vang 07/1/8(月) 8:53 発言
【45638】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 07/1/8(月) 11:20 発言
【45640】Re:年度情報を集約ファイルに書き込むには？ vang 07/1/8(月) 13:25 発言
【45641】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 07/1/8(月) 13:51 発言
【45644】Re:年度情報を集約ファイルに書き込むには？ vang 07/1/8(月) 14:33 発言
【45646】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 07/1/8(月) 14:55 発言
【45649】Re:年度情報を集約ファイルに書き込むには？ vang 07/1/8(月) 15:39 発言
【45650】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 07/1/8(月) 18:48 発言
【45652】Re:年度情報を集約ファイルに書き込むには？ vang 07/1/8(月) 19:16 発言
【45653】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 07/1/8(月) 19:34 発言
【45654】Re:年度情報を集約ファイルに書き込むには？ vang 07/1/9(火) 9:55 発言
【45655】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 07/1/9(火) 10:11 発言
【45657】Re:年度情報を集約ファイルに書き込むには？ vang 07/1/9(火) 11:44 発言≪
【45658】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 07/1/9(火) 12:16 発言
【45660】Re:年度情報を集約ファイルに書き込むには？ vang 07/1/9(火) 13:07 発言
【45661】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 07/1/9(火) 13:36 発言
【45663】Re:年度情報を集約ファイルに書き込むには？ vang 07/1/9(火) 14:28 発言
【45664】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 07/1/9(火) 14:40 発言
【45665】Re:年度情報を集約ファイルに書き込むには？ vang 07/1/9(火) 14:56 発言
【45666】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 07/1/9(火) 15:20 発言
【45667】Re:年度情報を集約ファイルに書き込むには？ vang 07/1/9(火) 15:34 発言
【45668】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 07/1/9(火) 16:38 発言
【45669】Re:年度情報を集約ファイルに書き込むには？ vang 07/1/9(火) 16:47 お礼
【45670】Re:年度情報を集約ファイルに書き込むには？ かみちゃん 07/1/9(火) 16:57 発言
【45672】Re:年度情報を集約ファイルに書き込むには？ vang 07/1/9(火) 18:26 お礼
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
36264 / 76738 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free