der Titel gibt nicht viel her, aber ich konnte, dass was ich brauche so schlecht zusammenfassen: Also
mit dem commonDialog öffne ich eine andere Excel-Datei, um dort Informationen auszulesen. Die Zellen mit den Informationen, die ich brauche, haben alle Namen.
Zu erst die gute Nachricht: Mit dem Dialog kann ich wirklich die Datei öffnen.
On Error Resume Next
With CmDialog1
.CancelError = True
' Filter setzen - hier wird festgelegt, mit welchem Format eine Datei geöffnet wird
.Filter = "Exceldateien (*.xls)|*.xls" 'nur Excel-Dateien auflisten zu lassen
'Pfad angeben
.InitDir = "C:\Beck\"
' Dialogfeld Öffnen anzeigen
.ShowOpen
If .Filename "" Then
x.Workbooks.Open .Filename
x.Visible = True
End If
End With
Nun die schlechte und damit meine Frage: Aber an die Daten komme ich nicht ran, was mache ich falsch?
'Jetzt ist die zu verarbeitende Datei geöffnet und muss in die Gesamtauswertung eingelesen werden
ActiveWorkbook.Sheets("Gesamt").Select
Application.Goto Reference:="SAB"
SAB = ActiveCell
Danke schon mal im vorraus, Tanja