特定の文字列を総当りで組み合わせたものを表示できるものを探しています。
例えば
「おしえてぐう」
と入力すると
「しおえてぐう」「しえおてぐう」…
といったように全ての組み合わせを見たいのです。
検索してみましたがパスワードを生成するソフト(ダミーを追加しなければいけない)や50音全てからランダムに表示するソフトなどで、希望のものが見つかりません。
表示できればブラウザ上のものでも構いません。

・フリーソフト
・WINDOWS Vistaで動作可能
・ひらがな、もしくはカタカナでシャッフルする
・総当りで表示する

以上の条件でありましたらお願いします。
※ワードやエクセルを所有していないのでこれらのアプリケーションを使用するものも除く

このQ&Aに関連する最新のQ&A

A 回答 (2件)

アナグラム作成モウ太くん


http://www.vector.co.jp/soft/win95/amuse/se22786 …

検索したら一発でこれがでてきたからもしかしたらご存じ?質問者さんのニーズに応えていないのでしょうか?3~6文字までっていう制限がダメなのかな?
    • good
    • 0
この回答へのお礼

ありがとうございます!!
素晴らしいです!
このようなものを探していました!
アナグラムというキーワードを使えばよかったのですね、気づきませんでした。
テキストソーターというソフトを見つけて、何度もランダムソートしていたところです…
これなら1度で全部見れますね!
感激です。

お礼日時:2009/05/23 02:50

フリーソフトにそのようなものがあるかどうかは分りません。


失礼を承知で申し上げれば、「そんな単純なことをするソフトなんて、あるだろうか」という疑問を抱きます。
回答にならないですが、一番簡単なのは、そういう作業をするプログラムを書いてしまうことだと思えます。
Perl とかなら、インストールも簡単ですし、初歩的な入門書を見ながらでも、プログラムが書けてしまいます。
実は、私も同じようなことを考えたことがあったもので・・・
    • good
    • 0
この回答へのお礼

ご意見ありがとうございます。
歌詞を作成するソフトがあったので、もしかしたら、と思ったのですが…そうですよね、需要がない作業ですからないですよね…
プログラミングには無知なもので、別のもので応用できないか考えます

お礼日時:2009/05/23 01:21

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

QExcelでの全通りの組み合わせ出力方法(文字列)

Excelについて全くの初心者で、教えて頂きたい質問があります。

Excelの文字列の全通りの組み合わせを出力がしたいのですが、その方法が分かりません。
例えばセルAに
・りんご
・みかん
・いちご

セルBに
・だいこん
・キャベツ
・トマト

があり、別のセルにその全通りの組み合わせを出力
(文字と文字の間はスペース)

りんご だいこん
りんご キャベツ
りんご トマト
みかん だいこん
みかん キャベツ
みかん トマト
いちご だいこん
いちご キャベツ
いちご トマト

この様に出来る方法はあるでしょうか?
また出来ればその裏(だいこん りんご)も出力したいと考えており、キーワードは3つまで出来るようになりたいです。

どなたかご存じでしたら、ぜひお教え下さい。
よろしくお願いします。

Aベストアンサー

A列B列は1行目からデータがあるものとします。
C列に転記するものとします。

以下の手順をおためしください。

1.Altキー+F11キーでVisualBasicEditorを呼び出します。

2.メニューから挿入、標準モジュールで出てきたコードウィンド(右側の白い広い部分)に以下のコードをコピペします。

Sub test01()
a = Cells(Rows.Count, "A").End(xlUp).Row 'A列最終行取得
b = Cells(Rows.Count, "B").End(xlUp).Row 'B列最終行取得
For i = 1 To a '1行からA列最終行まで繰り返し
For n = 1 To b '1行からB列最終行まで繰り返し
x = x + 1
Cells(x, "C") = Cells(i, "A") & " " & Cells(n, "B") 'C列に結合して転記
Next n
Next i
End Sub

3.Alt+F11キーでワークシートへもどります.

4.メニューから、ツール、マクロ、マクロで出てきたマクロ名(test01)を選択して実行

これでできます。
これがわかれば「裏」というのも簡単ですよね。
以上はVBAでの回答ですが、外していたらごめんなさい。

A列B列は1行目からデータがあるものとします。
C列に転記するものとします。

以下の手順をおためしください。

1.Altキー+F11キーでVisualBasicEditorを呼び出します。

2.メニューから挿入、標準モジュールで出てきたコードウィンド(右側の白い広い部分)に以下のコードをコピペします。

Sub test01()
a = Cells(Rows.Count, "A").End(xlUp).Row 'A列最終行取得
b = Cells(Rows.Count, "B").End(xlUp).Row 'B列最終行取得
For i = 1 To a '1行からA列最終行まで繰り返し
For n = 1 To b '1行...続きを読む


人気Q&Aランキング

おすすめ情報