I ett formulär kan jag välja bland olika alternativ, och skulle vilja att man genom att trycka på en knapp eller dubbelklickning kan öppna ett nytt formulär och presntera rätt "record" för vidare editering. Med hjälp av VB....Hoppa till önskat record?
Har ett macro som öppnar mitt nya formulär och som sedan "hoppar" till ett record. Men när jag klickar i det andra formuläret så erhåller jag ett "record"-nummer som jag vill hoppa till. Hur skickar jag med det till macrot?
Eller måste man lösa detta i VB? Och hur skulle det då kunna se ut?Sv: Hoppa till önskat record?
Lägg in en kommandoknapp i ditt första formulär, där du lägger in alternativen och får fram record numret.
Dubbelklicka på knappen.
I Verktyg på arkivmenyn väljer du Referenser, markera Microsoft DAO X.XX beroende på vilken version av Access du har. I modulen skriver du följande kod. Hoppas det funkar, har skrivit det ur minnet så jag hoppas jag inte missat nåt!
' -------------
dim iRecNo as Integer
iRecNo = me.Textbox1 ' Textbox1 ersätter du med fältet där du har record nr
dim SQL as string
SQL = "SELECT * FROM Table1 WHERE RecordID = " & iRecNo & ";"
dim db as database
set db = CurrentDb
dim Rs as dao.recordset
set Rs = DAO.recordset(SQL)
With rs
.MoveFirst ' Hittar ditt record
DoCmd.openform("Form1"
form1.Textbox1 = .fält1 ' fält1 är fält från ditt record
form1.textbox2 = .fält2
' osv osv
' Stänger recordsetet
.close
set rs = nothing
db.close
set db = nothing
End sub
Lycka till!
Alex