cell data move to left

Originally Posted by lapot

Dear all
How do i move red higlighted datas to the cells that arrow pointing until "Totals for case type"

I have the below formula that only moves one cell to left

For i = 1 To 65000
If Cells(i, 1) = "Case Type" Then
Cells(i, 1).Offset(1, 0).Value = Cells(i, 1).Offset(0, 1).Value
Cells(i, 1).Offset(0, 1).ClearContents
End If
Next
End Sub

can you please help?
thanks

hi

try

Please Login or Register  to view this content.

hth
---

Originally Posted by lapot

thanks for your reply but it didnt work. this is doing my head in

Hi,

'it didn't work' is not much of a technical description to help you solve your problem.

the code

Please Login or Register  to view this content.

certainly moves the data as displayed in your .doc.

what happened for you?
---