No.4ベストアンサー
- 回答日時:
質問では、規則性はなさそうだし、折り返し数も2個以上かもしれないということで、指定した文字数で折り返すユーザー定義関数を作りました。
手順も書きましたのでチャレンジしてみて下さい。最初はみんな超初心者です。折り返し箇所の指定は任意の個数可能です。長くなるので、9個目で改行、6個目で改行のように指定を昇順に指定しない場合は対応していません。
扱うのは全角文字の文章と想像しています。(半角でもOKですが)『ついでに』の先頭の空白は全角空白にしています。
使い方ですが、今、Bシートの該当セルは =VLOOKUP(・・・・・) となっていると思いますが、これを
=Orikaeshi(VLOOKUP(・・・・・),8,16) や
=Orikaeshi(VLOOKUP(・・・・・),9,20,26,32) のようにします。
また、該当セルの書式設定の配置は折り返して全体を表示するにチェックを入れておきます。うまくいけばいいえすが。
ツール→マクロ→Visual Basic Editor でVBE画面に移り、
挿入→標準モジュール で標準モジュールを挿入しそこに下記コードを貼り付けて下さい。
'指定文字数で折り返し。(先頭に全角空白を挿入)
Public Function Orikaeshi(Bunsyo As String, ParamArray aryNagasa() As Variant)
Dim L As Integer 'カウンタ
Dim mojisuu As Integer '1行文字数
Dim wkBunsyo As String '処理用変数
Bunsyo = " " & Bunsyo
For L = 0 To UBound(aryNagasa())
If L = 0 Then
mojisuu = aryNagasa(L)
Else
mojisuu = aryNagasa(L) - aryNagasa(L - 1)
End If
wkBunsyo = wkBunsyo & Left(Bunsyo, mojisuu) & vbLf
Bunsyo = Mid(Bunsyo, mojisuu + 1)
Next
wkBunsyo = wkBunsyo & Bunsyo
Orikaeshi = wkBunsyo
End Function
締め切ってしまってから気がつきました…。
改行ごとの頭に空白を入れたかったのでした。
説明不足で申し訳ありませんでした。
でも、他はすばらしくうまく行きました。
「改行ごとに頭に空白を入れるには?」として、新たに質問をしておきますので、
また機会がありましたらお世話してください。
ありがとうございました。
No.3
- 回答日時:
どもども田吾作7です。
急いで書きます。
改行するからには、何らかの理由があるから改行するんですよね?
たとえばVlookUpでもってくるデータが文章で、「本日は晴天なり。だけど明日は雨。」というデータを持ってくるとします。
そのデータが表示では「本日は晴天なり。だ(改行)けど明日は雨。」とならないように、読点の次の位置から改行を行うという規則性を持たせたら、「本日は晴天なり。(改行)だけど明日は雨。」というようになります。
あっΣ( ̄ロ ̄lll) 待ち合わせの時間が・・・急がねば・・・
では出かけます。
No.2
- 回答日時:
どもども田吾作7です。
リンクしたデータは基本的に同じデータ値を持つために、改行を任意でというのはできません。
[A1]の内容が1999/7/14 [B1]に数式=A1だったとします。その[B1]の表示を1999年7月14日にするのは可能です。これは同じデータ値なのですが、表示形式を加工することで実現可能です。
しかし、行いたいことは改行ですよね?改行は"あ"とか"E"とかと同様に"(改行コード")という文字がデータに必要になります。
[A1]の内容"abcdefg"を[B1]の内容"abcd(改行コード)efg"と変更するわけですから、データ値が変わることになります。ですのでVLOOKUP関数だけではムリだと思います。
改行するのに規則性はありますか?
それと今日は午後3時まで予定があるので、以後すぐの回答は出来ませんので、、、
_(._.)_
でわでわ
ご親切にありがとうございます。
規則性とは…???
説明もできなくて、誠に申し訳ありません。
もうお分かりのように、私はパソコンに関して、超初心者なのです。
それでも教えていただけますか?
No.1
- 回答日時:
どもども田吾作7です。
エクセルの話ですよね?
たぶん[A1]のセルに"abcdefg"と入っていて、[B1]のセルには数式[=A1]みたいになっていて、[B1]のセル内容を、任意の位置で改行して表示したいという意味ですか?
もうちょっと情報が・・・
この回答への補足
エクセルです。
Aシートに情報が入っていて、BシートにVlookupでデータをリンクさせています。
A1セルに”abcdefg”からはアナタ様のご想像通りです。
もしかして、まだ意味不明でしょうか…。
本当にド素人なので、誠にお手数をおかけしますが、
再度お返事をいただけませんでしょうか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAのコマンドボタンの文字列の...
-
ソースコードの1行が長いとき...
-
C++でのCRLFについて
-
選択したセルでダブルクリック...
-
エスケープ文字の復帰(¥r)と...
-
エクセルVBA 文字列領域が不足...
-
ラベル(スタティックテキスト)...
-
VBでcsv読込TextFieldParser...
-
vbsで2文字以上の空白を改行に...
-
ExcelVBAでメールを作成してメ...
-
texのchapterが改行される
-
改行コード(CR/LF)の設...
-
C++で空Enterの入力を判...
-
VBA テキストボックスの行数取得
-
改行について
-
ファイルから読み取った改行文...
-
JavaDoc コメントの改行について
-
textareaに改行を入れても、CSV...
-
awkで改行を除いて文字列を抜き...
-
VBAでCSVをExcelに取り込む時に...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAのコマンドボタンの文字列の...
-
ソースコードの1行が長いとき...
-
エスケープ文字の復帰(¥r)と...
-
COBOLの改行
-
C++で空Enterの入力を判...
-
C# DataGridViewのセルを改行禁...
-
改行について
-
Excel VBAからBeckyを起動して...
-
ExcelVBAでメールを作成してメ...
-
テキストファイルから改行コー...
-
最終行の改行について
-
グレープシティのSPREAD...
-
JavaDoc コメントの改行について
-
コンボボックスの項目中に改行を
-
エクセルVBA 文字列領域が不足...
-
JavaMail,本文中の改行について
-
ファイルから読み取った改行文...
-
【VBA】エクセルで最後の不要な...
-
JAVA Spring 改行コードを含む...
-
改行コードが半角スペースにな...
おすすめ情報