Indexへ
(11795)//【11800】→(11801)
------------------------
【タイトル】文字の連番を変更記入する方法について
【記事番号】 11800 (*)
【 日時 】06/05/16 06:40
【 発言者 】おっとー

おはようございます。
教えてほしいのですが、文字の連番を変更記入する方法があれば
教えて下さい。宜しくお願いします。
例：１〜１０→５〜１５へ変更。
連番記入の外部変形があるのはわかるのですが、変更はインターネットで
探しても見つかりません。


Indexへ
(11800)←【11801】→(11810)
------------------------
【タイトル】Re(1):文字の連番を変更記入する方法について
【記事番号】 11801 (11800)
【 日時 】06/05/16 08:37
【 発言者 】スター

▼おっとーさん：
>おはようございます。
>教えてほしいのですが、文字の連番を変更記入する方法があれば
>教えて下さい。宜しくお願いします。
>例：１〜１０→５〜１５へ変更。
>連番記入の外部変形があるのはわかるのですが、変更はインターネットで
>探しても見つかりません。

文字編集の外部エディタ（基本設定、一般１）をエクセルに変更すると可能です。
文字で範囲選択し外部エディタ（エクセル）を起動するとA列にデータが入ります。
これを加工し（例えばB列に５を入れてA+BをC列に入れ、それをA列に戻し、B、Cを消去）終了すればOKです。


Indexへ
(11801)←【11810】→(11814)
------------------------
【タイトル】ありがとうございました。
【記事番号】 11810 (11801)
【 日時 】06/05/16 10:54
【 発言者 】おっとー

▼スターさん：
いつもお世話になっております。
>文字編集の外部エディタ（基本設定、一般１）をエクセルに変更すると可能です。
>文字で範囲選択し外部エディタ（エクセル）を起動するとA列にデータが入ります。
>これを加工し（例えばB列に５を入れてA+BをC列に入れ、それをA列に戻し、B、Cを消去）終了すればOKです。
これはいいですね。時間短縮です。ありがとうございます。
欲を言えば、ｊｗｗの操作でも出来ればと期待しています。


Indexへ
(11810)←【11814】→(11827)
------------------------
【タイトル】Re(1):連番変更ではなく、一括加算
【記事番号】 11814 (11800)
【 日時 】06/05/16 11:24
【 発言者 】コジマ

▼おっとーさん：
>おはようございます。
>教えてほしいのですが、文字の連番を変更記入する方法があれば
>教えて下さい。宜しくお願いします。
>例：１〜１０→５〜１５へ変更。
>連番記入の外部変形があるのはわかるのですが、変更はインターネットで
>探しても見つかりません。

連番変更では、みつからないと思います。
一括加減算の外部変形は、いくつか公開されているはずです。

◎バッチファイル（ファイル名　一括加算.bat）

@REM 整数値を一括加算する
@echo off
REM #jww
REM #cd
REM #zc
REM #c加算する数値(ー値入力で減算)　無指定:0/_/k
REM #h3
REM #hc数値文字を範囲選択
REM #e
copy jwc_temp.txt temp.txt > nul
ruby -Ks 一括加算.rb temp.txt %1 > jwc_temp.txt


◎スクリプトファイル（ファイル名　一括加算.rb）

puts "hd";kasan =0
while ARGV.size > 1
　　　　case argument=ARGV.pop
　　　　　　　　　when /\/k/
　　　　　　　　　　　　kasan=argument[2..-1].to_i
　　　　　　　　end
end
b={"０"=>"0","１"=>"1","２"=>"2","３"=>"3","４"=>"4","５"=>"5","６"=>"6","７"=>"7","８"=>"8","９"=>"9","＋"=>"\+","−"=>"\-","ー"=>"\-","，"=>"\,","±"=>"±","．"=>"\."}
bb=b.invert
while ARGF.gets
　　　　case $_
　　　　　　　　when /^hq/
　　　　　　　　when /^ch/
　　　　　　　　　　　　xy=split
　　　　　　　　　　　　su=$'.chomp if $_=~/\"/
　　　　　　　　　　　　bit=su.split('')
　　　　　　　　　　　　if bit[0].size==2
　　　　　　　　　　　　　　　　bit2=bit.collect{|item| b.key?(item) ? b[item] : item }
　　　　　　　　　　　　　　　　su=bit2.join('')
　　　　　　　　　　　　end
　　　　　　　　　　　　if su=~/^-*\d+$|^-*\d+,*\d+$/
　　　　　　　　　　　　　　　　su =~ /\,/ ? sut=su.gsub(/\,/,"") : sut=su
　　　　　　　　　　　　　　　　suti=sut.to_i
　　　　　　　　　　　　　　　　kasant=(suti+kasan).to_s
　　　　　　　　　　　　　　　　if bit[0].size==2
　　　　　　　　　　　　　　　　　　　　word=(kasant.split('').collect{|item| bb[item]}).join('')
　　　　　　　　　　　　　　　　else
　　　　　　　　　　　　　　　　　　　　word=kasant
　　　　　　　　　　　　　　　　end
　　　　　　　　　　　　　　　　printf("ch %.11f %.11f %.11f %.11f \"%s\n",
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　xy[1],xy[2],xy[3],xy[4],word)
　　　　　　　　　　　　else
　　　　　　　　　　　　　　　　print $_
　　　　　　　　　　　　end
　　　　　　　　else
　　　　　　　　　　　　print $_
　　　　　　　　end
end


