Excelで私は2つの列A、B、C、D、Eを持っています。列Aの各行に段落があります。 B列、C列、D列、E列には列Aの各セルの前に4つの異なる単語があります。細胞。しかし、これらの4つの単語のすべては、段落全体に均等に配置する必要があります。たとえば、1単語は段落の冒頭になければならない。そして、残りの3つの単語は、段落全体に均等に配置する必要があります。指定された位置のExcelセルにWordを挿入
「TRIM」機能を適用して先頭と末尾のスペースを削除しました。段落は改行と複数のサブ段落を含む複数の行で構成されます。
注：解決策が7,8,9ワードなど、より多くの語句に対して柔軟であれば、それは素晴らしいことになります。
次のコードは役に立ちます。これはUDFです。参照用
Function InsertWord(Source As String, InsWord As String, Pos As Integer)
Dim arr() As String
arr = Split(Source, " ")
wordCount = UBound(arr)
If wordCount < 1 Or (Pos - 1) > wordCount Or Pos < 0 Then
InsertWord = Source
Else
arr(Pos - 1) = arr(Pos - 1) & " " & InsWord
InsertWord = Join(arr, " ")
End If
End Function
参照イメージ：
あなたはいくつかのコードを投稿することができますか？あなたは、あなたの数式/ VBコード（どちらかといえばどちらでも）を投稿すると、あなたの質問にもっと素早く答える手助けをしなければならない解決策があるようです。 –
あなたの質問をより詳細で正確に言い換えてください。現在、それは理解できません。あなたは、 "列Aの各セルの前に4つの異なる単語"（？）を "2つの列"（？）とし、4つの単語を等間隔にしたいとしますか？そしてあなたのコードの試み。 –
私は別の方法で質問を変更したいと思います。 Excelで2つの列AとBがあります。列Aの各セルに段落があります。列Bには、各セルに特定の単語が含まれています。私は列Bでその単語を使用し、列Aの段落にその段落の50語の後に挿入したいと思います。どのようにすればいいですか？ 注：この問題は、数式または関数を使用して解決したいと考えています。その後、その数式をExcelの列にドラッグします。 – sam