This formula starts me at D2, need it to begin at cell D18
Private Sub CommandButton1_Click()
Dim rngNext As Range
Set rngNext = Sheet1.Range("D" & Rows.Count).End(xlUp).Offset(1)
rngNext.Value = TextBox1.Value
End Sub
This formula starts me at D2, need it to begin at cell D18
Private Sub CommandButton1_Click()
Dim rngNext As Range
Set rngNext = Sheet1.Range("D" & Rows.Count).End(xlUp).Offset(1)
rngNext.Value = TextBox1.Value
End Sub
Change the Offset from (1) to (17)
1N73LL1G3NC3 15 7H3 4B1L17Y 70 4D4P7 70 CH4NG3 - 573PH3N H4WK1NG
You don't have to add Rep if I have helped you out (but it would be nice), but please mark the thread as SOLVED if your issue is resolved.
Tom
It now pushes each entry 17 cells down instead of 1. This is driving me crazy
This will work...it might not be the best solution, but it works
![]()
Please Login or Register to view this content.
Thankyou so much, I will take it.
You're welcome.....glad it worked for you.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks