Ich versuche mich grade an einem synchronisierungsmakro. Dazu ein paar fragen.
In diesem Fall synchronisiere ich das sheet "test" mit dem sheet "seitenspiegel"
If Worksheets("test").Cells(i, 4) kleiner als Worksheets("Seitenspiegel").Cells(i, 4) ... 'dieses forum mag keine kleiner-als zeichen ;)
(in spalte 4 liegt der datumstempel)
1.) wie kann ich die wiederkehrenden elemente so definieren, das ich sie nicht immer neu schreiben muss.
ich habs mal ins blaue versucht mit
Dim A as range
Dim B as range
A= Worksheets.("test")
B= Worksheets.("seitenspiegel")
If A.Cells(i, 4) kleiner als B.Cells(i, 4) 'dieses forum mag keine kleiner-als zeichen ;)
aber das klappt nicht....
2.) wenn es mit tabellenblätern gut funktioniert, möchte ich es B ummodeln zu einer synchronisation mit einer anderen Arbeitsmappe.
also
A= ActiveWorksheet
B= Worksheetxyz in xyz.xlsm
3.) kann man Daten überhaupt in eine ungeöffnete excel-datei schreiben?
besten dank im voraus,
tobias