spolk,

Change

Cells(SB, "Horizon_Measurements!A:A").Value = "SB203"

to

Worksheets("Horizon_Measurements").Cells(SB, "A").Value = "SB203"

HTH,
Bernie
MS Excel MVP

"spolk " wrote in message
...
I Have the following problem: I wanted to calculate value "as" to the
column A in worksheet "Horizon_Measurements". When i try like below,
the code stucks i this row and appears notification of typo error. But
if i keep on the same worksheet and calculate values to the column AB
everything works fine, what stucks? How i should refer to the column A
in sheet "Horizon_Measurements"


'This is not working

If LCase(Cells(SB, "H").Value) = "as" Then
Cells(SB, "Horizon_Measurements!A:A").Value = "SB203"

'This works

ElseIf LCase(Cells(SB, "H").Value) = "hts" Then
Cells(SB, "AB").Value = "SB501"


---
Message posted from http://www.ExcelForum.com/