Hallo, einfach so:
'... Dim strMeineDaten As String Worksheets("Personnel").Cells(1, 1) = strMeineDaten '...
andernfalls mußt Du schon mal Deinen Code zeigen oder ein Bsp-Dat. hochladen... Gruß,