Hello all,
I'm new here and just starting to dive into the more complicated world of excel
I created a command button via VBA to add a new row below to the top of my list for entry but now having issues with the functions/formulas not copying over. For example a simple =(??) to mirror another cell in the new row or a function such as =IF(COUNTA(Z6:AA6)=2,"Y","N") to carry over as well. See below for what works so far for adding the new line just need some help with figuring out the rest. Please help!
Private Sub CommandButton1_Click()
Sheets("2019-2020 R&R Tracker Test").Range("A7").Select
ActiveCell.EntireRow.Insert Shift:=xlDown
Sheets("2019-2020 R&R Tracker Test").Range("A7:AK7").Select
Selection.Borders.Weight = xlThin
End Sub
I'm new here and just starting to dive into the more complicated world of excel
I created a command button via VBA to add a new row below to the top of my list for entry but now having issues with the functions/formulas not copying over. For example a simple =(??) to mirror another cell in the new row or a function such as =IF(COUNTA(Z6:AA6)=2,"Y","N") to carry over as well. See below for what works so far for adding the new line just need some help with figuring out the rest. Please help!
Private Sub CommandButton1_Click()
Sheets("2019-2020 R&R Tracker Test").Range("A7").Select
ActiveCell.EntireRow.Insert Shift:=xlDown
Sheets("2019-2020 R&R Tracker Test").Range("A7:AK7").Select
Selection.Borders.Weight = xlThin
End Sub