$$Excel-Macros$$ Re: Need help with VBA Macro...

2009-03-06 Thread Peter Jorgensen
There are a few ways that you can do it. The first is to start with the first row and find the last populated row. Assuming data with every row filled, you could do something like: iNumberRows = Range("A6").End(xlDown).Row - Range("A6").Row In this case, it assumes your data starts in A6, s

$$Excel-Macros$$ Re: Want to write something like this - =IF(H3=TRUE OR B2 < B3, TRUE)

2009-03-05 Thread Peter Jorgensen
You can do it by nesting your IF statements: =IF(H3=TRUE,TRUE,IF(B2mailto:excel-mac...@googlegroups.com] On Behalf Of Angus Sent: Thursday, March 05, 2009 11:15 AM To: MS EXCEL AND VBA MACROS Subject: $$Excel-Macros$$ Want to write something like this - =IF(H3=TRUE OR B2 < B3, TRUE) Hello I wa

$$Excel-Macros$$ Re: Find next available row

2009-03-04 Thread Peter Jorgensen
If the next available row is the first blank row on the spreadsheet you can use this: iNextRow = Worksheet("MySheetName").Range("A65535").End(xlUp).Row + 1 Worksheet("MySheetName").Range("A65535").End(xlUp).Row returns the row number for the last row in column A with data in it (you can change t

$$Excel-Macros$$ Re: Reminder workbook

2009-03-01 Thread Peter Jorgensen
I tried to attach a sample workbook but it got rejected for some reason. I added the following code to the "This Workbook" section of the VBA project: Private Sub Workbook_Open() Dim dteNow As Date, iLoop As Integer, strMessage As String dteNow = Date For iLoop = 1 To Works

$$Excel-Macros$$ Re: complete checkbox automatically

2009-02-27 Thread Peter Jorgensen
If it need not be a checkbox, you can do it with formulas very easily. Format column 3 to be center aligned and put in this formula: =IF(ISBLANK(A1),IF(ISBLANK(B1),"","X"),"X") (assuming your first two columns are A1 and B1... you can adjust references as needed but this will easily copy and pas

$$Excel-Macros$$ Re: problem highlighting duplicated cells based on a condition

2009-02-27 Thread Peter Jorgensen
This could be done by a VBA function but I'm curious how this will be checked. You have the data, is it being continuously changed? Do we need to check it continually? Do we need to compare all values of familyX and familyY or just two specific rows at a time? Are familyX and familyY constantly be

$$Excel-Macros$$ Re: problem deleting last cell in a specific row

2009-02-24 Thread Peter Jorgensen
Assuming that your data does not have any empty rows: Sub DeleteWhereExtra() Dim I As Integer For I = 2 To Worksheets("Sheet1").Range("A65535").End(xlUp).Row If Worksheets("Sheet1").Range("A" & I).Value = "extra" Then Worksheets("Sheet1").Range("D" & I).ClearContents