Hallo,
ich hab ein Rechnungsformular erstellt bei dem man eine Kundennummer eingeben kann wodurch die Daten des jeweiligen Kunden aus der Kundenliste geladen werden.
Nun will ich noch eine Rechnungsliste erstellen, wo die Kundendaten und der Ausstellungszeitpunkt der fertigen Rechnung reingeladen wird. Das ganze müsste also auf Knopfdruck passieren. Wie kann ich das realisieren?
Hoffe jmd. weiß eine Lösung, vielen Dank im Vorraus.
mfg Philipp
Daten per Knopfdruck von Tab a zu Tab b
Moderator: Moderatoren
-
- *
- Beiträge: 12
- Registriert: Mi, 05.04.2006 12:48
Hey Philipp,
Gruss
Thomas
Mit Basic. Einfach ein entsprechendes Makro programmierenWie kann ich das realisieren?

Gruss
Thomas
Unterstützer LibreOffice, zertifizierter Trainer und Berater
Bücher: LibreOffice 6- Einstieg und Umstieg
Makros Grundlagen - LibreOffice / OpenOffice Basic
Bücher: LibreOffice 6- Einstieg und Umstieg
Makros Grundlagen - LibreOffice / OpenOffice Basic
-
- *
- Beiträge: 12
- Registriert: Mi, 05.04.2006 12:48
Will Datum kopieren, aber nicht die Formel
Hi,
ich hab jetzt ein Makro aufgezeichnet, funzt auch soweit. Nur will ich ein Datum von der Rechnung in die Rechnungsliste kopieren und dabei nicht die Funktion "Heute ()" kopieren, sondern nur das Datum, sodass es sich in der Rechnungsliste nicht mehr verändert. Welche Formel kann ich dafür verwenden?
mfg Philipp
ich hab jetzt ein Makro aufgezeichnet, funzt auch soweit. Nur will ich ein Datum von der Rechnung in die Rechnungsliste kopieren und dabei nicht die Funktion "Heute ()" kopieren, sondern nur das Datum, sodass es sich in der Rechnungsliste nicht mehr verändert. Welche Formel kann ich dafür verwenden?
mfg Philipp
-
- ********
- Beiträge: 4330
- Registriert: Di, 22.06.2004 12:02
- Wohnort: 71134 Aidlingen
- Kontaktdaten:
Code: Alles auswählen
function SysDatum()
oZell = thisComponent.getcurrentSelection()
if not oZell.supportsService("com.sun.star.sheet.SheetCell") then
msgbox "Bitte nur eine Zelle markieren (aktivieren)!", 48, "Fehler!"
exit function
end if
oZell.value = now()
oZell.NumberFormat = 30
end function
Gruß
Peter
---------------------------------------------------------------------------
Windows 7 Prof. 64-bit SP1, LibreOffice 4.3.6.2 und AOO 4.1.1
Peter
---------------------------------------------------------------------------
Windows 7 Prof. 64-bit SP1, LibreOffice 4.3.6.2 und AOO 4.1.1
-
- *
- Beiträge: 12
- Registriert: Mi, 05.04.2006 12:48