Это отличное начало!У вас есть несколько вещей, но по большей части вы были не слишком далеко.Имейте в виду, что есть тонна различных способов подойти к этому, но так как вы учитесь, я принял ваш подход и заставил его работать.Посмотрите, приближает ли это вас к тому, что вы ищете:
Sub Macro2()
Dim rng As Range
Dim cell As Range
Set rng = Range("L2:L318")
For Each cell In rng
If cell.Value = 902.4 Then Cells(cell.Row, 8).Value = "Text"
Next cell
End Sub
Посмотрите, что я написал, и посмотрите, сможете ли вы сделать из этого голову или хвост.Как видите, это не слишком далеко от того, что вы имели, просто немного почистил и исправил синтаксис.
Имейте в виду, этот макрос будет выполняться на текущем активном листе.Если вам нужно, чтобы он работал на определенном листе, вам нужно будет немного лучше квалифицировать ссылку на диапазон ... что-то вроде: Рабочие листы ("имя вашего рабочего листа"). Диапазон ("L2: L318")