サクラエディタふぁんくらぶ part8at SOFTWAREサクラエディタふぁんくらぶ part8 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このスレッドのURL■項目テキスト666:名無しさん@お腹いっぱい。 07/04/29 17:03:31 Bcai5wiB0 >>658 どんな書式でナンバリングしたいのか明記してないので、適当にしたよ。 下記を、拡張子 .js で保存 main(); function main() { var pat = InputBox("文字列を指定してください","文字列のナンバリング",""); if(pat=="") return; MoveHistSet(); SelectAll(); var ary = GetSelectedString(0).split(pat); for(var i=1 ; i<ary.length ; i++) { ary[i] = "(" + i + ":" + pat + ")" + ary[i]; } SelectAll(); InsText(ary.join("")); MoveHistPrev(); } function InputBox( prompt, title, defval ) { if( prompt == null ) prompt = ""; if( title == null ) title = ""; if( defval == null ) defval = ""; var vbs = new ActiveXObject("ScriptControl"); vbs.Language = "VBScript"; vbs.AddCode( 'Function InputBox2(prompt,title,default)\nInputBox2=InputBox(prompt,title,default)\nEnd Function\n' ); return vbs.Run( 'InputBox2', prompt,title,defval ); } 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch