□ 戻る □一般操作のサロン □ 使用方法 □ 新着記事 □ 新規に質問する！ □ トピック一覧 □ 検索 □ 過去ログ
[ 最新記事及び返信フォームをトピックトップへ ]
| コード_連番で新しい管理番号を自動取得したい | |
|---|---|
[195247] コード_連番で新しい管理番号を自動取得したい- ■親トピック/記事引用/メール受信=OFF■ □投稿者/ はたやん -(2022/09/10(12:53)) □U R L/ 困っています、よろしくお願いします！！
A列に下記のように管理番号が入っています。
コード_連番
27226001_1
27226001_3
27226001_2
27226001_4
27226002_1
27226003_1
27226004_1
27226001のコードの数をcountして、
新しい管理番号を自動取得したいです。
期待する値は、27226001_5
となります。
ワイルドカードやinstr関数を使ったりなど
色々試しているんですが、思うような
結果を導き出せません。
何が悪いのでしょうか？
--------------------------------
Dim code As String
Dim no as long
dim kanri_no As String
code = "27226001"
no = WorksheetFunction.CountIf(Range("A8:A100000"), code)
kanri_no = code & "_" & no + 1この記事にはVBAのコードが含まれています。 緑の太文字→注釈 茶色の太文字→条件分岐 赤の太文字→ループ 青の太文字→その他 | |
[195248] Re[1]: コード_連番で新しい管理番号を自動取得したい- ■記事引用/メール受信=OFF■ □投稿者/ マナ -(2022/09/10(14:41)) □U R L/ code & "_*" で検索してはどうですか | |
[195249] Re[2]: コード_連番で新しい管理番号を自動取得したい- ■記事引用/メール受信=OFF■ □投稿者/ マナ -(2022/09/10(14:49)) □U R L/ でも、２つ同時に、"27226001" が追加されるとだめですが… | |
[195250] Re[2]: コード_連番で新しい管理番号を自動取得したい- ■  / 記事引用/メール受信=OFF■
□投稿者/ はたやん -(2022/09/10(14:55)) □U R L/ ＞マナ 検索結果うまく表示しました。 ありがとうございました。 というより、私の勘違いでした。 列番号を間違ってました、騒いでしまってすみません。。。 | |