- ベストアンサー
カウンター割り振りをマクロで
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
Sub sCellShift() Dim r As Long Dim c As Long For r = 1 To 100 If Worksheets("Sheet1").Cells(r, 1) = "" Then Exit For End If For c = 10 To 2 Step -1 Worksheets("Sheet2").Cells(r, c) = Worksheets("Sheet1").Cells(r, c - 1) Next Worksheets("Sheet2").Cells(r, 1) = r Next End Sub これでいかがですか？頑張ってくださいヽ(^。^)ノ
関連するQ&A
- EXCEL2003でマクロを作りたいのですが教えて下さい。
エクセル2003を使っています。 マクロの初心者なので、 下記のようなマクロの作り方を詳しく教えて下さい。 他にも簡単な方法があればお願いします。 ＜シート１＞ ＜シート2＞ A B C D A B C D 1 名前 郵便番号 住所 金額 1 名前 2 以下、データ 2 郵便番号 3 3 住所 ・ ・ 10 10 金額 ＜シート1＞にはＡ1～Ｄ1までデータがあります。（50行） ＜シート2＞の1ページ目に＜シート1＞の1行目のデータを入れたいです。 ＜シート1＞は全部で50行のデータがあり、 ＜シート2＞は1～10行までを1ページとし、50ページ作りたいです。 いろいろ調べてみたのですが、わからなかったので 説明不足かもしれませんが、よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- excelのマクロ選択用マクロ
お世話になります。 excelで分からない事があるので答えていただけたら幸いです。 質問の内容ですが、 同じシート内に、A,B,C,D,Eのマクロがあります。 これらのマクロを,プルダウンから選んで実行する為のマクロを作りたいのですが、可能でしょうか？ よろしくお願い致します。
- ベストアンサー
- オフィス系ソフト
- マクロ構文作って下さい
こんばんは 大変恐縮ですが 下記のマクロを作っていただけませんか？ 僕にはまったく作れませんでした… 作業工程に自動に名前を入力したいのです その際、ある人は出来ない行程がある それを踏まえて頻度が低い順に行程に自動に名前（数字)入力する A B C D E F の六個の工程 1 2 3 4 5 6 の六人 1 2はA Bしか出来ない 5 6はE Fしか出来ない この条件で 一撃で自動に判断して名前（数字)を入力したいです セル位置や シート数はお任せです。
- ベストアンサー
- その他MS Office製品
- エクセルのマクロでこういったことはできますでしょうか。
顧客管理で下記のようなことがしたいと思っています。 マクロ初心者なのですが、こういったことは可能でしょうか。 (1)事前に、顧客管理のデータ入力用ファイル（以下データファイル）、Ａ、Ｂ、Ｃ、Ｄ、Ｅという定型ファイルを作成しておく。Ａ～Ｅには、全て複数のシートが入っており、シート１にデータファイルに入力した情報が飛ぶようにしたい。 (2)データファイルに顧客情報「あ」を入力し、シート上に作成しておいたＡという名のマクロボタンを押すと、Ａのファイルのシート１に「あ」という情報が飛び、さらに、Ａファイルは原本なので、“「あ」Ａ”という名前の新しいファイルを作成できるようにしたい。 (3)同じように、データファイルに顧客情報「い」を入力して、今度はＢというボタンを押したら、Ｂファイルのシート１に「い」という情報が飛び、“「い」Ｂ”という名前のファイルが新しく作成できるようにしたい。 非常にわかりにくい説明で申し訳ないのですが、これから自分でマクロやＶＢＥを勉強しようと思っており、実際こういったことが可能なのかどうか、ご教示頂けますと幸甚です。何卒よろしくお願い致します。
- ベストアンサー
- オフィス系ソフト
- Excelマクロで教えて下さい。
Excelマクロで教えて下さい。 シート1に下記のような表がありまして その表の有休・公休取得者の名前を日にち別に シート2にまとめたいのですがマクロを教えて下さい。 ・日にちは3ヶ月並びます。 ・人数は50人います。 ・休みの種類は5種類あります。 ・有：有休 公：公休 出：出勤(本来は空欄です) 表の入力が難くわかり難いですが宜しく御願い致します。 シート1 名前 3/1 3/2 3/3 3/4 3/5 A氏 出 有 有 出 出 B氏 有 有 出 公 出 C氏 出 出 有 有 出 D氏 出 有 出 出 有 E氏 有 出 出 有 公 シート2 有休 3/1 B氏 E氏 3/2 A氏 B氏 D氏 3/3 A氏 C氏 3/4 C氏 E氏 3/5 D氏 公休 3/1 3/2 3/3 3/4 B氏 3/5 E氏
- ベストアンサー
- オフィス系ソフト
- excelのグラフ作成をマクロで
excelのデータが多くてマクロで手っ取り早く処理したいのですが、どうすればよいのでしょうか？ 初心者なもので。。。 A列をx軸にしてB列～P列をy軸にします。 1枚目がAとBでグラフを作成し、続いて2枚目としてAとCでグラフ作成し、同様にD・E・F・・・って作成したいです。 グラフは新しいシートを作成していきたいです。（計15枚だと思います。） で、そのシートの名前もつけたいです。 で、書式設定もマクロ上できたらうれしいです。 できないでしょうか？ よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- マクロ
【シート１】 A B C D E １ 2月1日 ２ ○○会社 ３ No. 201012 ４ 東京都 渋谷区 【シート２】 A B C D E １ 201012 2月1日 ○○会社 東京都 渋谷区 ２ 201014 3月14日 ▽▽会社 大阪府 大阪市 ３ 201015 2月26日 ■■会社 愛知県 名古屋市 ４ 201017 5月11日 ★★会社 滋賀県 大津市 シート１の「E1」「A2」「E3」「A4」「C4」セルに毎回違う文字を入力します。 このシート１の入力データをマクロでシート２へ蓄積していきたいのですが、 どのようなマクロを組めば良いですか？
- ベストアンサー
- Windows 7
- エクセルマクロ 日付を検索し入力
エクセル2003マクロを使用して以下の事を行いたいと思っていますが、どのようなマクロを組んだらよいか分かりません。よろしくお願いします。 シート上部にある以下のデータを A B C D E 1 日付 商品A 商品B 商品C 商品D 2 5/26 5 6 1 3 ←その日のデータ（毎日変わる） 入力ボタンを作成し、それを押すことにより ↓ 6 5/1 7 ・ 8 ・ 9 5/26 5 6 1 3 10 ・ ↑日付が予め入力された表 上記のような、同一シート上の日付欄に入力される表を作りたいのですが、方法が分かりません。 その日のデータは、別シートに入力用フォームを作成し、飛ばしています。何人かの人間が入力するので、マクロで簡単に、行えるようにしたいと思います。よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- マクロ NO番号・上からの行で入力したい。
マクロを使い。自動でNO番号とSheet２に上からの行で入力させたいです。是非、方法を教えてください。 例）SHEET１ A１ 空白 A２ 買い物 A３ 金額 A４ 残金 入力ボタンをクリックしたらSheet２へ 例）SHEET2 A B C D 12 買い物 金額 残金 と自動で番号が記載され、上の行からどんどん入力記載されるように作りたいのですが、マクロで作れますか？教えてください。 マクロの記述も詳しく教えてください。
- ベストアンサー
- オフィス系ソフト
- エクセルの抽出？のマクロ作成について
こんばんは、じつはエクセルでどうしても整理したい事項がありましてどうやらマクロでやらないとすごい時間かかりそうなもので、是非ともお教えいただきたいのですが（VBAはほとんど初心者です＾＾；；） 例えば ガンダムのおもちゃが置いてある店のリストのシートと ルパンのおもちゃが置いてある店のリストのシートと ドラクエのおもちゃが置いてある店のリストのシートの３つのシートを手に入れている場合に ガンダムは a,b,c,dの4店にあり ルパンは b,c,d,e の4店にあり ドラクエは d,eの2店にあるようなばあいに a店 ガンダム b ガンダム ルパン c ガンダム ルパン d ガンダム ルパン ドラクエ e ルパン ドラクエ というようにわかりやすくどのおもちゃはどこに何種類おいているかの表をつくりたいのですが、どのようにマクロを作成したらよいのでしょうか？？ 是非お教えいただけると幸いです。よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
お礼
補足をしたのですが自分で解決できました。 有難うございました。
補足
早速のご回答有難うございます。 出来ました。 あともうひとつ教えていただきたいのですが sheet1のないようが Ａ Ｂ Ｃ Ｄ Ｅ １ Ａ Ｂ Ｈ Ｑ Ｄ ２ Ｆ Ｈ Ｄ Ｔ Ｕ ３ ０ ０ ０ ０ ０ ４ ０ ０ ０ ０ ０ ５ ０ ０ ０ ０ ０ 三行目からはゼロが入っていて この場合は２行目までをＳＥＱを割り振るということも出来ますか？