Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

VBA in OpenOffice

Frage Entwicklung VB for Applications

Mitglied: manuel5

manuel5 (Level 1) - Jetzt verbinden

27.11.2007 um 16:17 Uhr, 5828 Aufrufe

Hallo zusammen,

habe in MS Excel n VBA Script geschrieben welches mir die Arbeit n Stueck erleichtern soll - da wir aber in der Arbeit OpenOffice verwenden wollt ich den Code "einfach" reinkopieren.

Private Sub cmdAdd_Click()

On Error GoTo Mldg
Dim CurrentDB As Database
Dim db As Database
Dim rs As Recordset
Dim strSQL As String
Dim strBest As String
Dim txtBest As String

Set db = CurrentDB()
Database = (xxxxxxxx)
strSQL = "Select * From xxxxxxx Where Bestellnummer = " & Str(strBest)
Set rs = db.OpenRecordset(strSQL, dbOpenDynaset)
MsgBox "Bestellnummer :" & rs!Bestellnummer & vbCr & "Empfänger :" & rs!Empfänger
Exit Sub
If txtBest = Bestellnummer Then
MsgBox "Hallo"
End If

Mldg:
Titel = "xxxxxx-Bestellnummern"
MsgBox "Keine xxxxxx-Bestellnummer!"
End Sub

Private Sub cmdDelete_Click()
Unload Me

End Sub

Nur leider macht OO schon bei dem Namen Database schlapp - kennt OO scheinbar nicht den Namen.
Habt ihr ne Idee wie ich das "umwandle" das auch OO es lessen kann?

Und wie kann ich in OO Formulare etc erstellen?

Gruß Manuel
Ähnliche Inhalte
Microsoft Office
VBA Excel Problem mit UserForm, ListBox und TextBox (5)

Frage von abuelito zum Thema Microsoft Office ...

XML
gelöst Kein automatisches Backup über Button VBA (2)

Frage von Knuefi zum Thema XML ...

Basic
gelöst IE im Private Mode per VBA öffnen und URL Übergeben (3)

Frage von thomas1972 zum Thema Basic ...

VB for Applications
Vba Outlook Betreff Datum - Absender - Empfänger (7)

Frage von Romy0907 zum Thema VB for Applications ...

Neue Wissensbeiträge
Heiß diskutierte Inhalte
Viren und Trojaner
Ransomware .nm4 (15)

Frage von Zyklo92 zum Thema Viren und Trojaner ...

iOS
16 iPads zentrall verwalten (14)

Frage von simonlohr zum Thema iOS ...

Microsoft Office
+1.000 Ordner in Outlook: Wie besser? (11)

Frage von Matsushita zum Thema Microsoft Office ...