title image


Smiley Nun ja...
ich kenne ja weder deine Abfragen noch weiss ich, was da überhaupt geschehen soll (meist stimmt schon etwas mit dem Konzept nicht, wenn man 30 verschiedene Abfragen gebastelt hat - die vermutlich alle mehr oder minder das gleiche tun - aber auch das kann ich ja nur mutmaßen) ...



Wenn die Abfragen z.B. "Abfrage1" bis "Abfrage30" heissen geht das in etwa so:



Dim P as String, F as String, I as Long

P = Currentproject.path

P = Left(P,Instrrev(P,"\"))

For I = 1 to 30

F= "Abfrage" & I

docmd.TransferSpreadsheet acExport,acSpreadsheetTypeExcel9,F, P & F,True

Next I



... und deine Hilfe sollte eigentlich auf Deutsch sein ....


Gruß aus dem Norden
Reinhard


Bitte immer die Access-Version angeben!
DB-Wiki


Wie man Fragen richtig stellt

YaccessAccess-FAQUnd ansonsten: Wikipedia




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: