
No.3
- 回答日時:
VBAの経験がある人なら出来るかも知れません。
A1セルに
縦書き・上詰めで
"大きな柿の木が
あります。
良く柿の木の
柿を食べたものです。"
とあるとして
(セル内)改行は、ALT+ENTERで行っているものばかりとします。
標準モジュールに
Sub test01()
x = Cells(1, "A")
s = 1
st = ""
Do
p = InStr(s, x, Chr(10), 0)
If p = 0 Then
st = Mid(x, s, Len(x) - s + 1) & Chr(10) & st
Else
st = Mid(x, s, p - s + 1) & st
s = p + 1
End If
Loop While p <> 0
Cells(1, "B") = st
End Sub
を実行すると
縦に、左から
大きな柿木が
あります。
良く柿の木の
柿を食べたものです。
に変わります。B1セルも縦書き、上詰めにしておくこと。
1セルの例ですが多数セルに拡張することはたやすいです。
No.1
- 回答日時:
んー・・・右に改行する言語ってあったかな?
自分の知る限りではそのような言語はありませんから不可能だと思います
いっそ一行一セルにしてみてはいかがでしょう
普通にEnterで右に改行するよう Excelのオプションを変更することをお奨めします
この回答への補足
Cupperさん ありがとうございます。
裁判所へ提出する書類で縦書きで左から右へ書くものがあって困っておりました。とりあえず2セルに分けて書きましたが良い方法がないかと思って質問しました。
オプションで変更とはどの様にするのでしょうか?
よろしくお願いします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
確定申告しなかった・無申告の人をどうやって見つけるのか元国税調査官に聞いてみた
無申告の方などを対象に税務調査を行う国税局の元税務調査官さんに、どう無申告を探すのか聞いてきました。
-
EXCELの縦書きで「折り返し表示」の仕方が分かりません
Excel(エクセル)
-
エクセルでの文字方向を「左から右」にしたい
その他(コンピューター・テクノロジー)
-
縦書きは右から?左から?
日本語
-
4
エクセルの改行時、2行目の頭にスペースを入れる方法
その他(パソコン・スマホ・電化製品)
-
5
ワードかエクセルで、KOKUYOのタックインデックスを使って
Word(ワード)
-
6
Word縦書きで左から右への行
Word(ワード)
-
7
エクセル縦書きでのカーソル移動方向の変更
Excel(エクセル)
-
8
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
9
MS-Word段落番号とそのあとの文字が(10)以降離れてしまいます。
Word(ワード)
-
10
エクセルで計算すると2.43E-19などと表示される。Eとは何ですか?
Windows Me・NT・2000
-
11
excelで1つのセルだけを分割する方法
Excel(エクセル)
-
12
あて名の書き方
その他(家事・生活情報)
-
13
エクセルでマウスカーソルの形が十字のままになってしまう
Excel(エクセル)
-
14
エクセルの文字列を数式に変換する方法
Excel(エクセル)
-
15
結合したセルに縦書きと横書きの混合文字を入れたいのです。
Excel(エクセル)
-
16
インデックスに印刷する方法
Word(ワード)
-
17
Word差し込み印刷で2ページ以降が印刷できない
Windows 95・98
-
18
Chr(13)とChr(10)の違いは?
PowerPoint(パワーポイント)
-
19
年表を縦書きに!!
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
人気Q&Aランキング
-
4
マウスポインターが白十字のまま
-
5
エクセルのIF関数で、文字が...
-
6
エクセルファイルに _x000D_ と...
-
7
セルは大きくさせず、中の文字...
-
8
エクセルで特定の列のセルだけ...
-
9
エクセルのセル外改行は可能で...
-
10
セル内の一部の文字だけをハイ...
-
11
JIS水準漢字の選別方法教えてく...
-
12
エクセルの入力規則プルダウン...
-
13
エクセルで画像を透過させて画...
-
14
VBA:結合されたセルに対する「...
-
15
全セルの末尾に改行(Alt+Enter...
-
16
エクセルの白黒の反転で困って...
-
17
エクセルで右隣のセルより優先...
-
18
エクセルの行の下げ方
-
19
セルの大きさを個別に変更したい。
-
20
エクセルのカーソルが表示され...
おすすめ情報
公式facebook
公式twitter