Datum aus Excel nach VB 6 übergeben

[Andrej T]

Hallo Leute

ich wende mich wieder vertrauensvoll an euch.

Könnt ihr mir sagen, wie man ein x belibieges Datum von Excel nach VB übergibt.

alles was ich bis jetzt bekomme ist zB 0,2342348249284392348

Das selbe ist auch mit der Uhrzeit.
Es ist halt der Effekt, dass wenn man ein Datum in Excel eingibt und es auf eine Standard zahl formatiert, dann bekommt man solche krumen Zahlen.

Wie man auf die Zellen zugreift habe ich bereits durch tagelanges lesen herausgefunden.
Nur wie man das Datum jetzt im richtigen Format bekommt entzieht sich meiner Kenntniss.

Wie oben erwähnt wäre ich euch sehr verbunden

Gruß Andrej

 

[Dragon78]

Servus,

hast du in VB schon folgendes versucht?
1. Variable als "Date" deklarieren
2. dieser Variablen den Wert mit "=CDate(Inhalt_der_Zelle)" zuweisen

Beispiel:

Dim zeit_datum As Date

zeit_datum = CDate(ActiveSheet.Cells(1, 1).Value)

 

[Andrej T]

danke für den Tip

Habe auch bereits mit Excel etwas rumgespielt und das mit dem Datum hinbekomme, ohne das ich da irgendetwas speziel deklarieren musste.

Aber das mit der Zeit passt noch nicht.


da muss ich den Umweg über Zellenformatierung wählen.
Dort wähle ich die volle Datumsanzeige aus und muss nach dem Bestätigen das Datum aus der Zelle herauslöschen, die Uhrzeit aber stehen lassen.
erst dann akzepiert VB es.


Also nicht grade Anwenderfreundlich----


Gruß

Andrej