Thema Datum  Von Nutzer Rating
Antwort
Rot Filter setzen nach Import von csv workbook
15.12.2015 17:19:04 Baggio
NotSolved
15.12.2015 18:03:44 Gast86194
*
Solved
15.12.2015 18:35:57 Baggio
Solved

Ansicht des Beitrags:
Von:
Baggio
Datum:
15.12.2015 17:19:04
Views:
1060
Rating: Antwort:
  Ja
Thema:
Filter setzen nach Import von csv workbook

Hallo zusammen,

ich versuche nach importieren eine csv-Workbook in excel per macro filter zu dieser die als jetz activeworkbook ist zu setzen um die enthaltene daten zu filtern.

Irgenwie klappt es nicht wegen wahrscheindlich flasches Befehls (Letzter Befehl).

Bitte mir helfen wenn Ihr Idee haben. Ich neuerling bei BVA.

Sub ImportFiltering()

Dim customerBook As Workbook
Dim customerFilename As String
Dim customerWorkbook As Workbook
Dim targetWorkbook As Workbook
Dim Liste As Range
Dim User As String

' make weak assumption that active workbook is the target
Set targetWorkbook = Application.ActiveWorkbook

customerFilename = Application.GetOpenFilename("CSV-Dateien (*.csv),*.csv,Alle Dateien (*.*),*.*")
Workbooks.OpenText customerFilename, Local:=True
Set customerWorkbook = Application.ActiveWorkbook
User = InputBox("Enter the value for filtering")
customerWorbook.Range("$D$4:$AX$32").AutoFilter Field:=1, Criteria1:=User


End Sub

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Filter setzen nach Import von csv workbook
15.12.2015 17:19:04 Baggio
NotSolved
15.12.2015 18:03:44 Gast86194
*
Solved
15.12.2015 18:35:57 Baggio
Solved