Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
9341 / 13658 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【28015】csvでの書式設定 もうすぐ4時 05/8/26(金) 15:54 質問[未読]
【28017】Re:csvでの書式設定 りん 05/8/26(金) 16:09 発言[未読]
【28019】Re:csvでの書式設定 もうすぐ4時 05/8/26(金) 16:41 質問[未読]
【28015】csvでの書式設定
質問  もうすぐ4時  - 05/8/26(金) 15:54 -
引用なし
パスワード
   こんにちは。
今、CSVファイルにデータを出力する処理の中で、C列の書式設定を9桁の000000000で表示し、セル幅も自動設定するように、以下のように入れてみても、
「RangeクラスのAutoFitメソッドが失敗しました」といつも言われます。
他は以下のようにして設定できているのに。

　 Columns("C:C").EntireColumn.AutoFit
　 Columns("C:C").Select
　 Selection.NumberFormatLocal = "000000000"

なんででしょう？？？
【28017】Re:csvでの書式設定
発言  りん E-MAIL  - 05/8/26(金) 16:09 -
引用なし
パスワード
   もうすぐ4時 さん、こんにちわ。

>今、CSVファイルにデータを出力する処理の中で、C列の書式設定を9桁の000000000で表示し、セル幅も自動設定するように、以下のように入れてみても、
>「RangeクラスのAutoFitメソッドが失敗しました」といつも言われます。
>他は以下のようにして設定できているのに。
>
>　 Columns("C:C").EntireColumn.AutoFit
すでに列で範囲を指定してあるので、EntireColumn（範囲を列全体に拡張）はいらないですよ。
>　 Columns("C:C").Select
>　 Selection.NumberFormatLocal = "000000000"

>なんででしょう？？？
順番を変えてみましたが。
Sub test()
　 With Columns("C:C")
　　　.NumberFormatLocal = "000000000"
　　　.AutoFit
　 End With
End Sub
【28019】Re:csvでの書式設定
質問  もうすぐ4時  - 05/8/26(金) 16:41 -
引用なし
パスワード
   ▼りん さん：
　返信ありがとうございます。
　おっしゃる通りにやってました。エラーは出なくなりましたが、記述が反映されておりませんでした。
　なんでだ〜・・・

　マクロの記録からもやってみても上手くいきませんでした・・・
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
9341 / 13658 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free