Microsoft Office Tutorials and References
In Depth Information
11.4.9 Unterdialogfeld »Bestellungen Neu«
' Ganze Zeile löschen
Cells(Zeile, 1).EntireRow.Delete
' Zurück zum Hauptmenü
Unload Me
frmNordwind.Show
End Sub
Zur Erläuterung:
Der Artikel kann nur gelöscht werden, wenn ein Artikelname einge-
tragen ist.
Kein leerer Name
Nach der Sicherheitsabfrage wird die Zeile mit dem Artikel gesucht
und mit Hilfe der Methode Delete() vollständig gelöscht.
Sicherheits-
abfrage, Delete()
11.4.9
Unterdialogfeld »Bestellungen Neu«
Das Unterdialogfeld Bestellungen Neu beinhaltet enthält Abläufe wie
die bereits beschriebenen Unterdialogfelder Kunden Ändern und Arti-
kel Ändern. In diesem Abschnitt werden nur die Unterschiede genauer
erläutert.
Ähnliche Abläufe
Beginn, Ende
Zunächst die modulweiten Variablen und zwei Prozeduren dieses Dialog-
felds, die zu Beginn und Ende wichtig sind:
Option Explicit
Private Type BestelldetailTyp
Artikelnummer As Integer
Artikelname As String
Einzelpreis As Single
Anzahl As Integer
Gesamtpreis As Single
End Type
Dim Bestelldetail() As BestelldetailTyp
Dim MailBody As String
Private Sub UserForm_Initialize()
Dim i As Integer
' Kategorien hinzufügen, ersten Eintrag anzeigen
cmbKategorieSuchen.Clear
Search JabSto ::




Custom Search