No.6ベストアンサー
- 回答日時:
下記URLにアップしました。
https://ideone.com/TfSr2u
修正箇所は30行目に
ws2.Rows("2:" & Rows.Count).ClearContents
を追加しただけです。
これで、以前の転記分が全てクリアされ、新たに2行目から転記されます。
No.5
- 回答日時:
>因みにシートが増えた場合の方法も分かればご教授お願いします。
転記先のシートが3つ以上になるということでしょうか。
そうであれば、現行のマクロを改造しますので、下記URLにアップしてください。
アップ先URL
https://ideone.com/
アップ方法
①左下のボタンを選択し、Textを選択する。
②入力欄に”your text goes here”が表示されるので、その文字を削除する。
③マクロをコピーし、②の入力欄に貼り付ける。
④右下のRunのボタンをクリックする。
⑤結果が表示されるので、その結果が表示されたURLを控える。
⑥そのURLをこのサイトに提示する。
No.4
- 回答日時:
>400文字以上打つことが出来ないので、直接入力出来ません。
>どうすれば、打てますか?
他のサイトにアップしていただく方法もありますが、
要件によっては前のマクロを無視して、新規にマクロを作る方法も考慮中です。
要件が、きちんと定まっていないので、まずは、要件をきちんと確認したいと思います。それまでは、マクロの提示は控えていただいて構いません。
No3の返信をまって、決めたいと思っています。
No.3
- 回答日時:
1.ソースをみると、転記先へは再実行の場合でも、2行目から転記しています。
「二度目を実行した際、抽出したシートの最終行」の次へ転記することはないと思いますが、いかがでしょうか。2.表の3列目の男、女に一致したシート名に転記していますが、
男、女は単なる例であり、実際は、他の名称なのでしょうか。
又、転記先のシート数はこの例では、2つ(男、女)ですが、
実際は3つ以上あるのでしょうか。
No.2
- 回答日時:
補足ありがとうございました。
1.マクロは画像ではなく、テキストで提示していただけませんでしょうか。
こちらで、そのマクロを動作確認し、修正します。
2.シートは全部で3つでしょうか。
シート名は左側から順に
表、男、女
でしょうか。
No.1
- 回答日時:
>現在、転記元の文字が一致したワードを別シートに転記していくマクロを組んでもらいました。
その質問をしたURLを提示してください。
そうしないと、回答者には、どのようなマクロなのか、シートのレイアウトがどのようになっているのかも、わかりません。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) Sheet「状況」から、分類の年齢別カウント数をSheet「D表」へ転記する下記マクロを作っています 7 2022/12/14 17:57
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/03/02 08:40
- Excel(エクセル) Excelマクロ 差分抽出の方法が知りたいです。 2 2023/03/07 13:25
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/03/12 10:10
- Visual Basic(VBA) VBA同じシートの別ブックに転記していく方法 3 2022/11/28 12:14
- Visual Basic(VBA) Sheet3から2つの条件でオートフィルターで抽出した個数をSheet2へ入力するマクロで、一つ目の 4 2023/01/12 23:40
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/10/11 12:55
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/03/07 14:05
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/03/01 15:44
- Visual Basic(VBA) 別シートから年齢別の件数をカウントしたいの続き 5 2023/01/24 00:16
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルのマクロボタンが編集...
-
Application.Runエラー(1004)
-
Access終了時にマクロまたはVBA...
-
別シートのマクロを実行する方法
-
access2010 コマンドまたはアク...
-
シート保護を掛けたまま並べ替...
-
InputBox内の表示について
-
今日の日付の範囲を指定して印...
-
マクロとモジュールの違いを教...
-
エクセルの右クリックにオートS...
-
エクセルVBAで、ボタンの文字を...
-
ExcelのVBAでDisplayalertsで警...
-
エクセルのマクロ
-
エクセル 当月分のデータを抽出...
-
マクロ 戻るボタンを押したらシ...
-
private sub にしたらマクロが...
-
<<ACCESS2000>>マクロでクエリ...
-
マクロで図形を一度に消去したい
-
Workbook_Openを起動時以外に呼...
-
アクセスの更新クエリをフォームで
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルのマクロボタンが編集...
-
別シートのマクロを実行する方法
-
Access終了時にマクロまたはVBA...
-
Application.Runエラー(1004)
-
シート保護を掛けたまま並べ替...
-
エクセルVBAで、ボタンの文字を...
-
access2010 コマンドまたはアク...
-
マクロ 戻るボタンを押したらシ...
-
InputBox内の表示について
-
特定のシートだけ印刷はマクロ...
-
ExcelのVBAでDisplayalertsで警...
-
エクセル VBA SendKeys ループ...
-
マクロが登録できません
-
今日の日付の範囲を指定して印...
-
AccessでExcelファイルを印刷
-
プロシージャが大きすぎます!
-
エクセルのマクロ
-
Workbook_Openを起動時以外に呼...
-
アクセス:検索フォームボタンに...
-
特定マクロが実行されたか確認...
おすすめ情報
https://gyazo.com/e27d8b5a80cbc06d699c2375b36c4446
https://gyazo.com/110fa64802eecfd2ca8104e19c01fe92
https://gyazo.com/8053edf04508fe2e45d23ddd5e2c19a0
転記元にあるシートを”男”と”女”に分けるマクロで
再び、マクロを起動させると別シートに”男”と”女”に
分けたシートが全て削除されて新たに転記させる事が
出来ると思うのですが、当方には分かりません。
宜しくお願いします。
https://gyazo.com/4360e39af790391827c7405eabfff468
マクロはこんな感じです。
画像の都合上、マクロは若干加工しています。
宜しくお願いします。
400文字以上打つことが出来ないので、
直接入力出来ません。
どうすれば、打てますか?
URLは3シートです。
因みにシートが増えた場合の方法も分かれば
ご教授お願いします。
https://ideone.com/bJ7Jm3
これでいいのか分かりませんが、
貼りつけました。
宜しくお願いします。
20~30シートに対応出来るようにしたいです。