質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
85.46%
VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

Q&A

解決済

2回答

1502閲覧

セルの書式設定をVBAで設定した際のエラー

ice930

総合スコア99

VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

0グッド

0クリップ

投稿2020/08/04 08:37

フォルダのサイズを抽出したのですが、桁数が多いので以下のコードで数字が多い場合は"MB"表記となる様、以下の様に設定しました。

Cells(RowF, 6).NumberFormatLocal = "[>=1000000]#,",,"M";#,##0"

実行すると「コンパイルエラー:修正候補ステートメントの最後」
と出てしまします。

[>=1000000]#,",,"M";#,##0 

については直接セルの書式設定から入力すると反映されるので、無理にVBAを使う必要はないのですが、今後の為に原因を知りたいです。
よろしくお願いします。

気になる質問をクリップする

クリップした質問は、後からいつでもMYページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

guest

回答2

0

直接セルの書式設定から入力すると反映されるのであれば、
マクロの記録を取られるとわかりやすいですよ。

VBA

1Cells(RowF, 6).NumberFormatLocal = "[>=1000000]#,,""M"";#,##0"

投稿2020/08/05 00:02

radames1000

総合スコア1923

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

ice930

2020/08/06 00:41

その手がありました! 同じような事がありましたら、マクロの記録から確認したいと思います。 ありがとうございます!
guest

0

ベストアンサー

文字列内で "(ダブルコーテーション)を使用したい場合は、""と記述してください。
"だと、そこで文字列が終了すると解釈されます。

VBA

1Cells(RowF, 6).NumberFormatLocal = "[>=1000000]#,",,"M";#,##0"

ではなく、

VBA

1Cells(RowF, 6).NumberFormatLocal = "[>=1000000]#,"",,""M"";#,##0"

なお、書式指定としては、未検証ですが、以下が正しいとおもいます。

VBA

1Cells(RowF, 6).NumberFormatLocal = "[>=1000000]#,,,""M"";#,##0"

K「キロ」単位の表記

投稿2020/08/04 10:18

YT0014

総合スコア1708

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

ice930

2020/08/06 00:39

"[>=1000000]#,###,,""M"";#,##0" で再現できました! 回答ありがとうございます! 質問内にコードを貼る際に#がなぜかが消えている部分がありました。 申し訳ありません。 コード内の文字列内の文字列は""M""とすることを知りませんでした!ありがとうございます。
radames1000

2020/08/06 01:39

未検証の書式は「,」が一つ多いのでご注意くださいね。
YT0014

2020/08/06 06:16

radames1000さん、フォローありがとうございます
guest

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
85.46%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問