Daten kopieren/einfügen mit VBA

Bild

Betrifft: Daten kopieren/einfügen mit VBA
von: Demian
Geschrieben am: 07.04.2005 11:32:31
Hi,
folgendes Problem treibt mich um: Bei folgender Prozedur bekomme ich in der 7. Zeile "ActiveSheet.Paste" die Fehlermeldung "Bereich Kopieren und Einfügen haben unterschiedliche Formen und Größen".


Sub Auswertung()
    Cells.Select
    Selection.Clear
    Sheets("12_04").Select
    ActiveSheet.UsedRange.Select
    Selection.Copy
    Sheets("Ausw 12_04").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
    Selection.AutoFilter
End Sub

Was mache ich falsch? Jemand eine Idee? Vielen Dank im Voraus!
Gruß, Demian
Bild

Betrifft: AW: Daten kopieren/einfügen mit VBA
von: Tobias Marx
Geschrieben am: 07.04.2005 11:39:46
Servus!
Ich kann jetzt bei mir keinen Fehler feststellen, kannst du nicht mal eine Beispielmappe hochladen?
Gruss

Tobias
Bild

Betrifft: AW: Daten kopieren/einfügen mit VBA
von: ANdreas
Geschrieben am: 07.04.2005 11:42:12
Hallo Demian,
versuchs mal besser so:

Sub Auswertung()
    With Worksheets("Ausw 12_04")
        .Cells.Clear
        Worksheets("12_04").UsedRange.Copy _
            Destination:=.Range("A1")
            
        Application.CutCopyMode = False
        .UsedRange.AutoFilter
    End With
End Sub

Hoffe das hilft weiter,
Andreas
Bild

Betrifft: AW: Daten kopieren/einfügen mit VBA
von: Demian
Geschrieben am: 07.04.2005 12:34:46
Hi,
funktioniert mit der neuen Formel. Danke Euch!
Gruß, Demian
 Bild

Beiträge aus den Excel-Beispielen zum Thema "Import nach unten"