Reagieren auf Ereignisse
Sven
ich weis nicht mehr weiter. Mein Problem ist folgendes:Ich babe eine Datenbank auf dem Netzwerk, nun kommt hier oft ein Artikel hinzu. Ich kann während des Eingebens der Artikel die Datenbank öffnen und beschreiben, dies geschieht mittels eines Buttons. Mein Problem ist daß ich mit einem anderen Button die Datenbank aktualiesiere, auch kein Problem. Nun möchte ich aber eine Statusanzeige haben die mir den Stand der Aktualisierung mitteilt. Derzeit mache ich es so:
Private Sub CommandButton7_Click()
'Status Anzeige
MaskeBestLief.Show
'Update Datenbank
ActiveWorkbook.UpdateLink Name:="F:\Technik-Management\TechEK\ArtDB.xls", _
Type:=xlExcelLinks
End Sub
Nun kommt eine UserForm:
Private Sub UserForm_Activate()
Application.Wait Now + TimeSerial(0, 0, 5)
Unload Me
End Sub
Eine elegantere Lösung wäre echt nett, Danke im Voraus...
Sven
Anzeige