I am trying to write a macro using If...Then
I am trying to write a macro that will look at the value in column G. If
that value is blank or zero, then select the entire row and delete it. Then I want it to populate columns A with a number "111119" and column H with "TEXT" Here's what I tried, but it's not working. (There are other sorts, etc. that precede this item in the macro, that seem to be working fine.) If Range("g:g") < 1 = true Then ActiveWorkbook.Worksheets("Tab3 Upload").Rows.Select Selection.Delete End If If Range("b:b") 1 Then Range("a:a").Select Selection.Fill "111119" Range("h:h").Select Selection.Fill "TEXT" End If End Sub |
I am trying to write a macro using If...Then
Your question is not clear. Did you want to look at the values of each
individual cell in the column and make decisions based on those values? So if Cells G2, G4, G6 are blank then delete rows 2, 4 and 6 while leaving the rest? Are the values in G based on formulas or are they constants? -- HTH... Jim Thomlinson "AJ" wrote: I am trying to write a macro that will look at the value in column G. If that value is blank or zero, then select the entire row and delete it. Then I want it to populate columns A with a number "111119" and column H with "TEXT" Here's what I tried, but it's not working. (There are other sorts, etc. that precede this item in the macro, that seem to be working fine.) If Range("g:g") < 1 = true Then ActiveWorkbook.Worksheets("Tab3 Upload").Rows.Select Selection.Delete End If If Range("b:b") 1 Then Range("a:a").Select Selection.Fill "111119" Range("h:h").Select Selection.Fill "TEXT" End If End Sub |
All times are GMT +1. The time now is 03:12 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com