SEBTATA
05-25-2016, 08:58 AM
Hi,
I am new in VBA.
I have one spreadsheet with about 3000 items.
Its is purchasing report.
The order numbers appear only once and they may have 10 or more items.
I need excel to put in the column A the order number for each item as now it appears only for item 1 in column B.
So I tried to change all blank cells in A to "check above".
This way I was trying something like:
If cell.Value = "CHECK ABOVE" Then
ActiveCell.Offset(-1, 0).Select
Selection.Copy
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
End If
Loop
Please help me to put this in the proper way.
Thank you very much.
I am new in VBA.
I have one spreadsheet with about 3000 items.
Its is purchasing report.
The order numbers appear only once and they may have 10 or more items.
I need excel to put in the column A the order number for each item as now it appears only for item 1 in column B.
So I tried to change all blank cells in A to "check above".
This way I was trying something like:
If cell.Value = "CHECK ABOVE" Then
ActiveCell.Offset(-1, 0).Select
Selection.Copy
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
End If
Loop
Please help me to put this in the proper way.
Thank you very much.