How can auto delete sub form's blank row

[Welshgasman]

Yes you are right, stupid of me to use Delete

Well, VBA had not exactly been your forte?

[mike60smart]

At least I got the Before Update element right

[Welshgasman]

At least I got the Before Update element right

Bob mentioned that event prior to your post?

[mike60smart]

I put it down to Bob types quicker

[Welshgasman]

I put it down to Bob types quicker

Yes, he is pretty slick.

[deepaksharma]

What Code did you use?

Private Sub Form_BeforeUpdate(CANCEL As Integer)

If Me.SHADE.Value = "" and Me.meter.Value = "" Then
DoCmd.RunCommand acCmdDeleteRecord
End If


If Me.SHADE.Value = Null and Me.meter.Value = Null Then
DoCmd.RunCommand acCmdDeleteRecord
End If

If (IsNull(Me![SHADE].Value)) And (IsNull(Me![METER].Value)) Then
DoCmd.RunCommand acCmdDeleteRecord
End If

End Sub

This is not deleting empty row

[mike60smart]

If a Row (Record) is empty then there is nothing to delete.

There will always be a blank row in a Continuous Form which you cannot remove.

[Bob Fitz]

If a Row (Record) is empty then there is nothing to delete.

There will always be a blank row in a Continuous Form which you cannot remove.

You could set the form's AllowAdditions property to false but you would have find a way enter a new record when it is required.

[Welshgasman]

Private Sub Form_BeforeUpdate(CANCEL As Integer)

If Me.SHADE.Value = "" and Me.meter.Value = "" Then
DoCmd.RunCommand acCmdDeleteRecord
End If


If Me.SHADE.Value = Null and Me.meter.Value = Null Then
DoCmd.RunCommand acCmdDeleteRecord
End If

If (IsNull(Me![SHADE].Value)) And (IsNull(Me![METER].Value)) Then
DoCmd.RunCommand acCmdDeleteRecord
End If

End Sub

This is not deleting empty row

How many times do you need to be told???
There is nothing to delete!!!

[deepaksharma]

How many times do you need to be told???
There is nothing to delete!!!

Sir, I do not want to delete the record, but I want to delete the empty rows, see in the picture.

[mike60smart]

If you had set up validation correctly in the first place you would not have any blank rows.

[Bob Fitz]

Sir, I do not want to delete the record, but I want to delete the empty rows, see in the picture.

Run a DELETE query:

DELETE GREY_SHADE.Shade, GREY_SHADE.MeterFROM GREY_SHADE
WHERE (((GREY_SHADE.Shade) Is Null) AND ((GREY_SHADE.Meter) Is Null));

EDIT

If you had set up validation correctly in the first place you would not have any blank rows.

I agree

[deepaksharma]

If you had set up validation correctly in the first place you would not have any blank rows.

Please tell where and how to set

[moke123]

I see his question differently.

He's not talking about new entries. He saying that users are going back to previous records and deleting portions of the record.
This is leaving previously entered records incomplete. Look at the screenshot.

[deepaksharma]

I see his question differently.

He's not talking about new entries. He saying that users are going back to previous records and deleting portions of the record.
This is leaving previously entered records incomplete. Look at the screenshot.

You are absolutely right and such this type Mistake user can also be made during new entry.