Check range A10 to A45 and if cell not empty then same line in B must have value

Almost there. Thank you.

Mate you mentioned me to implement the InputBox, if only I knew how I would be jumping of joy really.

Some times I tweak the code to work for me and only very rarely it works with the debug coming up and then another yellow line of code to deal with.

The way you have now put this, if cell in column B is empty to which there is data in column A, the input box only asks for a number now without reference to the cell.

Could we have the cell still being mentioned or even better the data in cell A displayed to which cell B is empty and therefore causing the error?

Another thing is the numeric value is still being passed as correct if cell has got 0 (zero) in it.

But I can always take care of this with conditional format and not allow for 0.

Thank you mate for your input.

Cheers,
Albert

Actually I have just thought if it wouldn't be easier and simpler to have the macro just checking range in A and for the same amount of cells with data, the same amount of cells in column B should have a numeric value bigger than 0.

By bigger I mean 0.001 is bigger as there are some products that can go as far as 0.050Kg.

If the number of cells in column B is not equal to the number of cells in A then return error such "You have selected items with zero quantity. Please check your invoice." set focus to the very first empty cell and that is it. I would be happy with this.

I believe this would make it much simpler no?

The only thing is it must see identical cell in line to each other. Example considering that there is an invoice of only 1 item;

A10=butter basted

B11=1

Now this is the same number of cells with data right? There is one cell in A and one cell in B. But the macro must see this as wrong as for A10 there should be a numeric value for B10.

I hope I am not making this way confusing and if this last approach of mine makes it any easier I would go for it.

Many thanks.

Cheers.
Albert

Works wonderfully mate.

I have taken a look at the code and can't even see where does the macro see the value higher that 0.

I was expecting something like >0 somewhere along any line of code.

As you have managed this and I can't really ask for more as it is working as wanted to, how would you go about referring to the content of the cell in A when displaying the inputBox?

I mean right now it indicates which cell needs a value but instead of this for example;

A10= bag of potatoes B10=empty no value here.

inputBox and msgBox display both B10 as reference.

How would you code this to display Enter number for bag of potatoes. and you must enter a quantity for a bag of potatoes.

Sorry to be a pain.

But I just think this so intriguing man.

Cheers.
Albert

Change to
MyNum = Application.InputBox("Enter Quantity for " & rCell.Value)

Also, right now, if you enter a non number in the Input Box, like a letter, then you get the message box but it doesnt stop the macro.
If you want the Macro to stop, then you need an "Exit Sub":

                If IsNumeric(MyNum) = False Then
                    MsgBox ("You must enter a numeric value in " & rCell.Offset(0, 1).Address(False, False))
                    rCell.Offset(0, 1).Select
                    Exit Sub
                Else