Access VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1292 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【7850】通貨記号の位置揃え ユミちゃん 06/5/23(火) 11:05 質問[未読]
【7851】Re:通貨記号の位置揃え ハト 06/5/23(火) 14:02 発言[未読]
【7872】Re:通貨記号の位置揃え ユミちゃん 06/5/25(木) 12:27 お礼[未読]
【7852】Re:通貨記号の位置揃え 855 06/5/23(火) 17:05 発言[未読]
【7857】Re:通貨記号の位置揃え 銀の匙 06/5/24(水) 2:59 回答[未読]
【7850】通貨記号の位置揃え
質問  ユミちゃん  - 06/5/23(火) 11:05 -
引用なし
パスワード
   通貨記号の位置を合計に揃えて印字したいのですが、どのようにすれば良いのでしょうか。Format関数でも上手くできません。宜しくお願いいたします。
(現在印字される内容)
明細1　　　\123,456
明細2　　\2,000,000
明細3　　　　\9,256
合計　　 \2,132,712

(修正したい印字内容)
明細1　　\　123,456
明細2　　\2,000,000
明細3　　\　　9,256
合計　　 \2,132,712
【7851】Re:通貨記号の位置揃え
発言  ハト  - 06/5/23(火) 14:02 -
引用なし
パスワード
   こんにちは

▼ユミちゃん さん：
>通貨記号の位置を合計に揃えて印字したいのですが、どのようにすれば良いのでしょうか。Format関数でも上手くできません。宜しくお願いいたします。
>(現在印字される内容)
>明細1　　　\123,456
>明細2　　\2,000,000
>明細3　　　　\9,256
>合計　　 \2,132,712
>
>(修正したい印字内容)
>明細1　　\　123,456
>明細2　　\2,000,000
>明細3　　\　　9,256
>合計　　 \2,132,712

求められている方法とは違うかもしれませんが
「明細1」と設定しているエリアに　
「明細1　　\」と設定
「\123,456」と設定しているエリアに　
「123,456」と設定　

これじゃだめですかね（＾＾；
【7852】Re:通貨記号の位置揃え
発言  855  - 06/5/23(火) 17:05 -
引用なし
パスワード
   力技ですが、
Len関数で金額の最大桁数を取り
変数にその桁数分の空白入れる。
↑を元にＳＱＬ（ＵＰＤＡＴＥ）文を使用し実現できました。
【7857】Re:通貨記号の位置揃え
回答  銀の匙  - 06/5/24(水) 2:59 -
引用なし
パスワード
   こんばんは。

Format()を重ねて、以下ではどうですか。
#当然、固定長フォントでないと駄目ですけど。

Format(Format([項目],"#,###"),"\\@@@@@@@@@@")

#名前間違えたので、再送。
【7872】Re:通貨記号の位置揃え
お礼  ユミちゃん  - 06/5/25(木) 12:27 -
引用なし
パスワード
   ▼ハト さん：
>こんにちは
>
>▼ユミちゃん さん：
>>通貨記号の位置を合計に揃えて印字したいのですが、どのようにすれば良いのでしょうか。Format関数でも上手くできません。宜しくお願いいたします。
>>(現在印字される内容)
>>明細1　　　\123,456
>>明細2　　\2,000,000
>>明細3　　　　\9,256
>>合計　　 \2,132,712
>>
>>(修正したい印字内容)
>>明細1　　\　123,456
>>明細2　　\2,000,000
>>明細3　　\　　9,256
>>合計　　 \2,132,712
>
>求められている方法とは違うかもしれませんが
>「明細1」と設定しているエリアに　
>「明細1　　\」と設定
>「\123,456」と設定しているエリアに　
>「123,456」と設定　
>
>これじゃだめですかね（＾＾；
ハト　様
有難うございました。
位置合わせに若干時間をとりましたが、希望通りにできました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1292 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1078226
(SS)C-BOARD v3.8 is Free