をテキストに番号を変換するために、私は、ソリューションを使用するかのいずれかであるwww.extendoffice.com
で答えを見つけましたEEMの提案と似ている別の列の集約関数(しかし、これは私が探していたものではありません)。または、次のコードを使用してVBAモジュールを使用してください:
Sub AddTextOnLeft()
'Updateby20161004
Dim Rng As Range
Dim WorkRng As Range
Dim addStr As String
On Error Resume Next
xTitleId = "Add Text"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
addStr = Application.InputBox("Add text", xTitleId, "", Type:=2)
For Each Rng In WorkRng
Rng.Value = addStr & Rng.Value
Next
End Sub
ありがとうございますが、これは役に立ちそうです。この式を考慮すると、1つのセルで操作を実行するのに役立ちます。私は一度に複数の細胞にそうしようとしています。 –
値がVlookupの式で得られたとは言及していませんでしたか?次に、テキスト式内にvlookup式を配置します。 e.i. = Text(vlookup(x、range、col、0)、 "00000000") – EEM
いいえ、値はvlookup式では得られません。どちらの表にも共通する値があり、そのうちの1つはゼロではありません。値が0のテーブルでゼロを含まない値を検索すると、結果は#N/Aになります。 0以外の値を編集し、先行ゼロを追加すると、必要に応じて結果が正しく表示されます。各セル(編集するテーブルの300行程度)を編集するのではなく、一度にすべてのセルを編集できるかどうかを知りたい。 –