Excel 2010 Makro Ausgabe in bestimmter Tabelle ausgeben

Hallo miteinander.

Ich habe im VBA von Excel 2010 ein eigenes Modul erstellt, in dem der Kode drinsteht, um eine Fileliste aus einem Ordner zu erstellen.
Damit dieses bei jedem Start automatisch ausgeführt wird, musste ich im VBA im Objekt DieseArbeitsmappe folgenden Code einführen.
(Siehe beigefügtem Bild)

Das funktioniert nun auch.

Mein Problem ist nun das die Fileliste immer im aktuellen Arbeitsblatt erstellt wird das gerade beim starten geöffnet ist.

Ich möchte aber das die Fileliste immer im 2. Arbeitsblatt erstellt wird.
Kann ich da etwas im Code abändern ?
Wäre froh um etwas Hilfe.

Please also mark the comments that contributed to the solution of the article

Content-Key: 338993

Url: https://administrator.de/contentid/338993

Printed on: April 25, 2024 at 04:04 o'clock

6 Comments

Latest comment

Moin,

um deine Frage konkret beantworten zu können, müsstest du den Code hier posten.

Gruß

Ich möchte aber das die Fileliste immer im 2. Arbeitsblatt erstellt wird.

In deinem FIleList-Makro statt ActiveSheet den Index des Sheets oder den Namen verwenden/referenzieren.

Sheets(2)

oder

Sheets("Tabelle2")

Grüße Uwe

Hallo
Danke für den Tip.

Leider komme ich nicht weiter.
Der Befehl ActiveSheet wird im Code icht verwendet.

Hier mal den Code:

Sub Filelist()

    Dim fs As Object
    Dim fVerz As Object
    Dim fDatei As Object
    Dim fdateien As Object
    Dim strDat As String
    Dim Zeile As Integer
    
    Set fs = CreateObject("scripting.FileSystemObject")  
    Set fVerz = fs.getFolder("D:\Test\")  
    Set fdateien = fVerz.Files
    
    For Each fDatei In fdateien
        If InStr(fDatei, "") > 0 Then  
            Zeile = Zeile + 1
            Cells(Zeile, 1) = fDatei.Name
        End If
    Next fDatei

End Sub