
初心者です。
会社でRPAを導入することになり、これまで手作業でしていたことを自動化させようとしています。
毎日3-50件の顧客データを処理するのですが、CSVでダウンロードしたら電話番号が数値として認識されてしまい、先頭の0が消えてしまいます。
データ自体は毎回同じ形式でダウンロードできるので、例えば毎回A1:A50が名前、C1:C50が電話番号という風に場所は決まっています。
VBAを使って桁数で調整する方法は携帯番号の11桁と固定電話の10桁(市外局番がない場合は7桁)と相性が悪いので使えません。
自動化のための作業なので何かを手入力するというようなこともできないので、何か良い方法があれば教えていただきたいです。
また、もっと良い方法があるなら教えてください。
No.2ベストアンサー
- 回答日時:
こんにちは!
C列は必ず電話番号になっているのですね。
そしてハイフンなしの数値になっている!という前提で・・・
一例です。
Sub Sample1()
Dim c As Range
With Range("C1:C50")
.NumberFormatLocal = "@"
.HorizontalAlignment = xlRight
End With
For Each c In Range("C1:C50")
If c <> "" Then
If Len(c) > 7 And Left(c, 1) <> "0" Then
c = "0" & c
End If
End If
Next c
End Sub
こんな感じではどうでしょうか?m(_ _)m
No.4
- 回答日時:
こんにちは
No3様に賛成です。
VBAでCSVを読む際には文字列として扱うことになりますので、そのままセルに代入しても文字列のまま認識されるはずです。
とは言え、後々の誤操作等で数値化してしまうのを防止する意味からも、予めC列(あるいはシート全体)の書式を「文字列」に設定しておいてから代入するほうがよろしいかと思います。
CSVの読込みに関しては、検索すれば数多く解説サイトが見つかることと思います。
ご参考まで。
No.3
- 回答日時:
こんにちは、
>CSVでダウンロードしたら電話番号が数値として認識されてしまい、先頭の0が消えてしまいます。
自動化するのであれば、データの入出力も自動化すると思いますが、であれば、
VBAでCSVをインポートする際に、カラム3にシングルコーテーションを付けるなどして文字列にするだけで良いのでは?
環境が見えませんが、CSV出力側で加工できるなら、越した事はありませんが
No.1
- 回答日時:
ようするに、まずはExcelのセルの属性をVBAで参照・設定したい・・・ということですよね?
でしたらGoogleなどで「Excel VBA セルの属性 文字列」といったキーワードで検索されてみて下さい。様々な解説ページがヒットするはずです。
セルごとに文字列長が事なる際、それぞれの先頭に文字または文字列を挿入したいという場合も同様の考え方で「Excel VBA セル 文字列の先頭 挿入」といった感じのキーワードで検索されるとよいように思います。
独学で知識を広めたいと思う際は「適当(=適切)な検索キーワードを思い付く」というのも結構大切なスキルになります。(^^;
参考まで。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBA初心者です。電話番号の数字の前に0を表示させたいです。 2 2022/12/14 03:58
- Android(アンドロイド) Googleからのメールに対してどう操作するのか? 1 2023/01/08 19:34
- 会社・職場 フリーランスで仕事をする人にとっての携帯番号 1 2022/09/18 01:40
- 個人事業主・自営業・フリーランス こちらの連絡先は教えなくて良い? 4 2022/09/18 11:03
- 消費者問題・詐欺 悪質リサイクル業者からの迷惑電話に非常に困ってます。 悪質リサイクル業者は今年6月に入ってからいろん 5 2022/06/22 19:16
- その他(プログラミング・Web制作) 入力フォームへ、データを自動的に入力するプログラム。どうやって作る? 4 2023/01/16 10:24
- その他(プログラミング・Web制作) プログラムの起動、利用について、使用期間を設定する方法 3 2023/08/06 21:03
- その他(コンピューター・テクノロジー) 下に書いたの条件でgoogleアカウントの復旧方法等を教えてください。 1 2023/02/06 23:32
- その他(セキュリティ) IDと暗証番号・パスワードの管理の画期的かつ簡単便利な方法を考案した。他人に検証してもらう方法は? 5 2023/02/08 08:49
- Excel(エクセル) 【Excel】住所に郵便番号を付記する方法 3 2022/05/07 17:15
このQ&Aを見た人はこんなQ&Aも見ています
-
これまでで一番「情けなかったとき」はいつですか?
これまでの人生で一番「情けない」と感じていたときはいつですか? そこからどう変化していきましたか?
-
いちばん失敗した人決定戦
あなたの「告白」での大失敗を教えてください。
-
今の日本に期待することはなんですか?
目まぐるしく、日本も世界も状況が変わる中、あなたが今の日本に期待することはなんですか?
-
この人頭いいなと思ったエピソード
一緒にいたときに「この人頭いいな」と思ったエピソードを教えてください
-
14歳の自分に衝撃の事実を告げてください
タイムマシンで14歳の自分のところに現れた未来のあなた。 衝撃的な事実を告げて自分に驚かせるとしたら何を告げますか?
-
【Excel VBA】CSV取込時、数字の先頭の0を消えないようにするには?
Excel(エクセル)
-
【Excel VBA】先頭の「0」飛びを埋める方法
Visual Basic(VBA)
-
VBA初心者です。電話番号の数字の前に0を表示させたいです。
Visual Basic(VBA)
-
-
4
エクセルvbaで転記したのですが、数字のゼロが消えてしまいます。 ゼロも転記するためにはどうしたらい
Excel(エクセル)
-
5
EXCEL VBAで、セルの文字列の前後に文字を入力する方法は?
その他(Microsoft Office)
-
6
CSVファイルの「0落ち」にVBA
Access(アクセス)
-
7
B列の最終行までA列をオートフィル
Visual Basic(VBA)
-
8
EXCELからCSVへ変換すると0が消えてしまいます
Excel(エクセル)
-
9
もしセルが#N/A"なら~をする・・・には?"
Excel(エクセル)
-
10
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
11
Access2007 ラベルの削除ができない。
Access(アクセス)
-
12
VBAで特定の文字が入力されたセルを選択
Excel(エクセル)
-
13
ラベルとテキストボックスのグループ化を解除したい
Access(アクセス)
-
14
EXCEL VBA 文字列から電話番号を抽出したいのですが
Excel(エクセル)
-
15
オートフィルターをかけ、#N/A以外で絞込みするVBA記述をご教示ください
Excel(エクセル)
-
16
MsgBoxの中にある数字や日付の書式指定をしたい
Visual Basic(VBA)
-
17
エクセルVBAで、条件に一致するセルへ移動
Excel(エクセル)
-
18
エクセルで電話番号にハイフンを入れるには?
Excel(エクセル)
-
19
EXCELVBAにて文字列にして「01」と表示させて、CSV形式で保存すると「1」になってしまう。
その他(プログラミング・Web制作)
-
20
VBA 存在しないシートを選択した時にエラーメッセージを表示するには?
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・一番好きなみそ汁の具材は?
- ・泣きながら食べたご飯の思い出
- ・「これはヤバかったな」という遅刻エピソード
- ・初めて自分の家と他人の家が違う、と意識した時
- ・いちばん失敗した人決定戦
- ・思い出すきっかけは 音楽?におい?景色?
- ・あなたなりのストレス発散方法を教えてください!
- ・もし10億円当たったら何に使いますか?
- ・何回やってもうまくいかないことは?
- ・今年はじめたいことは?
- ・あなたの人生で一番ピンチに陥った瞬間は?
- ・初めて見た映画を教えてください!
- ・今の日本に期待することはなんですか?
- ・集中するためにやっていること
- ・テレビやラジオに出たことがある人、いますか?
- ・【お題】斜め上を行くスキー場にありがちなこと
- ・人生でいちばんスベッた瞬間
- ・コーピングについて教えてください
- ・あなたの「プチ贅沢」はなんですか?
- ・コンビニでおにぎりを買うときのスタメンはどの具?
- ・おすすめの美術館・博物館、教えてください!
- ・【お題】大変な警告
- ・洋服何着持ってますか?
- ・みんなの【マイ・ベスト積読2024】を教えてください。
- ・「これいらなくない?」という慣習、教えてください
- ・今から楽しみな予定はありますか?
- ・AIツールの活用方法を教えて
- ・最強の防寒、あったか術を教えてください!
- ・歳とったな〜〜と思ったことは?
- ・モテ期を経験した方いらっしゃいますか?
- ・好きな人を振り向かせるためにしたこと
- ・スマホに会話を聞かれているな!?と思ったことありますか?
- ・それもChatGPT!?と驚いた使用方法を教えてください
- ・見学に行くとしたら【天国】と【地獄】どっち?
- ・これまでで一番「情けなかったとき」はいつですか?
- ・この人頭いいなと思ったエピソード
- ・あなたの「必」の書き順を教えてください
- ・14歳の自分に衝撃の事実を告げてください
- ・人生最悪の忘れ物
- ・あなたの習慣について教えてください!!
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルでアルファベットか数...
-
VBAでの Replace関数で、ワイル...
-
エクセルで文字列の最大値を抽...
-
文字列からタブコードを取り除...
-
EXCELで=より左の文字を一括で...
-
Excelで3E8を3.00E+8にしない方...
-
【Excel VBA】複数ある特定の文...
-
同一セル内に関数と文字列を同...
-
エクセル 数値データを桁をそ...
-
aaa.bbb.ccc という、「ドット...
-
MS SQLServer のSQLで文字列の...
-
Left関数とRight関数を合わせた...
-
Excelで指数表現しないようにす...
-
エクセルで文字列をtxtファイル...
-
ORCLEでの小数の表示方法の変更...
-
Pro c/c++ でホスト変数の後に....
-
VBA2005 16進を2桁で表示したい。
-
CStringの文字列検索&抜き出し...
-
VBscriptからバッチに変数を渡...
-
“丸(〇/○/◯)”に似た文字…
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルでアルファベットか数...
-
EXCELで=より左の文字を一括で...
-
VBAでの Replace関数で、ワイル...
-
文字列からタブコードを取り除...
-
エクセルで文字列の最大値を抽...
-
Excelで指数表現しないようにす...
-
Excelで3E8を3.00E+8にしない方...
-
Left関数とRight関数を合わせた...
-
エクセル 数値データを桁をそ...
-
エクセルで文字列をtxtファイル...
-
VBA2005 16進を2桁で表示したい。
-
【Excel VBA】複数ある特定の文...
-
同一セル内に関数と文字列を同...
-
MS SQLServer のSQLで文字列の...
-
C#で年月を比較する
-
アクセスで特定の数字以外(複...
-
VBの「As String * 128」とは?
-
ORCLEでの小数の表示方法の変更...
-
Msgboxの×が押されたとき
-
aaa.bbb.ccc という、「ドット...
おすすめ情報