
初心者です。
会社で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も見ています
-
【Excel VBA】CSV取込時、数字の先頭の0を消えないようにするには?
Excel(エクセル)
-
【Excel VBA】先頭の「0」飛びを埋める方法
Visual Basic(VBA)
-
VBA初心者です。電話番号の数字の前に0を表示させたいです。
Visual Basic(VBA)
-
-
4
エクセルvbaで転記したのですが、数字のゼロが消えてしまいます。 ゼロも転記するためにはどうしたらい
Excel(エクセル)
-
5
CSVファイルの「0落ち」にVBA
Access(アクセス)
-
6
EXCEL VBAで、セルの文字列の前後に文字を入力する方法は?
その他(Microsoft Office)
-
7
ExcelのVBA。public変数の値が消える
Visual Basic(VBA)
-
8
エクセルVBAで、条件に一致するセルへ移動
Excel(エクセル)
-
9
【VBA】特定の値が入った行をコピーして別シートに貼り付ける方法をおしえていただきたいです。
Excel(エクセル)
-
10
同じ文字列なのにfalseになってしまいます。
Excel(エクセル)
-
11
VBAで特定の文字を探して隣のセルに色を付けたい
Excel(エクセル)
-
12
VBA 指定した列にある日時データから時間を削除する方法について
Excel(エクセル)
-
13
エクセル関数で文字列の中のスペースの有無を調べたい。
Excel(エクセル)
-
14
VBA シートのボタン名を変更したい
Visual Basic(VBA)
-
15
エクセルで電話番号にハイフンを入れるには?
Excel(エクセル)
-
16
Excel 文字列の前後に、特定の文字を付加したい
Excel(エクセル)
-
17
Excel VBA A列が特定の値以外の場合、その行を削除
Excel(エクセル)
-
18
Excel2000/VBA:値と書式のみ貼り付けたい。
Excel(エクセル)
-
19
EXCELVBAにて文字列にして「01」と表示させて、CSV形式で保存すると「1」になってしまう。
その他(プログラミング・Web制作)
-
20
VBAで文字列を数値に変換したい
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルでアルファベットか数...
-
EXCELで=より左の文字を一括で...
-
文字列からタブコードを取り除...
-
ORCLEでの小数の表示方法の変更...
-
VBAでの Replace関数で、ワイル...
-
エクセルで文字列をtxtファイル...
-
Left関数とRight関数を合わせた...
-
エクセルで文字列の最大値を抽...
-
VBA2005 16進を2桁で表示したい。
-
Msgboxの×が押されたとき
-
Pro c/c++ でホスト変数の後に....
-
文字列の最後の文字を置き換え...
-
エクセル 数値データを桁をそ...
-
MS SQLServer のSQLで文字列の...
-
aaa.bbb.ccc という、「ドット...
-
【Excel VBA】複数ある特定の文...
-
【Teratermマクロ】文字列の分...
-
C#で年月を比較する
-
OnTime 使用時のプロシージャへ...
-
アクセスで特定の数字以外(複...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルでアルファベットか数...
-
EXCELで=より左の文字を一括で...
-
文字列からタブコードを取り除...
-
VBAでの Replace関数で、ワイル...
-
エクセルで文字列をtxtファイル...
-
【Excel VBA】複数ある特定の文...
-
エクセル 数値データを桁をそ...
-
Excelで3E8を3.00E+8にしない方...
-
VBA2005 16進を2桁で表示したい。
-
エクセルで文字列の最大値を抽...
-
同一セル内に関数と文字列を同...
-
Left関数とRight関数を合わせた...
-
Excelで指数表現しないようにす...
-
MS SQLServer のSQLで文字列の...
-
VBの「As String * 128」とは?
-
エクセルでセル内の文字列の最...
-
ORCLEでの小数の表示方法の変更...
-
bashスクリプトでの文字列から...
-
LEFT関数で文字数を指定しない...
-
アクセスで特定の数字以外(複...
おすすめ情報