Indexへ
(11814)←【11827】→(11829)
------------------------
【タイトル】Re(2):連番変更ではなく、一括加算
【記事番号】 11827 (11814)
【 日時 】06/05/16 13:56
【 発言者 】おっとー

▼コジマさん：
>▼おっとーさん：
>>おはようございます。
>>教えてほしいのですが、文字の連番を変更記入する方法があれば
>>教えて下さい。宜しくお願いします。
>>例：１〜１０→５〜１５へ変更。
>>連番記入の外部変形があるのはわかるのですが、変更はインターネットで
>>探しても見つかりません。
>
>連番変更では、みつからないと思います。
>一括加減算の外部変形は、いくつか公開されているはずです。
>
>◎バッチファイル（ファイル名　一括加算.bat）
>
>@REM 整数値を一括加算する
>@echo off
>REM #jww
>REM #cd
>REM #zc
>REM #c加算する数値(ー値入力で減算)　無指定:0/_/k
>REM #h3
>REM #hc数値文字を範囲選択
>REM #e
>copy jwc_temp.txt temp.txt > nul
>ruby -Ks 一括加算.rb temp.txt %1 > jwc_temp.txt
>
>
>◎スクリプトファイル（ファイル名　一括加算.rb）
>
>puts "hd";kasan =0
>while ARGV.size > 1
>　　　　case argument=ARGV.pop
>　　　　　　　　　when /\/k/
>　　　　　　　　　　　　kasan=argument[2..-1].to_i
>　　　　　　　　end
>end
>b={"０"=>"0","１"=>"1","２"=>"2","３"=>"3","４"=>"4","５"=>"5","６"=>"6","７"=>"7","８"=>"8","９"=>"9","＋"=>"\+","−"=>"\-","ー"=>"\-","，"=>"\,","±"=>"±","．"=>"\."}
>bb=b.invert
>while ARGF.gets
>　　　　case $_
>　　　　　　　　when /^hq/
>　　　　　　　　when /^ch/
>　　　　　　　　　　　　xy=split
>　　　　　　　　　　　　su=$'.chomp if $_=~/\"/
>　　　　　　　　　　　　bit=su.split('')
>　　　　　　　　　　　　if bit[0].size==2
>　　　　　　　　　　　　　　　　bit2=bit.collect{|item| b.key?(item) ? b[item] : item }
>　　　　　　　　　　　　　　　　su=bit2.join('')
>　　　　　　　　　　　　end
>　　　　　　　　　　　　if su=~/^-*\d+$|^-*\d+,*\d+$/
>　　　　　　　　　　　　　　　　su =~ /\,/ ? sut=su.gsub(/\,/,"") : sut=su
>　　　　　　　　　　　　　　　　suti=sut.to_i
>　　　　　　　　　　　　　　　　kasant=(suti+kasan).to_s
>　　　　　　　　　　　　　　　　if bit[0].size==2
>　　　　　　　　　　　　　　　　　　　　word=(kasant.split('').collect{|item| bb[item]}).join('')
>　　　　　　　　　　　　　　　　else
>　　　　　　　　　　　　　　　　　　　　word=kasant
>　　　　　　　　　　　　　　　　end
>　　　　　　　　　　　　　　　　printf("ch %.11f %.11f %.11f %.11f \"%s\n",
>　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　xy[1],xy[2],xy[3],xy[4],word)
>　　　　　　　　　　　　else
>　　　　　　　　　　　　　　　　print $_
>　　　　　　　　　　　　end
>　　　　　　　　else
>　　　　　　　　　　　　print $_
>　　　　　　　　end
>end

ありがとうございます。
やり方が間違っているのかも知れません。
変更をかけた時、文字が消えてしまうのですが、
すみませんが、原因教えてもらえますでしょうか？


Indexへ
(11827)←【11829】→(11839)
------------------------
【タイトル】Re(3):連番変更ではなく、一括加算
【記事番号】 11829 (11827)
【 日時 】06/05/16 14:37
【 発言者 】コジマ

