Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
7022 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【41702】セルの値についてもう一つ質問させてください eri 06/8/20(日) 16:26 質問[未読]
【41703】Re:セルの値についてもう一つ質問させてく... [名前なし] 06/8/20(日) 16:38 回答[未読]
【41705】Re:セルの値についてもう一つ質問させてく... eri 06/8/20(日) 16:55 お礼[未読]
【41704】Re:セルの値についてもう一つ質問させてく... かみちゃん 06/8/20(日) 16:50 発言[未読]
【41706】Re:セルの値についてもう一つ質問させてく... eri 06/8/20(日) 16:57 お礼[未読]
【41707】Re:セルの値についてもう一つ質問させてく... かみちゃん 06/8/20(日) 17:06 発言[未読]
【41708】Re:セルの値についてもう一つ質問させてく... eri 06/8/20(日) 17:08 お礼[未読]
【41702】セルの値についてもう一つ質問させてくだ...
質問  eri  - 06/8/20(日) 16:26 -
引用なし
パスワード
   先ほどはありがとうございました。
セルの書式設定をパーセンテージ、小数点以下の桁数を2に設定しています
手入力で20.06と入力すると20.06％と表示されます。
これをマクロでA1のセルの値20.06を入力させようとすると
2006.00％となってしまいます。どうすれば20.06％と表示できるでしょうか？

それともう一つすいませんがお願いします。
現在のシート番号が一番初めのシートかどうかの判別法を教えてください
【41703】Re:セルの値についてもう一つ質問させて...
回答  [名前なし]  - 06/8/20(日) 16:38 -
引用なし
パスワード
   >どうすれば20.06％と表示できるでしょうか？

　　Dim a As Double
　　
　　a = 20.06
　　Range("A1").Value = a & "%"

>現在のシート番号が一番初めのシートかどうかの判別法を教えてください

　　If ActiveSheet.Index = 1 Then
　　　　MsgBox "現在のシートは、一番左にあります。"
　　End If
【41704】Re:セルの値についてもう一つ質問させて...
発言  かみちゃん  - 06/8/20(日) 16:50 -
引用なし
パスワード
   こんにちは。かみちゃん　です。

>これをマクロでA1のセルの値20.06を入力させようとすると
>2006.00％となってしまいます。どうすれば20.06％と表示できるでしょうか？

こちらだけ別解です。
入力値 / 100 にすればいかがですか？
【41705】Re:セルの値についてもう一つ質問させて...
お礼  eri  - 06/8/20(日) 16:55 -
引用なし
パスワード
   ありがとうございました！
全てうまく処理できました！！！


▼[名前なし] さん：
>>どうすれば20.06％と表示できるでしょうか？
>
>　　Dim a As Double
>　　
>　　a = 20.06
>　　Range("A1").Value = a & "%"
>
>>現在のシート番号が一番初めのシートかどうかの判別法を教えてください
>
>　　If ActiveSheet.Index = 1 Then
>　　　　MsgBox "現在のシートは、一番左にあります。"
>　　End If
【41706】Re:セルの値についてもう一つ質問させて...
お礼  eri  - 06/8/20(日) 16:57 -
引用なし
パスワード
   >こちらだけ別解です。
>入力値 / 100 にすればいかがですか？

すいません。よくわからないです。
でも、解決しました！
ありがとうございます！！！
【41707】Re:セルの値についてもう一つ質問させて...
発言  かみちゃん  - 06/8/20(日) 17:06 -
引用なし
パスワード
   こんにちは。かみちゃん　です。

>>入力値 / 100 にすればいかがですか？
>
>すいません。よくわからないです。

　Dim a As Double
　a = 20.06
　Range("A1").Value = a / 100
ということなのですが・・・

まぁ、解決したなら、それでいいいですが。
【41708】Re:セルの値についてもう一つ質問させて...
お礼  eri  - 06/8/20(日) 17:08 -
引用なし
パスワード
   すいません！ありがとうございます！！！


▼かみちゃん さん：
>こんにちは。かみちゃん　です。
>
>>>入力値 / 100 にすればいかがですか？
>>
>>すいません。よくわからないです。
>
>　Dim a As Double
>　a = 20.06
>　Range("A1").Value = a / 100
>ということなのですが・・・
>
>まぁ、解決したなら、それでいいいですが。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
7022 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free