No.4ベストアンサー
- 回答日時:
ANo.2
>試しにしてみたのですが、
>[置換する文字列] に、指定できない範囲の番号があります。」
これは
[検索する文字列] : (?)
[置換する文字列] : \1\t ←(ここの数字が全角数字のためでは?)
の記号や数字が半角でないからです。特にエラーが出た内容では数字が
全角数字のために出たエラーですから、半角数字に変更して試してみて
ください。
私が説明した方法は一般機能だけなので応用もできると思います。
マクロを覚えればもっと効率的に作業できますが、すぐにできる方法と
して私の方法も覚えておくと、作業が少しは効率的になると思います。
ありがとうございます。
すごいです!きれいにできました。
感動しています!!
ただ、
[置換する文字列] : \1\t ではなくて
[置換する文字列] : \1^t だったようです。
本当にありがとうございました。
No.3
- 回答日時:
ワードにもVBAというのがあります。
それで考えてみました。ただ小生の力量不足で、一部解決できてない点があります。
学生さんなどで、興味があれば、WEBでも調べて改良してみてください。(市販本は1,2冊。WEBでも情報は多くないが。)
ワードでツールーマクローVBE
メニューの挿入ー標準モジュール
その標準モジュールの画面に
Sub test05()
Dim ch
j = 1
i = 1
For Each ch In ActiveDocument.Range.Characters
If ch <> vbCrLf Or ch <> vbLf Or ch <> vbCr Or ch <> Chr(21) Then
ActiveDocument.Tables(1).Cell(j, i).Range.Select
Selection.TypeText Text:=ch
i = i + 1
If i > 12 Then
j = j + 1
i = 1
End If
End If
Next
End Sub
をコピペします。
(If i > 12 Thenのところは、表の列数に応じて変更のこと)
実行方法はF5キーを押す。
ーー
私の例では、罫線ー挿入ー表で12列x8行のマスを作りました。
例文
お返りなさい。おなかすいた。早く宿題を済ましなさい。
宿題が済んだら塾に行きなさい。今日は歩いて駅まで行ってね。
今日は土曜日ダイヤですよ。
(この下に表12列x8行を配置する。)
結果
略
改良点(私が原因が判らず、改良できなかった点)
段落のところで1文字入ってしまう。
文章の終わりがうまく終らず、少し行過ぎる。
とりあえず参考になれば。
回答ありがとうございます。
実行してみました。
たしかに、imogasi様のご指摘通り1文字入ってしまったりしますね。
でも一文字ずつ入力することを考えたらほとんどOKでした!
VBAは全く勉強していないので改良は難しいと思いますが
勉強する時間があれば是非やってみたいです。
どうもありがとうございました。
No.2
- 回答日時:
表の1マスに1文字ですか...
普通はそのような使い方はしませんよね。
どうしてもその中に入れたいのならば、別のWord文書でもよいので文章
を作成するものを用意して、表のマスの数と文章の文字数が同じになる
ようにしてから[置換]を利用して1文字毎にタブを入れる設定にします。
[置換]ダイアログを開き、[オプション]の[ワイルドカードを使用する]
にチェックを入れていおきます。
[検索する文字列] : (?)
[置換する文字列] : \1\t
これで[すべて置換]すると1文字とタブ区切りが交互になるものが用意
できますので、コピーしておきます。
貼り付けたい表全体を選択しておいて、[形式を選択した貼り付け]から
[テキスト]を選択すると1マスに1文字ずつ入るようになります。
ただし、半角英数字も1文字に区切られるので、半角英数字は2文字ずつ
1マスに入れたいような場合は、別途設定が必要です。
アイデアとしては紹介していますが、あまり実用的ではないので活用を
するかどうかは質問者に任せます。
この回答への補足
回答どうもありがとうございます。
>表の1マスに1文字ですか...
>
>普通はそのような使い方はしませんよね。
そうですよね。。。
でも、様式ファイルがそうなっているので仕方ないです。
試しにしてみたのですが、
「[置換する文字列] に、指定できない範囲の番号があります。」
とエラーが出るのですがどういうことでしょうか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Android(アンドロイド) Android携帯のキーボード入力で時間入力を簡単にしたい 1 2023/05/17 02:13
- Excel(エクセル) エクセルでセルの値分の個数の数字列を自動で入れたい 8 2023/03/14 18:00
- Access(アクセス) capeofdragonと申します。 Access2016を使っております。 あるフォームがあり、テ 2 2022/09/09 13:18
- Android AndroidミラーリングでPCからAndroidを操作するには 4 2022/06/17 11:16
- その他(ゲーム) 数独の解き方 4 2023/05/17 16:09
- Excel(エクセル) エクセルの数式で教えてください。 1 2023/06/15 14:11
- デスクトップパソコン 認証コードが入力できない(同じ数字が次のマスにも勝手に入力される) 8 2023/01/27 12:53
- AJAX ワードでA3横の画面にして、文字入力はA4縦にしたい 1 2023/05/04 13:59
- その他(人文学) 特殊?な文字の入力 4 2022/10/23 09:08
- 事務・総務 事務補助の仕事について事務の方教えてください。 事務未経験です。簡単な文字入力、文章作成、Excel 5 2023/08/20 15:50
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
枠内に一字ずつ入力したい
PowerPoint(パワーポイント)
-
テキストファイルから1文字ずつ取り出し、ワードの表に1文字ずつ書く方法
Visual Basic(VBA)
-
Wordについて。なぜか一文字ずつしか入りません!
Word(ワード)
-
-
4
WORDで”一部分のみ”原稿用紙風にしたい
Word(ワード)
-
5
ワードの表の中に文字を入れると改行してしまうので困っています
Word(ワード)
-
6
ワードの入力時にマス目あり
Word(ワード)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Word文書、取り消し線部分の一...
-
Excelの表中,数字の「1」をす...
-
ワードの隠し文字を空白(スペ...
-
word である文字をすべてイタリ...
-
同じ文字
-
ワードで赤字のみを削除する方法
-
word 2003で、赤い文字(あるい...
-
ワードのフィールドの解除を一...
-
Word2000で括弧の中の文字だけ...
-
エクセルでシートにある赤文字...
-
見出しレベルの置き換えができない
-
word文書内のピンク色の文字を...
-
Wordで【相互参照】で挿入した...
-
「WORD」での作業 日本語・英...
-
アクセス 「#N/A」が置換、変...
-
ワードの表の中の値の表示形式...
-
word ある文字色の部分のみ別の...
-
エクセルで、コンマをピリオド...
-
Excel 上付き(下付き)文字の...
-
ワードで特定の文字列だけを太...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルでシートにある赤文字...
-
Excelの表中,数字の「1」をす...
-
ワードで赤字のみを削除する方法
-
Wordでカッコで括った文字を一...
-
ワードで半角英数の文字だけ選...
-
箇条書きのアタマに一括で「・...
-
ワードの表の中の値の表示形式...
-
Wordデータから,特定の単語を...
-
excelマクロ ボタンを押して文...
-
「WORD」での作業 日本語・英...
-
Wordの脚注を,1)・・2)・・3)...
-
wordで特定の色だけ印刷しない方法
-
エクセルで、コンマをピリオド...
-
word 2003で、赤い文字(あるい...
-
Word相互参照の文字を一括で変...
-
EXCEL2010のハイパーリンク先の...
-
英数字のフォント「Century」に...
-
ワードで太字になっているとこ...
-
セルの中の不要な文字を削除し...
-
word である文字をすべてイタリ...
おすすめ情報