Using a button to scroll Up & Down a Database on a Userform

C

Cimjet

Hi Everyone
This macro takes me to the first entry on my database, i would like to be able
to scroll Up&Down with a button
Can anyone give me a macro to do that.
Any help would be very much appreciated.
Regards
John
Private Sub cmnbFirst_Click()
Dim FirstCl As Range
Set FirstCl = Range("a1").End(xlDown).Offset(1, 0)
With Me
.cmbAmend.Enabled = False
.cmbDelete.Enabled = False
.cmbAdd.Enabled = True
.TextBox1.Value = FirstCl.Value
.TextBox2.Value = FirstCl.Offset(0, 1).Value
.TextBox3.Value = FirstCl.Offset(0, 2).Value
.TextBox4.Value = FirstCl.Offset(0, 3).Value
.TextBox5.Value = FirstCl.Offset(0, 4).Value
End With
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Spin button to scroll up&down a database with a userform 7
VBA Coding Help for Beginner 0
Word macro that can call cells out of Excel for a find and replace 0
Drop down list control value in vba 2
Making a macro only work on certain files 2
Textbox input goes to 2 sheets in same wbk 0
Conditional checks in Userform 0
Arbitrary data to Textboxes in UserForm 4

Top