Hallo Frieder, Robert,
ich habe das Makro zum Laufen gebracht. Knackpunkt war die Reihenfolge
der Makro-Sequenzen.
sub Probe
dim oTable1, ofild, oControll
oTable1 = thisComponent.drawpage.forms(0).getByName(MainForm_Nachname)
If oTable1.getRowSet.RowCount =0 Then Exit Sub
'Die folgende
Hallo Jochen
Am 17.01.2012 23:15, schrieb Jochen:
Hallo Frieder
Am 16.01.2012 13:40, schrieb Frieder:
oform.getRowSet.moveToInsertRow(false)
'Fokus setzen, damit mann direckt hineinschreiben kann.
thiscomponent.CurrentController.getControl(oform).setFocus
end sub
Vielen Dank für Deinen
Hallo Frieder,
Ich habe grundsätzlich eine Methode gefunden, mit der das geht.
Allerdings scheint sie nicht 100%ig zu funktionieren.
Ich weiß nicht , ob das ein Bug ist, oder ob ich etwas falsch mache.
Aber hier die Methode:
'Das Tabellenkontrollfeld ansprechen
Hallo Frieder
Am 16.01.2012 13:40, schrieb Frieder:
oform.getRowSet.moveToInsertRow(false)
'Fokus setzen, damit mann direckt hineinschreiben kann.
thiscomponent.CurrentController.getControl(oform).setFocus
end sub
Vielen Dank für Deinen Code-Vorschlag. Dieser hat mir schon
weitergeholfen.
Hallo Jochen
Am 15.01.2012 16:17, schrieb Jochen:
Hallo *,
ich möchte für Base ein Makro erstellen, das in einem
Tabellenkontrollfeld in einem Formular u.a. folgenden zwei Aufgaben
durchführen soll:
1) Nummer des letzten Datensatzes einer Tabelle auslesen.
2) Befehl Neuer Datensatz
Hallo Jochen
Am 15.01.2012 16:17, schrieb Jochen:
ich möchte für Base ein Makro erstellen, das in einem
Tabellenkontrollfeld in einem Formular u.a. folgenden zwei Aufgaben
durchführen soll:
1) Nummer des letzten Datensatzes einer Tabelle auslesen.
2) Befehl Neuer Datensatz ausführen.
Habe
Hallo *,
ich möchte für Base ein Makro erstellen, das in einem
Tabellenkontrollfeld in einem Formular u.a. folgenden zwei Aufgaben
durchführen soll:
1) Nummer des letzten Datensatzes einer Tabelle auslesen.
2) Befehl Neuer Datensatz ausführen.
Ich finde nicht die dazu nötigen Befehle bzw.