Create appointment: Method * of object * Failed / Runt time error

Hi, I have a problem that stops us from sending appointments to our technichians. I have a macro written in Excel 2016 that create appointments in Outlook (and a lot of other things) which works fine on my computer and others. Now one person has a new computer (also Excel 2016) where everything works except the red rows below.


With oFolder
Set olApt = oApp.CreateItem(olAppointmentItem)
olApt.MeetingStatus = olMeeting
With olApt
.Start = Cells(6, 3).Value + Cells(8, 3)
.End = Cells(6, 3) + DateAdd("n", Cells(10, 3).Value, Cells(8, 3))
.Subject = SR + " " + Cells(12, 6) + " " + Cells(8, 6)
.Location = Cells(10, 6)
.Body = Cells(6, 6) + vbNewLine + vbNewLine + Cells(16, 3)
.BusyStatus = olFree
.ReminderMinutesBeforeStart = Cells(12, 3)
.ReminderSet = True

' get the recipients
Dim RequiredAttendee, OptionalAttendee, ResourceAttendee As Outlook.Recipient
Set RequiredAttendee = .Recipients.Add(Cells(14, 3).Value)
RequiredAttendee.Type = olRequired
'Display 'Ta bort denna om bokningen ska skickas automatiskt
.Send
.Save
.Move oFolder
End With

We get an error message:
"Run-time error '-2147417851 (80010105)':
Method 'Location' of object '_AppointmentItem' failed

I have googled and I found a lot of matches but havn't been able to solve it. Does anybody know what I can do or have any suggestions?

Thank you in advance,
Johan

Thanks for you reply. I added the code Debug.Print Cells(10, 6) above .Location = Cells(10, 6). When I step through the immediate window says e.g. "Bollbrogatan 1 257 33 Helsingborg" which is the correct street and postal address.

Very strange. In one of my hundreds of googling I found someone who wrote that if they register the string as a variable and then add it to location (or the To-address in that example) it would work. And actually it did. I added before the "With":
Location = Cells(10,6)
and then in the With:
.Location = Location
And it worked!
If anyone knows why that matters I would be pleased to now. For me it should be the same thing but obviously it's not.

You're a genius! Yes, that also worked. So Excel didn't interpret my address in the cells as strings? The cells are all formatted as General. Your conversion did the trick.