Ich habe folgendes Problem: Ich muss aus einer Access-Datenbank Artikeldaten zur Weiterverarbeitung in ein Excel-Tool importieren und möchte die importierten Daten zur Beschränkung des Datenvolumens über die Kundennummer filtern lassen.
Das Excel Sheet hat dazu neben vielen anderen Kartenreitern einen Planungskartenreiter (nenne wir ihn "Start") und einen als Warehouse genutzten Kartenreiter (nennen wir ihn "Daten"). Auf dem Kartenreiter "Start" befinden sich die Auftragsbezogenen Stammdaten von denen die Kundennummer dazu dienen soll die kundenindividuellen Artikelsätze gefiltert auf den Kartenreiter "Daten" zu importieren.
Um den Import zu starten habe ich eine Schaltffläche angelegt, der ich ein Makro hinterlegen möchte. Mangels VBA-Kenntnissen habe ich dieses über den Makro-Recorder generiert: Es beinhaltet unter anderem folgende Zeile:
"FROM ExportExcel_ETeile_Eigfert_Kundenpreise ExportExcel_ETeile_Eigfert_Kundenpreise" & Chr(13) & "" & Chr(10) & "WHERE (ExportExcel_ETeile_Eigfert_Kundenpreise.Kundennummer=100011)"
Die Kundennummer 100011 resultiert daher, dass ich im Makrorecorder nur zwischen den vorhandenen Kundennummern auswählen konnte.
Was ich benötige ist ein Code, mit dem ich statt einer fest hinterlegten Kundennummer eine Referenz auf eine bestimmte Zelle (z.B. "C1") auf dem Kartenreiter "Start" legen kann.
Ich habe schon ein wenig rumprobiert, in dem ich
Dim KdNr As Range
Set KdNr = Range("C1")
vorangestellt habe und dann die Kundennummer 100011 einfach durch KdNr ersetzt habe. Das funktioniert aber leider nicht so einfach.
Ich bin für jede Anregung dankbar.
Gruss, Ulrich