Indexへ
(23639)//【23554】→(23555)
------------------------
【タイトル】数字を,で区切る方法?
【記事番号】 23554 (*)
【 日時 】07/09/19 17:10
【 発言者 】CAD初心者

桁数の多い数字を入力する時、自動的に3桁で,で区切る方法はないものでしょうか?
今は3桁ごと,を入力しています。なかなか手間で間違いやすく苦労しています。
良い方法があればご教授お願いします。


Indexへ
(23554)←【23555】→(23558)
------------------------
【タイトル】Re(1):数字を,で区切る方法?
【記事番号】 23555 (23554)
【 日時 】07/09/19 17:15
【 発言者 】鈴木

▼CAD初心者さん:
>桁数の多い数字を入力する時、自動的に3桁で,で区切る方法はないものでしょうか?
>今は3桁ごと,を入力しています。なかなか手間で間違いやすく苦労しています。
>良い方法があればご教授お願いします。

●頻度が高いようでしたら、Excelの通貨セル設定で数値を入力し
コピペすれば良いでしょう。


Indexへ
(23555)←【23558】→(23559)
------------------------
【タイトル】Re(1):数字を,で区切る方法?
【記事番号】 23558 (23554)
【 日時 】07/09/19 20:39
【 発言者 】コジマ

▼CAD初心者さん:
>桁数の多い数字を入力する時、自動的に3桁で,で区切る方法はないものでしょうか?
>今は3桁ごと,を入力しています。なかなか手間で間違いやすく苦労しています。
>良い方法があればご教授お願いします。

外部変形が使うことができれば、以下のスクリプトで可能です。
(ruby の使用できる環境が必要)


◎バッチファイル(ファイル名 カンマ挿入.bat)
以下の文をコピペ後、全角スペースを半角スペースに一括置換してください。

@REM 数値に「,」または「,」を挿入
@echo off
REM #jww
REM #cd
REM #h3
REM #e
copy jwc_temp.txt temp.txt > nul
ruby -x %~f0 temp.txt > jwc_temp.txt
exit
#!ruby -Ks
require 'jcode'

def conma(s,i,w)
    if s=~/\.|./
        moji=$`
        ika=$&+$'
    else
        moji=s
        ika=""
    end
    a=moji.split('')
    a.reverse!
    n=0;b=[]
    a.each{|item|n!=0 && n%(i.to_i)==0 ? b<<(item+w):b<<(item)
        n+=1
    }
    return(b.reverse.join+ika)
end

puts "hd"
while ARGF.gets
  xy=split
    if xy[0]=~/^hq/
  elsif xy[0]=~/^c[hsvroptkz2]/
    moji=$'.chomp if $_ =~ /\"/
        moji2=moji.tr("0123456789.0123456789.","")

        if moji2 == ""
            moji_a=moji.split('')
            zen_n=0;han_n=0

            moji_a.each{|item|item.size==1 ? han_n += 1 : zen_n += 1}
            han_n <= zen_n ? kugiri_moji="," : kugiri_moji=","
            moji3=conma(moji,3,kugiri_moji)

            puts [xy[0,5],("\""+moji3)].join("\s")
        else
            print $_
        end
    else
        print $_
    end
end


Indexへ
(23558)←【23559】→(23560)
------------------------
【タイトル】Re(2):うまく動きました
【記事番号】 23559 (23558)
【 日時 】07/09/19 21:28
【 発言者 】風呂好き

▼コジマさん:
外部変形、うまく動きました。
いただきました。
便利ですね。
CAD初心者さんのご質問でしたが
私も使わせていただきます。
いつも、お早い対応の便利な外変ありがとうございます。

      風呂好き


Indexへ
(23559)←【23560】→(23627)
------------------------
【タイトル】Re(1):数字を,で区切る方法?
【記事番号】 23560 (23554)
【 日時 】07/09/19 21:31
【 発言者 】風呂好き

▼CAD初心者さん:
こんばんは・・・
文字で数字を書いて、CTRL+クリックで
3桁ごとのカンマが入るはずです。
(多分・・・基本設定での調整が必要だったかな?忘れました・・・)
ただし、「測定」コマンドで小数点以下の桁数が
指示してあると、その桁数分だけの少数店以下の
数値が出てしまいますが・・・。
違っていたらすみません。
試してみてください。(^_^;)

       風呂空き


Indexへ
(23560)←【23627】//(23562)
------------------------
【タイトル】Re(2):数字を,で区切る方法?
【記事番号】 23627 (23560)
【 日時 】07/09/21 22:30
【 発言者 】CAD初心者

皆さんいろいろとありがとうございました。
仕事に忙殺されていてなかなか見ることが出来ず遅くなりました(汗)
まだまだ外部変形等はハードルが高く難解で手も足もでません・・・。

風呂好きさんの方法でやったらやはり小数点以下を表示してしまい
なんとか「測定」の設定をいじってみたらできました。

これからこの方法でやってみようと思います。
いろいろとありがとうございました。これからもよろしくお願いします。