sheet1.cells1

I have values in cells A1 to B2 on Sheet1. I want to read those values into an array and paste onto Sheet2. Why is it that this works: Dim MyArray() As Variant MyArray() = Sheet1.Cells(1, 1).CurrentRegion.Value Sheet2.Cells(1, 1).CurrentRegion.Delete...

This works: MaxVal = Application.WorksheetFunction.Max(Sheet1.Range("A1:F1")) but not this: MaxVal = Application.WorksheetFunction.Max(Range(Cells(1,1), Cells(1,6)))) neither do these: MaxVal = Application.WorksheetFunction.Max(Range(Sheet1.Cells(1,1), Sheet1.Cells(1,6)))) MaxVal...

I have created a small macro to display a checklist that can by checked off and says "Complete" once all items have been checked. I created this using ActiveX Listbox with multiselect. However, when the file is saved and reopened, all the check marks clear out. Is there a way to fix this so...

Why does this work: If Sheet1.Cells(1,1).Value Like "a*" Then MsgBox "Starts with a" but this fails? Select Case Sheet1.Cells(1,1).Value Case Like "a*" Msgbox "Starts with a" Case Else Msgbox "Doesn't" End Select EDIT SORTED: Select Case...