Range zuweisen

Forumthread: Range zuweisen
1 Beitrag zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Range zuweisen

Range zuweisen

08.10.2004 21:06:00

jede029

Hallo
Ich habe eine befehlszeile in modul 1 stehen
Application.OnTime TimeValue("00:15:00"), "am"
nun möchte ich einen Range in Tab.blattxxx der befehlszeile zuweisen
sodass ich die zeit im tab.blattxxx ändern kann.
wer kann mir helfen?
danke jens

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Range zuweisen

Fritz

AW: Range zuweisen

Fritz

Hallo Jens,
wenn ich dich richtig verstanden habe, möchtest du die Zeit für den Befehl "OnTime" in einer Zelle in einme Tabellenblatt ändern.
Hierzu verwendet folgenden Code im Modul 1
'Im Kopf von Modul1 vor der ersten Funktion
Private Const TabName = "blattxxx" 'Name des Tabellenblattes mit der Zeit
Private Const Zelle = "A1" 'Zelle mit Zeit; Wichtig! Die Zelle muß mit dem
'Format "hh:mm:ss" formatiert sein!
Public


Sub Zeiteinstellen()
'Übernimmt die Zeit aus der Konstanten "Zelle" im Blatt der Konstanten "TabName"
Application.OnTime Sheets(TabName).Range(Zelle).Value, "am"
End Sub

Fritz