Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

7025 / 13646 ﾂﾘｰ

←次へ　｜　前へ→

▼

【41695】小数点繰上げしているセルの値を別のセルに入力するには？ eri 06/8/20(日) 14:33

【41696】Re:小数点繰上げしているセルの値を別のセ... [名前なし] 06/8/20(日) 14:47

【41697】Re:小数点繰上げしているセルの値を別のセ... eri 06/8/20(日) 14:57

【41698】Re:小数点繰上げしているセルの値を別のセ... [名前なし] 06/8/20(日) 15:10

【41700】Re:小数点繰上げしているセルの値を別のセ... eri 06/8/20(日) 15:27

【41699】Re:小数点繰上げしているセルの値を別のセ... かみちゃん 06/8/20(日) 15:14

【41701】Re:小数点繰上げしているセルの値を別のセ... eri 06/8/20(日) 15:28


	【41695】小数点繰上げしているセルの値を別のセル...

eri - 06/8/20(日) 14:33 -


	引用なし

	パスワード

小数点繰上げしているセルの値を別のセルに入力したいのです。
セルを視覚的に見ると1.64と表示しています。
そのセルをクリックすると1.637と表示されています
セルの書式設定で1.64と表示されているのですがこの1.64を別のセルに入力したいのですが、1.637と表示されてしまいます。

1.64と入力するにはどうしたらいいでしょうか？


	【41696】Re:小数点繰上げしているセルの値を別の...

[名前なし] - 06/8/20(日) 14:47 -


	引用なし

	パスワード

セルのTextプロパティを使用してみてください。

参考になりそうな過去ログです。
http://www.vbalab.net/vbaqa/c-board.cgi?cmd=ntr;tree=38939;id=excel


	【41697】Re:小数点繰上げしているセルの値を別の...

eri - 06/8/20(日) 14:57 -


	引用なし

	パスワード

早速のお返事ありがとうございました。

たしかに1.64と表示されているのですが、
クリックして数式バーの値をみると1.635となっています。

数式バーの値も1.64としたいのです。


	【41698】Re:小数点繰上げしているセルの値を別の...

[名前なし] - 06/8/20(日) 15:10 -


	引用なし

	パスワード

>小数点繰上げしているセルの値を別のセルに入力

というのが、仮に

小数点繰上げしているセル → A1
別のセル　　　　　　　　 → B1

だとして、

Range("B1").Value = Range("A1").Text

で出来ませんか？


	【41699】Re:小数点繰上げしているセルの値を別の...

かみちゃん - 06/8/20(日) 15:14 -


	引用なし

	パスワード

こんにちは。かみちゃん　です。

横から失礼します。

>たしかに1.64と表示されているのですが、
>クリックして数式バーの値をみると1.635となっています。
>
>数式バーの値も1.64としたいのです。

別解として、こんな方法はいかがでしょうか？

Sub test3()
　Dim dblData As Double

　dblData = 1.637
　Range("A1").Value = Round(dblData, 2)
　Range("A1").NumberFormatLocal = "0.00"
End Sub


	【41700】Re:小数点繰上げしているセルの値を別の...

eri - 06/8/20(日) 15:27 -


	引用なし

	パスワード

できました！
ありがとうございます！！

▼[名前なし] さん：
>>小数点繰上げしているセルの値を別のセルに入力
>
>というのが、仮に
>
>小数点繰上げしているセル → A1
>別のセル　　　　　　　　 → B1
>
>だとして、
>
>Range("B1").Value = Range("A1").Text
>
>で出来ませんか？


	【41701】Re:小数点繰上げしているセルの値を別の...

eri - 06/8/20(日) 15:28 -


	引用なし

	パスワード

ありがとうございます！
解決しました！！

▼かみちゃんさん：
>こんにちは。かみちゃん　です。
>
>横から失礼します。
>
>>たしかに1.64と表示されているのですが、
>>クリックして数式バーの値をみると1.635となっています。
>>
>>数式バーの値も1.64としたいのです。
>
>別解として、こんな方法はいかがでしょうか？
>
>Sub test3()
>　Dim dblData As Double
>
>　dblData = 1.637
>　Range("A1").Value = Round(dblData, 2)
>　Range("A1").NumberFormatLocal = "0.00"
>End Sub


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

7025 / 13646 ﾂﾘｰ

←次へ　｜　前へ→

ページ：

┃

記事番号：

(SS)C-BOARD v3.8 is Free