Excel in Form

C

chaf

Grünschnabel
Hallo zusammen

Habe da eine /viele Fragen.

HAbe mir eine Dateiauswahl für XLS dateinen erschaffen die dann ausgedruckt werden. Funktioniert einwandfrei. - Veileicht ein wenig umständlich - geht bestimmt einfacher. ABER solange es funktioniert.


NUN möchte ich aber nicht die Tabelle ausdrucken sondern diese soll in einem Form dargestellt werden. Soll nicht geändert werden. Die XLS Datei soll nur offen bleiben um dann innerhalb eine Abfrage zu starten - wie z.B.wie oft ist der Begriff hallo vorhanden

Hat da einer eine Idee ? Vielleicht auch das ganze zu vereinfachen



Vielen dank für eure Hilfe schon einmal

DANKE

'Variable festlegen
Dim Drucke As Object
'Aswählen von verzeichnis und Dateinamen
Private Sub Dir_Change()
File.Path = Dir.Path
End Sub
Private Sub Drive_Change()
Dir.Path = Drive.Drive
End Sub
' Datei ausdrucken die gewählt wurde
Private Sub File_Click()
selectedfile = File.Path & "\" & File.FileName
Set Drucke = GetObject(File.Path & "\" & File.FileName)
Drucke.Worksheets(1).PrintOut
Dateiauswahl.Hide
Unload Dateiauswahl
End Sub
' Abbruch und zurück zum Hauptfenster
Private Sub abbruch_Click()
Dateiauswahl.Hide
Hauptfenster.Enabled = True
Unload Dateiauswahl
End Sub
 
Ich versteh nicht was du damit erreichen willst ?
Wenn du einen Filter benötigst brauch du in der Exceltabelle nur einen Autofilter einrichten über die Tabelle einzurichten. Da braucht man nix programmieren.
Wozu ist den die Darstellung in deinem Form nütze?
 
Was ich damit erreichen will.
Eigentlich ganz einfach

Ich öffne mir eine Excel Tabelle
Dann sehe ich anhand der angezeigten Tabelle die Zellen Zahl (von Excel vorgegeben)

Dann eingabe durch zwei Text Felder (Start Zeile / End Zeile)
Dann kommt eine Abfrage zwischen welcher Zeile (Start -ENDE) eine bestimmtes Wort oder Zahl vorhanden ist
Anzeigen der Menge des vorhandenen Wortes/Zahl
Schließen Excel Tabelle
 
Du öffnest die Exceldatei aus einem VB6 Programm und willst die Daten in einer Tabelle darstellen ?

Dafür würde sich entweder ein Datagrid anbieten, welches per ADO Abfrage auf die Exceltabelle angehängt wurde. Oder du füllst ein Listview in der Detailansicht, das MS Flexgrid oder irgendeinanderes Grid.
 
Nein hab ich jetzt leider nicht zur Hand.
Aber es setzt sich aus mehren Problemen zusammen.

1) Excel per ADO ansprechen/öffnen
2) Listview füllen

zu den Teilproblemen solltest du einfach mal googeln. Bei ActivVB gibt glaub genügen Beispiele.

Die Teilproblem brauchst du nur zu kombinieren.
 
Um antworten zu können musst du eingeloggt sein.

Neue Beiträge

Zurück