Excel VBA質問箱 IV

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

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


50028 / 76732 ←次へ | 前へ→

【31600】Re:フォルダ内の資料を全て開いて閉じる...
質問  まい  - 05/11/26(土) 12:14 -

引用なし
パスワード
   ちくたくさん、こんにちわ。

検索した文字をうまく取得できない状態です。 
1行目のデータを取り込んでしまいます。
アドバイスお願いします。

> myData = Range("A1:W" & myWb.ActiveSheet.Range("A65536").End(xlUp).Row)
この命令はA1の行にある1行を取得ということでしょうか?
A65536はA列〜どこまでの列を指定するかによって変わるのでしょうか?    

>    For i = 1 To UBound(myData, 1)
>      For j = 1 To 23
>        If myData(i, j) = "検索文字列" Then   '検索文字列を入力
>          newWb.ActiveSheet.Rows(k) = myData
>          k = k + 1
>          End If
>       Next j
>    Next i
上記は検索文字列を引っ張るということですよね?
0 hits

【31560】フォルダ内の資料を全て開いて閉じる方法 まい 05/11/25(金) 15:35 質問
【31562】Re:フォルダ内の資料を全て開いて閉じる方法 Kein 05/11/25(金) 15:46 回答
【31563】Re:フォルダ内の資料を全て開いて閉じる方法 ちくたく 05/11/25(金) 15:48 回答
【31564】Re:フォルダ内の資料を全て開いて閉じる... まい 05/11/25(金) 16:11 質問
【31566】Re:フォルダ内の資料を全て開いて閉じる... ちくたく 05/11/25(金) 16:42 回答
【31600】Re:フォルダ内の資料を全て開いて閉じる... まい 05/11/26(土) 12:14 質問
【31681】Re:フォルダ内の資料を全て開いて閉じる... こたつねこ 05/11/28(月) 13:37 回答
【31687】Re:フォルダ内の資料を全て開いて閉じる... ちくたく 05/11/28(月) 15:09 お礼
【31689】Re:フォルダ内の資料を全て開いて閉じる... こたつねこ 05/11/28(月) 16:04 発言
【31688】Re:フォルダ内の資料を全て開いて閉じる... こたつねこ 05/11/28(月) 15:12 回答

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