fout melding in form

[johndirk]

hi

ik heb een foutmelding in mijn form.
de volgende en de vorige buttons werken niet.
ik heb de spinbutton optie nagekeken en geen fouten kon vinden.

********** volgnde button *************
Private Sub cmdvolgende_Click()
SaveRow
CurrentRow = lCurrentRow + 1
LoadRow
End Sub

*********** vorige button **************
Private Sub cmdVorige_Click()
If lCurrentRow > 1 Then
SaveRow
CurrentRow = lCurrentRow - 1
LoadRow
End If
End Sub

ik wil een button voor de volgende en de vorige record zien in mijn form hebben.

 

[Hoornvan]

johndirk,

waarom staat dat # ervoor?

 

[johndirk]

Re: fout message in form

# betekent niks ik heb het gewist.
ik heb mijn code nakeken toch mijn volgende en vorige knoppen werken niet
ik wil kunnen via vorige en de volgende knop naar de volgende record

 

[Hoornvan]

johndirk,

Hij geeft een fout bij SaveRow en LoadRow ze zijn niet gedeclareerd.
Bij SaveRow heb je ook geen verwijzing, ik zie hem althans niet.

 

[johndirk]

Re: fout message in form

bedankt voor snelle antwoord Hoornvan

U had gelijk ik had 2 procedure vergeten te plaatsen
Private Sub LoadRow()
txtName.text = Cells(lCurrentRow, 1).Value
txtPhone.text = Cells(lCurrentRow, 2).Value
End Sub

Private Sub SaveRow()
Cells(lCurrentRow, 1).Value = txtName.text
Cells(lCurrentRow, 2).Value = txtPhone.text
End Sub

 

[huijb]

Hou het bij een topic http://www.helpmij.nl/forum/showthread.php?t=449703 en verdiep je in de huisregels. Plaat je code tussen de codetags