title image


Smiley Ach Gott - schon wieder Programmiernachhilfe ;=)
Na, etwa so (ob eine Spalte ausgeblendet ist, steht im Array "Ausgeblendet" - das musst du halt aus deiner Tabelle [wozu überhaupt eine Tabelle!?! Na, egal...] einlesen):



Const KMax = 15

Dim Ausgeblendet(KMax) as Boolean, I as long, Z as Long, S as long

Do until RS.EOF

S = 0: Z = Z+1

For I = 0 to KMax

If Not Ausgeblendet(I) then

S = S+1

excelObj.Cells(Z,S) = RS(I)

end if

Next I

RS.movenext

Loop







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: