Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1020to1024
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
Inhaltsverzeichnis

sql-max-abfrage, accesszugriff auf xls-datei

sql-max-abfrage, accesszugriff auf xls-datei
08.11.2008 23:10:00
Guenneisen
Hallo liebe Forumler,
ich muss von access auf mehrere xls-dateien zugreifen...funktioniert soweit auch alles, nur bei der SQL-Max-Abfrage scheitert es...
anbei mal der Code...mit der SQL-Abfrage würde natürlich der erste Datensatz im Direktfenster ausgewiesen...
es soll aber in dem Fall der älteste Mitarbeiter sein, die Spalte heisst "Alter"...aber bei:
Select Max (Alter) from [Liste$]
meckert der Compiler...
hoffe, Ihr könnt mir helfen:

Public Sub Problem()
Dim Cnn As ADODB.Connection
Set Cnn = New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim sqlabfrage As String
With Cnn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "Data Source=E:\Ordner\Mitarbeiter.xls;" & _
"Extended Properties=""Excel 8.0;HDR:=YES;"";"
.Open
End With
With rs
.ActiveConnection = Cnn
.Source = "[Liste$]"
.CursorType = adOpenStatic
.LockType = adLockReadOnly
End With
sqlabfrage = "Select * from [Liste$]"
rs.Open sqlabfrage, Cnn, adOpenStatic, adLockReadOnly, adCmdText
Debug.Print rs!Vorname & vbTab & rs!Name & vbTab & rs!Alter & vbTab & rs!G
Cnn.Close
End Sub


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

Betreff
Datum
Anwender
Anzeige
AW: sql-max-abfrage, accesszugriff auf xls-datei
09.11.2008 09:13:31
Luschi
Hallo Gussfuss
erweitere die Abfrage und sortiere nach dem Feld 'Alter':
sqlabfrage = "Select * from [Liste$] Order By Alter DESC;"
Dann steht der DS mit dem äktesten Teilnehmer entsprechende Datensatz an 1. Stelle im Recordset.
Gruß von Luschi
aus klein-Paris
AW: sql-max-abfrage, accesszugriff auf xls-datei
11.11.2008 14:49:27
Guenneisen
super!
vielen Dank, Luschi (wobei der Name pures Understatement ist ;-) )
Gruss
Gussfuss
Anzeige

305 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige