Office: Makro "schluckt" beim kopieren Zellinhalte

Erstmal ein großes Hallo an alle die hier unterwegs sind.

Ich habe ein Problem ... wer hätte es gedacht ;-)


Ich schreibe grade ein Makro, wo das kopieren der Daten von einem Tabellenblatt in ein anderes nicht richtig funktioniert. Und zwar passiert folgendes:

In einem Tabellenblatt habe ich meine Daten stehen.
Für die erste Zeile wird ein Autofilter gesetzt und dann in C3 auch nach einem Wert gefiltert.
Die nun gefilterte Tabelle wird in das Tabellenblatt2 kopiert.

Geschieht das ganze von Hand ist es kein Problem, das Makro jedoch "schluckt" die Werte und ich habe im Tabellenblatt2 nur noch die erste Zeile mit den Filtern stehen.


Das Tabellenblatt ist von A1:I125 gefüllt. Probiere ich das ganze jedoch nur mit einer simplen Tabelle der Größe A1:B4 funktioniert das Makro interessanterweise problemlos :?:


Kenne mich mit der Materie auch nicht so aus ;-) Könnt ihr mir helfen?

Gruß
Frederic

 

Hallo!

Magst du deinen Code mal posten?
Sonst können wir nur raten...

 

jo, hätte ich auch direkt machen können ;-)

da ist er:

Code:

Sub Makro1()
'
' Makro1 Makro
' Makro am 18.08.2008 aufgezeichnet
'

'
    Rows("1:1").Select
    Selection.AutoFilter
    Selection.AutoFilter Field:=3, Criteria1:="0,00"
    Cells.Select
    Selection.Copy
    Sheets("Tabelle2").Select
    Range("A1").Select
    ActiveSheet.Paste
End Sub

 

Hallo!

Teste mal diesen Code:

Code:

Sub Test()
With Sheets("Tabelle1")   'hier anpassen!
  If Not .AutoFilterMode = True Then
    .Range("A1").AutoFilter
    .Range("A1").AutoFilter Field:=3, Criteria1:="0,00"
    .Range("A1").CurrentRegion.Copy Sheets("Tabelle2").Range("A1")
  End If
End With
End Sub

Läuft der besser?

 

nein

nachdem das makro durchgelaufen ist muss ich in tabellenblatt1 den filter nochmal setzen und die daten zu sehen (da keine angezeigt werden) und im tabellenblatt2 befindet sich nach wie vor die erste zeile.

aber schonmal danke für die schnelle antwort :)

 

Hallo!

Dann stimmt offensichtlich mit deinem Filterkriterium etwas nicht:
Wenn keine Daten angezeigt werden, dann wurden auch keine gefunden und entsprechend werden auch keine kopiert.

 

doch doch, das ist schon gegeben ;-)

siehe bilder

auch wenn ich ein anderes Filterkriterium angebe, habe ich dasselbe Problem.

 

Hallo!

Ändert sich etwas, wenn du bei Criteria1 das Komma durch einen Punkt ersetzt?
Oder nur "0" angibst?

 

Der Punkt wars :)

Einfach Komm durch Punkt ersetzen und es läuft.
Allerdings einfach nur eine "0" einzusetzen ruft dieselben Fehler hervor wie mit Komma.


Danke dir!