✔ [B]Zahlenwert richtig erkennen[/B]

[Seven Eleven]

Hi,

ich habe auf meinem PC Excel 97, mein Cheff hat Office 2000. Jetzt habe ich einen Code geschrieben, in dem er Werte aus einer Tabelle in eine andere kopiert. Dabei soll der richtige Zahlenwert erkannt werden.

Dim monat2 as string
Dim zelle as range    
....

Windows("Kennzahlensystem Aktuell.xls").Activate
    Sheets("Daten").Select
    range(monat2 & "14:" & monat2 & "17").Select
    For Each zelle In Selection
        SendKeys "{F2}", True       'Zahlenwert richtig erkennen
        SendKeys "{ENTER}", True
    Next zelle

Dieser Code funktioniert in Excel 200 nicht. Er überträgt zwar die Daten, erkennt aber nicht deren Wert. Ist es vielleicht eine andere Taste die gewählt werden muss oder gibt es dafür vielleicht einen anderen Code? Is ganz dringend!

DANKE

Seven Eleven

 

[Orakel]

Hi,

wo steht denn Dein Cursor, wenn Dein Makro die F2-Taste drückt? Garantiert nicht auf der Zelle, in der die Funktion ausgeführt werden soll.

Also die Zellen auch aktivieren. Du verlierst dann allerdings die Selektion Deines gesetzten Ranges. Also auch noch daran denken die Zellen in einem anderen Schleifenkonstrukt zu ermitteln.

Gruß
Das Orakel

 

[Seven Eleven]

Danke, aber das heißt? Bin nicht so fit in VBA.

Hab die Zellen vorher allesamt schon kopiert, d.h. die selection kann schon mal nicht mehr verloren gehen...

Gruß