Cant combine cells to single string and write to cell

[PanzerRanger]

Using Excel 2013

If Im runing the code below in a for loop then comb works fine.

For Each c In Range("B2:B10") 'ersätt range
nr = Right(c, 3)
If nr = 980 Then
unr = c.Offset(0, -1)
se = c.Offset(0, 0)
comb = unr & " Sektion" & " " & se
Range("c4") = comb
End If
Next



but if comb looks like this
comb = unr & " Sektion " & se or comb = unr &" " & "Sektion" & " " & se

it generates a Type error 1004, but I need the spaces, any help because Im stuck out here

Many thanks

 

[Fluff]

This works for me

For Each c In Range("B2:B10") 'ersätt range
nr = Right(c, 3)
If nr = 980 Then
unr = c.Offset(0, -1)
se = c.Offset(0, 0)
comb = unr & " Sektion " & se
Range("c4") = comb
End If
Next

What are the values of unr & se when it fails?

 

[PanzerRanger]

Sheet looks like this

[TABLE="width: 131"]
<colgroup><col><col></colgroup><tbody>[TR]
[TD]Col A [/TD]
[TD] Col B[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]=H9K119[/TD]
[TD="align: right"]1000[/TD]
[/TR]
[TR]
[TD]=B4T119[/TD]
[TD="align: right"]1980[/TD]
[/TR]
[TR]
[TD]=B4B120[/TD]
[TD="align: right"]1981[/TD]
[/TR]
[TR]
[TD]=B4B121[/TD]
[TD="align: right"]1982[/TD]
[/TR]
[TR]
[TD]=B4B122[/TD]
[TD="align: right"]1983[/TD]
[/TR]
[TR]
[TD]=B4B123[/TD]
[TD="align: right"]1990[/TD]
[/TR]
</tbody>[/TABLE]

 

[PanzerRanger]

Hoovering over:
unr = "=H9B4T119"
se = 1980
com = "=H9B4T119 Sektion 1980"

 

[PanzerRanger]

Apparently I cant use 2 spaces

 

[Fluff]

If you actually have an = sign in the col A values try

comb = "'" & unr & " Sektion " & se

 

[Fluff]

Apparently I cant use 2 spaces

It's not the spaces its the = sign, xl thinks you'r trying to input a formula

 

[PanzerRanger]

I noticed Thanks! It also worked if I change the cell data type. I guess its easy to miss those little things

Cheers

 

[Fluff]

Glad to help & thanks for the feedback