Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
6681 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【43797】VBAでのワークシート関数の使い方 ガッシュ 06/10/26(木) 8:31 質問[未読]
【43798】Re:VBAでのワークシート関数の使い方 ぱっせんじゃー 06/10/26(木) 8:42 発言[未読]
【43803】Re:VBAでのワークシート関数の使い方 ガッシュ 06/10/26(木) 9:43 質問[未読]
【43804】Re:VBAでのワークシート関数の使い方 こうちゃん 06/10/26(木) 10:01 回答[未読]
【43806】Re:VBAでのワークシート関数の使い方 ガッシュ 06/10/26(木) 10:16 お礼[未読]
【43797】VBAでのワークシート関数の使い方
質問  ガッシュ  - 06/10/26(木) 8:31 -
引用なし
パスワード
   おはようございます。
ワークシート関数で、
セルＡに入力された７〜１２文字の文字列より、
右から３番目の数字をキーポイントにデータを分類したいです。
右から３番目の数字は１〜５までの数字です。
これをＶＢＡでマクロを組むと
どういうソースを書いたらいいでしょうか？
初心者です。よろしくお願いします。
【43798】Re:VBAでのワークシート関数の使い方
発言  ぱっせんじゃー  - 06/10/26(木) 8:42 -
引用なし
パスワード
   Right関数が使えます。
考え方は一般関数のRIGHTと同じです。
【43803】Re:VBAでのワークシート関数の使い方
質問  ガッシュ  - 06/10/26(木) 9:43 -
引用なし
パスワード
   右から３つ目の数字を判別に使いたいのですが、
Right関数だと、右から３つ目を指定すると
３文字抽出されますよね。
その抽出した頭文字を判別に使うにはどうしたらいいでしょうか？
【43804】Re:VBAでのワークシート関数の使い方
回答  こうちゃん  - 06/10/26(木) 10:01 -
引用なし
パスワード
   みなさん、こんにちは

Dim aaa
aaa = "123456"
MsgBox Right(aaa, 3)

MsgBox Left(Right(aaa, 3), 1)
MsgBox Mid(aaa, Len(aaa) - 2, 1)

こんな感じでどう？
【43806】Re:VBAでのワークシート関数の使い方
お礼  ガッシュ  - 06/10/26(木) 10:16 -
引用なし
パスワード
   ▼こうちゃん さん

なるほど、後はSelect CASEで分ければいいですね、
参考になりました。
ありがとうございました！
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
6681 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free