Get instant live expert help on I need help with excel select to end of column

How to let users select the range of values of X and Y in Regression using Excel VBA Sub trail() Application.Run "ATPVBAEN.XLAM!Regress", ActiveSheet.Range("$H$1:$H$" & Range("H" & Rows.Count).End(xlUp).Row) _ , ActiveSheet.Range("$I$1:$L$" & Range("L" & Rows.Count).End(xlUp).Row), False, True, 95, ActiveSheet.Range( _ "$V$2"), True, True, False, False, , False End Sub

Hello, I would like to select the range below my cell that has bold font. Right now I have this code. Sub Findandcut() Dim rngA As Range Dim cell As Range Set rngA = Sheets("Sheet1").Range("d2:d9") For Each cell In rngA If cell.Font.Bold Then cell.Offset(1, 0).Select End If Next cell End Sub --- But I would like to select each of the ranges below each of the cells that have bold fonts. In my column I have 5 cells with bold fonts

My excel sheet keeps returning an error 1004. I'm trying to create an insert button for adding a vehicle to a sales list. below is the code from the macro I created; Range("B3:N3").Select Selection.Copy Sheets("For Sale List").Select Rows("5:5").Select Selection.Insert Shift:=xlDown Sheets("Add New Item").Select Application.CutCopyMode = False Selection.ClearContents Sheets("For Sale List").Select Range("A5").Select End Sub

I set up a pageand now I want to select everything on thae page howver the selection automatically goes pass the end of my page

Macro1 Macro ' FormatSchedule ' ' Range("A3").Select Application.CutCopyMode = False ActiveCell.FormulaR1C1 = "=R[1]C" Range("A5").Select Application.CutCopyMode = False ActiveCell.FormulaR1C1 = "=R[1]C" Range("A7").Select Application.CutCopyMode = False ActiveCell.FormulaR1C1 = "=R[1]C" End Sub