▼おっとーさん：
>ありがとうございます。
>やり方が間違っているのかも知れません。
>変更をかけた時、文字が消えてしまうのですが、
>すみませんが、原因教えてもらえますでしょうか？

バッチファイル
スクリプトファイル
ともに、全角スペースを半角スペースに一括置換してください。

尚、◎で始まっている行は、コピペしないでください。


Indexへ
(11829)←【11839】→(11842)
------------------------
【タイトル】Re(4):連番変更ではなく、一括加算
【記事番号】 11839 (11829)
【 日時 】06/05/16 17:38
【 発言者 】おっとー

▼コジマさん：
>>ありがとうございます。
>>やり方が間違っているのかも知れません。
>>変更をかけた時、文字が消えてしまうのですが、
>>すみませんが、原因教えてもらえますでしょうか？
>
>バッチファイル
>スクリプトファイル
>ともに、全角スペースを半角スペースに一括置換してください。

コジマさんの書かれているものコピペーストして貼り付けました。

>尚、◎で始まっている行は、コピペしないでください。

していないです。
難しいですね。（何が間違っているかわかりません）


Indexへ
(11839)←【11842】→(11845)
------------------------
【タイトル】Re(5):連番変更ではなく、一括加算
【記事番号】 11842 (11839)
【 日時 】06/05/16 18:51
【 発言者 】コジマ

▼おっとーさん：
>していないです。
>難しいですね。（何が間違っているかわかりません）

バッチファイルの最後の行に pause を追記してから実行してみてください。
エラーメッセージが表示されます。


Indexへ
(11842)←【11845】→(11847)
------------------------
【タイトル】Re(6):連番変更ではなく、一括加算
【記事番号】 11845 (11842)
【 日時 】06/05/16 19:09
【 発言者 】おっとー

▼コジマさん：
>▼おっとーさん：
>>していないです。
>>難しいですね。（何が間違っているかわかりません）
>
>バッチファイルの最後の行に pause を追記してから実行してみてください。
>エラーメッセージが表示されます。

このメッセージがでました。それで続行すると文字が消えます。

一括加算.rb:11: undefined method `　　　　case' for main:Object (NoMethodError)
続行するには何かキーを押してください . . .


Indexへ
(11845)←【11847】→(11849)
------------------------
【タイトル】Re(7):連番変更ではなく、一括加算
【記事番号】 11847 (11845)
【 日時 】06/05/16 20:20
【 発言者 】コジマ

▼おっとーさん：
>一括加算.rb:11: undefined method `　　　　case' for main:Object (NoMethodError)
>続行するには何かキーを押してください . . .

空白文字が全角スペースです。
半角スペースに一括置換してください。

メモ帳ならば、
「編集」→「置換」→「検索する文字列」に全角スペースを入力→「置換後の文字列」に半角スペースを入力→「全て置換」をクリック。


Indexへ
(11847)←【11849】→(11831)
------------------------
【タイトル】Re(8):連番変更ではなく、一括加算
【記事番号】 11849 (11847)
【 日時 】06/05/16 23:38
【 発言者 】おっとー

▼コジマさん：
>>一括加算.rb:11: undefined method `　　　　case' for main:Object (NoMethodError)
>>続行するには何かキーを押してください . . .
>
>空白文字が全角スペースです。
>半角スペースに一括置換してください。
>
>メモ帳ならば、
>「編集」→「置換」→「検索する文字列」に全角スペースを入力→「置換後の文字列」に半角スペースを入力→「全て置換」をクリック。

何度も御返事 ありがとうございます。
コジマさんが言われたとうりしたのですが、だめでした。
とりあえず、スターさんの方法で対応したいと思います。
これは、良いと思ったのですが、残念です。


Indexへ
(11849)←【11831】→(11835)
------------------------
【タイトル】Re(2):連番変更ではなく、一括加算
【記事番号】 11831 (11814)
【 日時 】06/05/16 15:32
【 発言者 】kohmura

▼コジマさん：
こんにちは。いつも便利な外変をありがとうございます。
さっそく使わせていただきます。

おっとーさん、一括加算.batの後に.txtついてませんか？


Indexへ
(11831)←【11835】//(11803)
------------------------
【タイトル】Re(3):連番変更ではなく、一括加算
【記事番号】 11835 (11831)
【 日時 】06/05/16 17:13
【 発言者 】おっとー

▼kohmuraさん：
>▼コジマさん：
>こんにちは。いつも便利な外変をありがとうございます。
>さっそく使わせていただきます。
>
>おっとーさん、一括加算.batの後に.txtついてませんか？

付いていません。