Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 09:08:00
Export alle Tabellenblätter als csv - in bestimmten Ordner
26.04.2024 08:56:40
Über alle Spalten nur €-Werte zählen
26.04.2024 08:08:24
Pivot Vormonatsveränderung
26.04.2024 07:54:11
nur den ersten Eintrag in spalte zählen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1256to1260
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1256to1260
1256to1260
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Daten automatisieren

Daten automatisieren
Ralf
Hallo Experten
Ich habe eine kleines Problem und zwar möchte ich den Datenimport automatisieren. Zur Zeit muss ich die Daten per Button in die Tabelle schieben. Dazu habe ich mir ein kleines Makro angelegt.
Nun möchte ich dass sich Excel die Daten automatisch und zyklisch abholt sobald die Tabelle geöffnet wird.
Der Datenstring sieht folgendermaßen aus: Datum;Uhrzeit;Anzahl;Gewicht;Einheit
Die Daten liegen unter folgendem Verzeichnis ab: C:\Temp\HCdaten.rcd
Danke für euere Hilfe.
Gruß Ralf

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Daten automatisieren
02.04.2012 13:15:44
Rudi
Hallo,
etwa so.
In ein Modul 
Option Explicit
Public Const Intervall = 10 'Abholintervall in Minuten
Public naechstesMal As Date
Sub DatenHolen()
'Dein Code
naechstesMal = Now + TimeSerial(0, Intervall, 0)
Application.OnTime naechstesMal, "Datenholen", , True
End Sub

In DieseArbeitsmappe 
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.OnTime naechstesMal, "DatenHolen", , False
End Sub
Private Sub Workbook_Open()
DatenHolen
End Sub

Gruß
Rudi
AW: Daten automatisieren
02.04.2012 13:50:51
Ralf
Hallo Rudi
hat funktioniert.
Nochmals vielen Dank für die schnelle Hilfe.
Gruß Ralf
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige