Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Format Zellenwert
zurück: Problem mit AutoFilter und Copy/Paste weiter: Excel Such Makro Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Djawed
Im Profil kannst Du frei den Rang ändern


Verfasst am:
29. Nov 2012, 11:20
Rufname:

Format Zellenwert - Format Zellenwert

Nach oben
       Version: Office 2007

Hallo Leute,

bräuchte kurz Hilfe. Es geht um folgendes: Ich hole mir von einer Tabelle/Spalte mir spezielle werte die ich in einer ComboBox einlese. Problem, das Format für der Quelle ist 11.2009 11:59:11. Ich bräuchte diese Information in meiner Combobox nur i folgenden Format: 11.2009

Um es einfacher zu sagen, ich brauche nur das Datum, und nicht zusätzlich die Uhrzeit.

Code:

'Mit diesem SQL-Statement wird definiert, nach welchem Datensatz gelesen wird
Const SQL_STATEMENT1 = "SELECT DISTINCT DATUM_ATS FROM I_STUFE"
Const SQL_STATEMENT2 = "SELECT DISTINCT NAME FROM EE_KOMPONENTE"

Dim objConnection As Object, objRecordset As Object
Dim avntTemp As Variant
Dim ialngIndex As Long

'Öffnen der Datenbank mit mithilfe des Objekts "Connection"
Set objConnection = CreateObject("ADODB.Connection")
With objConnection
.ConnectionString = "Driver=Microsoft ODBC for Oracle;" & _
"Data Source=SWLL6P_PLASV011.MUC;" & _
"UID=xxxxx;PWD=xxxxxx;"
.Open
End With

'Definieren eines leeren RecordSet-Objekts, das später den gesuchten Datensatz enthaltet
'Set objRecordset = CreateObject("ADODB.Recordset")
'Öffnen der Datenbank und Füllen die dem SQL-Statement entsprechenden Daten in das Recordset
'objRecordset.Open SQL_STATEMENT, objConnection
Set objRecordset = objConnection.Execute(SQL_STATEMENT1)
If Not (objRecordset.EOF Or objRecordset.BOF) Then

avntTemp = objRecordset.GetRows
'Füllen der Combobox ATS-Termine mit Daten
For ialngIndex = LBound(avntTemp, 2) To UBound(avntTemp, 2)
chkATS.AddItem avntTemp(0, ialngIndex)
Next
'Den ersten Eintrag einstellen
UserForm1.chkATS.ListIndex = 0

End If

objRecordset.Close
objConnection.Close

Set objRecordset = Nothing
Set objConnection = Nothing
Isabelle :-)
Menschin


Verfasst am:
29. Nov 2012, 11:32
Rufname:
Wohnort: Westlicher Spiralarm der Galaxis


AW: Format Zellenwert - AW: Format Zellenwert

Nach oben
       Version: Office 2007

Hallöchen,

versuch es mal so:

Code:
Public Sub Test()
    MsgBox Split("11.2009 11:59:11", " ")(0)
End Sub

_________________
LG Isi

Die Mitgliedschaft im Forum erhöht deine Chance auf eine Antwort von mir um 99,999%
Gast



Verfasst am:
29. Nov 2012, 11:37
Rufname:

AW: Format Zellenwert - AW: Format Zellenwert

Nach oben
       Version: Office 2007

ich zeigt mir in der ComboBox den Wert in folgenden Format:

19.11.2009 11:59:11

Duie Uhrzeit soll er mir nicht zeigen, wo genau soll ich die Splitanweisung jetzt einbringen?
Gast



Verfasst am:
29. Nov 2012, 11:42
Rufname:


AW: Format Zellenwert - AW: Format Zellenwert

Nach oben
       Version: Office 2007

Hat funktioniert danke!
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: formel mit fixem zellenwert 4 toboll 181 01. Apr 2009, 10:50
EsSilber formel mit fixem zellenwert
Keine neuen Beiträge Excel Formeln: Format übertragen? 1 Gast 487 29. Dez 2008, 13:16
< Peter > Format übertragen?
Keine neuen Beiträge Excel Formeln: Zellwert abhängig von Format der Zelle 1 Gast 1088 24. Nov 2008, 13:25
licht Zellwert abhängig von Format der Zelle
Keine neuen Beiträge Excel Formeln: Frage zum Datum / Format 4 andri 295 17. Nov 2008, 14:24
silex1 Frage zum Datum / Format
Keine neuen Beiträge Excel Formeln: Wort in Matrix suchen und Zellenwert daneben ausgeben 1 nico25 2523 17. Jul 2008, 11:16
urs Wort in Matrix suchen und Zellenwert daneben ausgeben
Keine neuen Beiträge Excel Formeln: automatische Stücklistenumwandlung auf anderes Format 2 roithner 495 24. Jun 2008, 14:06
roithner automatische Stücklistenumwandlung auf anderes Format
Keine neuen Beiträge Excel Formeln: Autosumme nach Kriterium Format "€" ? 6 gefahr 1000 06. Mai 2008, 14:30
gefahr Autosumme nach Kriterium Format "€" ?
Keine neuen Beiträge Excel Formeln: x-ten Zellenwert übernehmen 4 Nuts 705 26. März 2008, 12:16
Detlef 42 x-ten Zellenwert übernehmen
Keine neuen Beiträge Excel Formeln: Format bei Datumseingabe 1 how1 489 06. Dez 2007, 18:13
HermannZ Format bei Datumseingabe
Keine neuen Beiträge Excel Formeln: Excel 2003: Datum im Format Mi 01, Di 02 usw. 4 Gast 606 24. Aug 2007, 17:10
Gast Excel 2003: Datum im Format Mi 01, Di 02 usw.
Keine neuen Beiträge Excel Formeln: Einbindung einer Grafik in abhängigkeit von Zellenwert 2 jodelpax 788 07. März 2007, 11:33
jodelpax Einbindung einer Grafik in abhängigkeit von Zellenwert
Keine neuen Beiträge Excel Formeln: Excel berechnet zeiterfassung Format 3 soso17 1604 25. Feb 2007, 14:50
soso17 Excel berechnet zeiterfassung Format
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: HTML Forum