Run-time error '13' Type mismatch

[tania_r]

Hi everyone,

From what I already read on this forum this is a very common error but the existent threads didn't help me though.

This is the first time I'm programming in Excel/VBA and I'm doing something really simple. I need this for image processing: I have two columns with x and y coordinates, and want to make them look like (80.524, 5.24),
So I'm just merging the columns (+xcoordinate+, and ycoordinate+)+,

My whole code is:

Sub Ordz()
x = 1
Do While x < "7913"
'Do While Cells(x, 1).Value <> ""
[B]Cells(x, 8).Value = Cells(x, 1).Value + Cells(x, 2).Value + Cells(x, 3).Value[/B]
Cells(x, 9).Value = Cells(x, 4).Value + Cells(x, 5).Value + Cells(x, 6).Value
x = x + 1
Loop
End Sub

The error line is the 5th (or the 6th if I comment the 5th). The commented 4th line, I used it to see if it made a difference and it didn't...

Thank you in advance !

Cheers,
Tania

 

[VoG]

Should it be?

Cells(x, 8).Value = Cells(x, 1).Value & Cells(x, 2).Value & Cells(x, 3).Value

 

[tania_r]

Should it be?

Cells(x, 8).Value = Cells(x, 1).Value & Cells(x, 2).Value & Cells(x, 3).Value

You are so right !

I had put '+' symbols because that is what you can learn from the official Office tutorial (http://office.microsoft.com/en-gb/t...with-excel-macros-RZ001150634.aspx?section=19), and they are merging columns with characters as well. Anyway...

Thank you so much for your quick and useful reply ;D

Tania