Hi
find the code below
Sub test()
Dim strAddress As String
strAddress = Range("B65536").End(xlUp).Address
Range("B3").Select
While ActiveCell.Address <> strAddress
If ActiveCell.Offset(0, 89).Value <> "Labor" Then
MsgBox "Cell " & ActiveCell.Offset(0, 89).Address & " is
empty"
End If
ActiveCell.Offset(1, 0).Select
Wend
End Sub
Regards
Bala
On May 29, 12:53 pm, amrahs k <[email protected]> wrote:
> Hi Harmeet,
>
> I just want a macro for validating a particular column in the attached
> spreadsheet.
>
> The requirement is as follows-
>
> If column "B4:B" has S.No. "1,2, and so on" then it should check for the
> corresponding column "CM4" in the same row. Whether the cell is contain
> value "Labor" or not. If it is blank then i need a msgbox for the same (ie)
> cell value is empty.
>
> Similarly for the next S.No. 2, 3 and so on. (Note: if you refer the S.No. 3
> it seems very clear that the cell CM8 is empty does not contain "Labor". for
> this case i need the macro should give an alert that cell value is empty!
>
> I need your extreme help towards this since it is very urgent to my project.
>
> Thanx in advance.
>
> Regards,
> Sharma
>
> Sample.xls
> 437KViewDownload
--~--~---------~--~----~------------~-------~--~----~
-------------------------------------------------------------------------------------
Some important links for excel users:
1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at
http://www.excelitems.com
2. Excel tutorials at http://www.excel-macros.blogspot.com
3. Learn VBA Macros at http://www.vbamacros.blogspot.com
4. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to [email protected]
If you find any spam message in the group, please send an email to:
Ayush Jain @ [email protected] or
Ashish Jain @ [email protected]
-------------------------------------------------------------------------------------
-~----------~----~----~----~------~----~------~--~---
