2016-11-02 5 views
0

Also ich bin ein paar Daten in ein Blatt importieren und dann möchte ich es in eine Tabelle machen. Ich weiß nicht, wie viele Datenzeilen es geben wird. Dieser Code hat vor ein paar Tagen korrekt funktioniert, aber ich vermute, dass ich etwas unbeabsichtigt geändert habe. Hier ist der Code: „Die Arbeitsblatt-Daten für eine Tabelle muss auf dem gleichen Blatt wie der Tabelle sein“Fehler beim Erstellen der Tabelle in VBA Excel

Sheets("Enrollment Data Aggregate").ListObjects.Add(xlSrcRange, Range([A1].End(xlDown), "$n$1"), , xlYes).Name = "EDA_Table" 

Ich erhalte eine Fehlermeldung, die besagt, Soweit ich weiß, mache ich die Tabelle auf der gleichen Seite wie die Daten. Irgendwelche Vorschläge?

+0

Gerade eine freundliche Spitze, können Sie diese Seite lesen über wollen: [The How-To-Frage Guide] (https://stackoverflow.com/help/how-to-ask), so kann man immer Stellen Sie sicher, dass Ihre Fragen leicht zu beantworten und so klar wie möglich sind. Stellen Sie sicher, dass Sie alle Anstrengungen unternommen haben, die Sie unternommen haben, um das Problem zu beheben, das Sie haben, und was passiert ist, als Sie diese Korrekturen versuchten. Vergessen Sie auch nicht Ihren Showcode und eventuelle Fehlermeldungen! –

Antwort

1

Versuchen Sie dies. Sie müssen ein Bereichsobjekt deklariert haben, damit Sie auf seine Eigenschaften zugreifen können.

Dim wks As Worksheet 
Set wks = ThisWorkbook.Sheets("Enrollment Data Aggregate") 
Dim rng As Range 
Set rng = wks.Range([A1].End(xlDown), "$n$1") 
wks.ListObjects.Add(xlSrcRange, rng, , xlYes).Name = "EDA_Table" 
+0

So, jetzt gibt es mir einen Fehler und markiert die vierte Zeile. Es heißt "Methode 'Range' des Objekts '_Worksheet' ist fehlgeschlagen". – Lui

+0

Sind Sie sicher, dass Sie sich die neueste Ausgabe ansehen? Aktualisieren Sie die Seite und versuchen Sie es erneut :-) – Niclas

+0

Alles funktioniert! Vielen Dank! Ich schaute auch und fand heraus, dass ich eine benannte Reihe hatte, die Dinge vermasselt haben könnte. Ich bin mir nicht sicher, aber ich brauchte es nicht, also habe ich es gelöscht. Ich habe das Makro erneut ausgeführt und alles hat funktioniert. Vielen Dank! Und aus irgendeinem Grund kann ich deine Antwort nicht als akzeptiert markieren. Eine Box zeigt an, dass ein Fehler aufgetreten ist. Ich denke, es hat etwas mit Reputationspunkten zu tun? – Lui