2列目のデータを別の列の行に基づいて自動入力する

Question

私は検索して検索していくつかのアイデアを試しましたが、これはまだ実現していません。私はこれを行うにはVBスクリプトを使用する必要があるかもしれないと思っていますが、これまでのすべての試みは失敗しました。

基本的に、2列目の最初の行にある同じデータ（つまり、スクリーンショットB2 = '234'であるため、下のすべてのセルも '234'となります）で2番目の列のセルを自動入力する必要があります。列2の塗りつぶしのデータ行は、列Aにある行の合計数と一致する必要があります（あるジョブから次のジョブに変更される可能性があります）。私はStackからここに近いいくつかの数式を編集しようとしましたが、エラーが続いています。私はスクリーンショットを添付しています。これにより、このことがより明確になり、これについての洞察を本当に感謝するでしょう。ありがとう。それがより良いフォーマットされていますので、答えを投稿しようとすると

Answer 1

列1の行の番号に基づいて スクリーンショット-autfill列2。

Sub ClientFill() 
' 
' 
ClientFill Macro 
' 
' 
Dim lngLastRow As Long lngLastRow = Cells(Rows.Count, "A").End(xlUp).Row  
Range("B3:B" & lngLastRow).Value = Evaluate("B2") 
End Sub