エクセル文字列反転

Question

たとえばA1の内容が aiueo のとき B1に oeuia と表示させるにはどうすればいいですか？　そういう関数はありますか？
ご教示よろしくお願いします

hige_082 · Accepted Answer

見落としていました
＞選択した各セルの右隣のセルに結果が表示されるようにしたいのですが…

Sub test2()
Dim rng As Range
For Each rng In Selection
rng.Offset(0, 1) = StrReverse(rng)
Next
End Sub

hige_082 · Answer

回答は出ているようですが
VBA関数に"StrReverse"が用意されていますよ

Sub test()
Range("b1") = StrReverse(Range("a1"))
End Sub

参考まで

xls88 · Answer

Sub tes2()
　　Dim c As Range
　　Dim i As Integer
　　
　　For Each c In Selection
　　　　For i = Len(c.Value) To 1 Step -1
　　　　　　c.Offset(, 1).Value = c.Offset(, 1).Value & Mid(c.Value, i, 1)
　　　　Next i
　　Next c
End Sub

popuplt · Answer

おはようございます。No.3です。
＞B1 に =IF(A1,B1+1,0) を入れると #VALUE! と表示されます
たぶんですが、[#VALUE!]と表示されるのは式を入力する時、A1になんらか文字列が入っていたのではないでしょうか？
循環参照なので、[#VALUE!]が表示されるとA1＝１としても、一般機能のようにエラーを解除して再計算されません。
まず、A1を[DEL]で削除してください。それで[B1]が０になれば、A1に１を入力してください。
循環参照はエラー扱いされてほとんど使うことがありませんので、慣れないとなかなか判りにくいですね。
うまく行かないときは、混乱しますのでこの案は無視してください。

xls88 · Answer

参考出品

Sub tes1()
　　Dim i As Integer
　　For i = Len(Range("A1").Value) To 1 Step -1
　　　　Range("B1").Value = Range("B1").Value & Mid(Range("A1").Value, i, 1)
　　Next i
End Sub

tom04 · Answer

何度も！何度も！ほんとぉ～！にごめんなさい！m(__)m
No.1・4です。
先ほどの黄色の列を削除してしまうと、エラーになってしまいますので
逆文字になった列をA列の方へドラッグして
一文字ずつ入っているセルを見えなくしてみてはどうでしょうか？

尚、一連の操作をマクロに記録しておけば、
データが増えても簡単に出来ると思います。
しつこいくらい顔を出して・・・失礼しました。
それではおやすみなさい。m(__)m

tom04 · Answer

たびたびごめんなさい！
No.1です！
またまた・・・反則技を持ってまいりました！
Excel2003での回答ですが、参考までに・・・
すでにA列に文字が入力されている場合ですが。

A列に行挿入してB列にA列すべてをコピーします。
B列すべてを範囲指定して、
データ　→　区切り位置　「スペースによって・・・」を選択
→一番文字数の多いところまで区切り位置を一文字ずつ設定してOK
↓の画像であれば、L1セルに
K1&J1&I1&H1&G1&・・・という具合に逆から＆でつないでいきます。
その後オートフィルでコピー
最後に黄色の列をすべて削除して完了です！
関数ではなく今回もかなり無理矢理って感じですが、
何度もごめんなさい。m(__)m

popuplt · Answer

一般的ではないのですが、関数で並べ替えてコピー値貼り付けで文字列に変換する方法です。
循環参照を使うので、オプションの「反復計算を行う」にチェック
回数は適当に「３０」（文字数より大きい数字）
[B1]=IF(A1,B1+1,0)
[D1]=aiueo　があるとして
[E1]=IF($A$1,MID(D1,$B$1,1)&E1,"")  と入力します。
ほかの文字列の横に[E1]の式をコピーしてこれで準備が完了です。
[A1]に１を入力すると文字列が逆転します。

変換した逆文字を[コピー][値貼り付け]をして確定して、「反復計算を行う」のチェックをはずしたほうが無難でしょう。
循環参照になれていないと戸惑いますので参考程度です。

gyouda1114 · Answer

同じように考える方おられるんですね

過去ログです
EXCELで文字列の並べかえ
http://oshiete1.goo.ne.jp/qa3197571.html

tom04 · Answer

こんばんは！
やり方は色々あるかも知れませんが・・・
今思いつく方法としては、かなり強引ですが、
A1セルの文字をB1セルに表示させるとします。
B1=RIGHT(A1,1)&LEFT(RIGHT(A1,2),1)&LEFT(RIGHT(A1,3),1)&LEFT(RIGHT(A1,4),1)&LEFT(RIGHT(A1,5),1)

ただし、5文字の場合の数式です。
他にも簡単な方法の回答があるかも知れませんので
軽く読むくらいにしておいてください。m(__)m

エクセル 文字列反転

見落としていました

回答は出ているようですが

Sub tes2()

おはようございます。

参考出品

何度も！何度も！ほんとぉ～！にごめんなさい！m(__)m

たびたびごめんなさい！

一般的ではないのですが、関数で並べ替えてコピー値貼り付けで文字列に変換する方法です。

同じように考える方おられるんですね

こんばんは！

関連するカテゴリからQ&Aを探す

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング

エクセル文字列反転