Gibt es eine bessere Lösung?
23.07.2002 23:25:46
luna
Sub Schleife()
Application.Run "Mappe1.xls!Verbindung_aufbauen"
Application.Wait (Now + TimeValue("0:00:20"))
Application.Run "Mappe1.xls!Verbindung_trennen"
Application.Wait (Now + TimeValue("0:00:20"))
End Sub
Luna