Access VBA質問箱 IV

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

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


7855 / 9994 ←次へ | 前へ→

【5321】Re:シェア率の算出方法
回答  小僧  - 05/6/8(水) 9:55 -

引用なし
パスワード
   ▼sakaiII さん:
おはようございます。

下記のSQLをクエリのSQLビューに貼り付けてみてください。

SELECT Q.メーカー名, Q.メーカー名_1, Q.メーカー名_2,
Q.数量の合計, Q.数量シェア%, Q.金額の合計, Q.金額シェア%
FROM [
SELECT '合計' AS メーカー名, ' ' AS メーカー名_1, ' ' AS メーカー名_2,
Sum(Table_Area.数量) AS 数量の合計,1 AS 数量シェア% ,
Sum(Table_Area.金額) AS 金額の合計, 1 AS 金額シェア%
FROM Table_Area
UNION ALL
SELECT Table_Area.メーカー名, Table_Area.メーカー名_1, Table_Area.メーカー名_2,
Table_Area.数量, Table_Area.数量/DSum('数量',"Table_Area") AS 数量シェア%,
Table_Area.金額, Table_Area.金額/DSum('金額',"Table_Area") AS 金額シェア%
FROM Table_Area
]. AS Q;

デザインビューで見た時、「数量シェア%」のフィールドを

Format([数量シェア%]*100,"0.00")

とすれば小数点2桁までの値がでると思います。

またWindowsの [コントロールパネル] → [地域と言語のオプション]で
設定する小数点以下の数字が 2 になっていれば

Format([数量シェア%],"パーセント")

でも良いと思います。
201 hits

【5222】シェア率の算出方法 sakaiII 05/6/3(金) 7:14 質問
【5227】Re:シェア率の算出方法 小僧 05/6/3(金) 10:43 回答
【5258】Re:シェア率の算出方法 sakaiII 05/6/5(日) 21:10 質問
【5265】Re:シェア率の算出方法 小僧 05/6/6(月) 10:59 回答
【5320】Re:シェア率の算出方法 sakaiII 05/6/7(火) 21:11 質問
【5321】Re:シェア率の算出方法 小僧 05/6/8(水) 9:55 回答
【5356】Re:シェア率の算出方法 sakaiII 05/6/10(金) 21:41 質問
【5362】Re:シェア率の算出方法 小僧 05/6/12(日) 9:25 回答
【5372】Re:シェア率の算出方法 sakaiII 05/6/14(火) 12:19 お礼

7855 / 9994 ←次へ | 前へ→
ページ:  ┃  記事番号:
1078256
(SS)C-BOARD v3.8 is Free