VBA check multiple cells if empty put text in cell B

[cizzett]

What I want to do is try to figure out a macro or code that can check if there is data in column D but column Q, R, and T are empty then I want to place the word "New" into column B.

Any Idea's?

Thanks as always

 

[mumps]

Place this formula in B1 and copy down: =IF(AND(D1<>"",Q1="",R1="",T1=""),"New","")

 

[cizzett]

Well the problem is there is already a Vlookup in B so I was hoping to make a VBA that can run once, when I run the macro that imports the data from a dump file.
Then id like to add the macro to the button as a call after the first macro so it runs once after the data has migrated to this worksheet and if those cells are empty and D is not empty it puts the "New" into B.

Hope that makes more sense

 

[mumps]

Try:

Sub Test()
    Application.ScreenUpdating = False
    Dim LastRow As Long, rng As Range
    LastRow = Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
    For Each rng In Range("D2:D" & LastRow)
        If rng <> "" And rng.Offset(0, 13) = "" And rng.Offset(0, 14) = "" And rng.Offset(0, 16) = "" Then
            rng.Offset(0, -2) = "New"
        End If
    Next rng
    Application.ScreenUpdating = True
End Sub

 

[cizzett]

Thats exactly what I am looking for except I may not be able to get it to work as the cells have Vlookups in them so its still recognizes the cells as having something in them

 

[cizzett]

Maybe I need to try a macro to get the matching data from the other worksheet and remove the vlookups in those cells.

 

[mumps]

Misposted

 

[cizzett]

So I removed the formulas and it still doesn't want to mark them as New

 

[cizzett]

I added a macro to remove all the vlookups before this code but this code still doesn't mark as new

 

[mumps]

I think that it would be easier to help and test possible solutions if I could work with your actual file which includes any macros you are currently using. Perhaps you could upload a copy of your file to a free site such as www.box.com or www.dropbox.com. Once you do that, mark it for 'Sharing' and you will be given a link to the file that you can post here. Include a detailed explanation of what you would like to do using a few examples from your data and referring to specific cells, rows, columns and worksheets. If the workbook contains confidential information, you could replace it with generic data.