Hi Team,
I want to make cells mandatory to be filled out in a table row, especially in column M4:M (qty) and in every inserted row below row 5 & the "total" bar.
I don't know how the check on the table & blank cells could be triggered?! Maybe to attach the code in the "insert row" macro command button? The below code doesn't work though automatically
I want to make cells mandatory to be filled out in a table row, especially in column M4:M (qty) and in every inserted row below row 5 & the "total" bar.
I don't know how the check on the table & blank cells could be triggered?! Maybe to attach the code in the "insert row" macro command button? The below code doesn't work though automatically
VBA Code:
Sub blank()
Dim sh As Worksheet, rngEmpty As Range
Set sh = ActiveSheet 'use here your sheet
If WorksheetFunction.CountA(sh.Range("A5:M5")) >= 1 Then
If WorksheetFunction.CountA(sh.Range("A5:M5")) <> sh.Range("A5:M5").Cells.Count Then
Set rngEmpty = sh.Range("A5:M5").SpecialCells(xlCellTypeBlanks)
MsgBox "Condition Type cannot be blank!" & vbCrLf & _
"Blank cell(s) in " & rngEmpty.Address, vbInformation, _
"No blank cells allowed"
End If
End If
End Sub
