Ich bräuchte Hilfe

Q

quisquam

Hallo Leute,

ich bin neu hier und habe normalerweise nix mit VBA am Hut deshalb auch meine Frage.

Ich versuche eine Datei auszuwählen-> diese soll dann geöffnet und in Tabelle2 abgelegt werden-> dann soll überprüft werden wieviele Zeilen diese datei hat.. also von 1-n durchlaufen...

alles was ich bisher habe ist.....ich hoffe ihr könnt mirevtl weiter helfen

Private Sub Updaebutton_Click()

ChDrive "I:\QS\scorecards\Problemliste GJ 2006"

Dateiname = Application.GetOpenFilename _
("Micrsoft Excel-Dateien (*.xls),*.xls")
If Dateiname = False Then Exit Sub
MsgBox "Ihre Auswahl:" & vbNewLine & Dateiname

End Sub

Danke im Vorraus:)
 
Zurück