アプリでもっと教えて！goo

dポイントプレゼントキャンペーン実施中！

エクセルのVBAでの自動的に数字を入れ込む方法

締切済

質問者：kameleon30
質問日時：2009/09/08 23:03
回答数：2件

ご質問です。

エクセルのVBAで、セルAに縦に数字が入っているとして、
セルAの縦の数字が固有の時には、セルBには数字の1を。
セルAの縦の数字が同じ場合には、セルBには1からの数字の連番を。

入れていくには、どのような関数を書けばよろしいでしょうか？

ご存知の方、いらっしゃればどうかご教授ください。

----------------------------------------
セルA　　　｜セルB　｜
828113341　｜　1　　｜　
828113342　｜　1　　｜　
828113342　｜　2　　｜　
828113342　｜　3　　｜　
828113343　｜　1　　｜　
828113344　｜　1　　｜　
828113344　｜　2　　｜　
828113345　｜　1　　｜　
・
・
・
----------------------------------------

宜しくお願いいたします。

この質問への回答は締め切られました。

質問の本文を隠す

回答 (2件)

最新から表示
回答順に表示

No.2

回答者： kmetu
回答日時：2009/09/08 23:15

=COUNTIF($A$1:$A1,"=" & $A1)

をB1に後は下方向にフィルでいかがでしょう。

- 0
- 件

この回答へのお礼

ありがとうございます！

悩んでいたのが、あっという間に解決しました！！

お礼日時：2009/09/09 00:14

No.1

回答者： a987654
回答日時：2009/09/08 23:11

どうしてもＶＢＡでないといけないんですか？

データがＡ１から始まっているとして
単なる関数でＢ１セルに　=COUNTIF(A$1:A1,A1)
あとはしたへコピーで簡単にできるのですが・・・・

- 0
- 件

この回答へのお礼

ありがとうございます！

悩んでいたのが、あっという間に解決しました！！

お礼日時：2009/09/09 00:14

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

質問する（無料）

似たような質問が見つかりました

Excel（エクセル）条件に合った数値の合計を表示させたい関数と条件指定の方法 3 2023/05/13 16:07
Visual Basic（VBA）エクセルVBAについて 2 2023/01/31 16:21
Excel（エクセル）エクセルで教えて下さい。 2 2022/05/18 13:00
Excel（エクセル）エクセルの祝日に色が反映しない 4 2022/05/18 09:58
Excel（エクセル）エクセルで”入力シート”の文字書式の変更を”出力シート”で同じ文字書式で印刷したいです。VBA希望 4 2023/04/24 11:07
Visual Basic（VBA）昨日、質問した件『VBA にて、条件付き書式で背景色を設定しているセルの範囲で、背景色付きのセルをカ 4 2022/04/07 14:39
Excel（エクセル） EXCEL関数（数式）を教えてください 4 2023/05/08 17:19
Excel（エクセル）エクセルでシート保護のかかり方の違いとセルの非保護の設定 3 2022/08/09 10:02
Visual Basic（VBA）先頭と末尾を指定して連続した数字を入力 1 2022/09/14 13:12
Excel（エクセル） excel アルファベットの自動入力について教えてください 2 2023/05/02 10:57

関連するカテゴリからQ&Aを探す

ページトップ

おすすめ情報

質問する（無料）

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング

おすすめ情報