Indsæt talrække 2, 3....

Du kan ikke indsætte flere tal i det samme talfelt

Niels

Så skal lave feltet om til tekst.

tal rækken: 2, 3, 4 ,,, ser access som en tekst.

ligesom en celle i et regneark heller ikke kan lave beregninger på en celle der indeholder flere tal.

Niels

Make your table an set the "Tal" field to Autonumber, this will increment the number by one for each record you insert.

Nååh ja - sådan kan man også forstå spørgsmålet ;o)

Kommunikation er svært. Du har fanget spørgsmålet, terry.
Men tallene skulle begynde med 2, ikke med 1!
Og skal jeg så ikke nulstille autonumbering hver gang, jeg skal bruge netop tallene fra 2 og opefter? Hvordan gør jeg det?
Jeg har selv overvejet noget med insert dmax() + 1, men det kan jeg ikke få til at virke.

OK, insert a single row and then delete it. The next record will start from 2....
NOTE: Autonumber will always increment with one form the LAST inserted number. If you delete ALL records it will STILL continue from the last inserted number. To set this back to 0 you hav eto compact the database throughthe tools database menu....
Then INSERT a single record and delete it again to start from 2 :o)

Why do you need to delete the records once they are INSERT?

terry, du har svaret på mit spørgsmål, indrømmet, men det var formuleret dårligt.
Jeg har en tabel med flere felter, bl.a. feltet Tal. Tabellen skal bruges til at udskrive en indholdsfortegnelse, idet jeg er sikker på, at hver række står på netop een side. Rapportudskriftet har også en forside, derfor startes med "2". De øvrige felter i tabellen er output til indholdsfortegnelsen.
Jeg forsøger at indlægge udskrift af denne indholdsfortegnelse som en rapport i en applikation, så alt for meget med at slette en række, gå ud af access, komprimere osv er ikke lige sagen. Jeg tror stadig at jeg behøver en simpel sub i VBA. Jeg har problemer med at få en sub til at køre, og jeg såmænd nok også fejl i logikken.
PS. Som det nok fremgår er jeg total, men kvalificeret nybegynder på VBA området.

Jeg hører til den type, der ønsker at vide, hvad du ønsker? Det er lidt uklart!

rsa: forstår du slet ikke, hvad jeg mener, eller hvad er du i tvivl om?

it sgetting late and I have had too much to drink :o) so I will take a look tomorrow, Byee.....

Her er lidt kode (ADO - Husk at tjekke referencen)

Sub indsaetTal()
  Const Qry As String = "Q_1"
  Const feltNavn As String = "tal"
 
  Dim con As ADODB.Connection
  Dim rec As New ADODB.Recordset
  Dim i As Integer
 
  Set con = CurrentProject.Connection
  rec.Open Qry, con, , adLockOptimistic, adCmdTable
  rec.MoveFirst
  i = 2
  Do While Not rec.EOF
    rec.Fields(feltNavn) = i
    i = i + 1
    rec.MoveNext
  Loop

  rec.Close
  con.Close
End Sub

Niels

øhh Jeg ser du bruger Access 95 (DAO)

her har du en kode i DAO:

Sub indsaetTal()
  Const felt As String = "tal"
  Const Qry As String = "Q1"
 
  Dim db As Database
  Dim rst As Recordset
  Dim i As Integer
 
  Set db = CurrentDb
  Set rst = db.OpenRecordset(Qry)
 
  rst.MoveFirst
  i = 2
  Do While Not rst.EOF
    rst.Edit
    rst.Fields(felt) = i
    rst.Update
    i = i + 1
    rst.MoveNext
  Loop
End Sub

Niels

Tak, det virker og er lige hvad jeg manglede!