Habe ein Makro der mir den Courser in die nächste freie Zeile setzt jedoch schreibt er meine Daten nicht an die Courser stelle, sondern setzt die werte an die erste Zelle !
Sub freieZelle()
Dim s as string
Dim i as long
with activeshett
i=0
Do
i+1
s = cells(i,"A")
if Len(s)= o then
cells (i,"A").activate
Exit do
End if
Loop while i <65535
end with
End Sub
Die Werte die ich an Excel übergebe sind Zahlen (+/-)!
Ich sage einem externen Programm das er die daten an Excel Zeile 1 Spalte 1-4 Übertragen soll(Übertragung per DDE-Kanal das klappt auch )
nun soll aber bei einem neuen Wert diese Zeile nicht überschrieben sondern an die nächste freie Zeile geschrieben werden daher hatte ich den o.g. Makro aufgeführt ! Der setzt mir den Courser zwar an die freie Zeile aber die Werte werden trotzdem an ihre alte stelle geschrieben !
Hoffe ihr könnt mir helfen !!
Gruß
Hicki