Office: (Office 2007) mit VBA Mehrere Datensätze auf einmal anlegen

*gelöscht *

 

Ok, zuerst mal, folgende Nachricht kommt beim Kompilieren:

Als nächstes meine ich, dass ich ADO eingesetzt, musste ich nochmal gucken, bin mir aber recht sicher.

Edit: ADO ist eingebunden

MFG

MegaMac

 

wieso steht denn da PARTONEN und nicht PATRONEN in deinem Code?

 

mhh... war falsch, hat aber leider trotzdem nix geändert, merkwürdiger weise hat das prog den fehler überlesen, weil er immer einen Datensatz angelegt hat xD

Naja, fehler aber trotzdem noch net behoben, ich seh einfach keinen fehler ...

 

nimm mal das new raus, also nicht:
Code:

sondern
Code:

 

mhh... *confused.gif*

Ich blick da langsam nimmer durch, vorallem, was merkwürdigerweise das lustigste ist, der Code hatte schonmal funktioniert, er geht erst seid kurzem nimmer

Auch das wegnehmen von new hat keinen erfolg gebracht, mich wundert aber, dass der wegen dem Dateityp meckert, ADO ist doch eingebunden ...

 

hast du die DB schon einmal geschlossen und wieder geöffnet?
welche ADO Version ist denn eingebunden?

 

Das mit dem neustart der DB hab ich noch net versucht, hat allerdings auch net funktioniert.

Die Version?

Naja, hier der eintrag, den ich gebunden habe:

Microsoft Office 12.0 Access database engine Object

und soweit ich weiß, ich das ADO

vllt sagt ja auch die 12 aus, welche version das ist, soweit hab ich mich noch net damit befasst.

 

nö, sondern Microsoft ActiveX Data Objects 2.x Library
der Verweis darauf fehlt dir.

 

achja, stimmt ja *gegen den kopf schlage*

Naja, hab ich jetzt Version 2.8 reingetan, hat sich trotzdem nix verändert.

 

aber es kommt nicht die gleiche Fehlermeldung oder?

 

Ne, nur halt wieder, dass er ME! nicht kennt, aber trotzdem legt er immernoch nicht so viele Datensätze an, wie ich in die Text7 eingebe

Edit: Hier nomma der Code:

Code:

Edit2: Es kommt ja aber auch nicht die geringste meldung, warum es nicht geht mit mehreren Datensätzen, der macht einfach etwas, wenn ich auf den Button klicke und gut ist. Der müsste doch durch das AddNew nen neuen anlegen.

 

wenn er me nicht findet, dann geht er natürlich die schleife nur einmal durch,
es ist dann ja 0=0
du könntest ja me!
durch forms!Formularname!
ersetzen.
Das formular ist aber geöffnet?

 

Aber ich dachte, ME! geht sowieso nur, wenn ich das Formular durchlaufen lasse und net, wenn er den Debugger laufen lässt.

Außerdem ist i = 1, wodurch die Abfrage 1 < 0 dann wäre beim ersten mal und ich glaub, er würde dann ja überhaupt nicht in die schleife gehen.

PS: Ich hab gerade mal was festegestellt...

Der Code, den der CptChaos mir gegeben hat, ist mit i = ME!Text7, es müsste doch aber i < ME!Text7 sein...

...ausprobieren xD

Mh... tut aber immernoch net mehr ....

Edit 3:

Ok, cool, jetzt ist mir der VBA abgeschmiert, vermutlich ne endlosschleife xD

Edit 4:

Wenn ich jetzt mit dem Debugger es durchlaufen lasse, macht er es sogar, aber nicht vom Fomular aus und irgendwie scheint eine kleine endlosschleife reingekommen zu sein, doofer autowert, jetzt steckt der schon mir bei über 10000 xD

 

naja wenn er ME! nicht findet, dürfte sowieso nichts passieren
ok, wenn i=1 ist, müsste die Schleife einmal durchlaufen werden
Do Until
heisst gehe die Schleife solange durch, bis die Bedingung erfüllt ist