wie stelle ich es an, dass ein Makro nur auf eine Zelle in einem Tabellenblatt (z.B. A1 Tabelle1) und schon gar nicht auf andere geöffnete Excel-Dateien auch auf A1 Tabelle1 zugreift.
Besten Dank für Antworten!
Sub Test()
With Workbooks("Test.xls").Worksheets("Tabelle1")
.Range("A1").Value = "Test"
End With
End Sub
Sub Test()
Workbooks("Test.xls").Worksheets("Tabelle1").Range("A1").Value = "Test"
End Sub
Sub Test()
With Workbooks("Test.xls").Worksheets("Tabelle1")
.Range("A1").Value = "Test"
End With
End Sub
Sub Test()
Workbooks("Test.xls").Worksheets("Tabelle1").Range("A1").Value = "Test"
End Sub
Sub test()
Range("A1").Value = "test"
End Sub
Sub Updateclock()
NextTime = Now + TimeValue("00:00:10") 'alle 10 Sekunden
[A1] = Time
Application.OnTime NextTime, "Updateclock"
End Sub
Sub StopClock()
On Error Resume Next
Application.OnTime earliesttime:=NextTime, Procedure:="UpdateClock", Schedule:=False
On Error GoTo 0
Application.StatusBar = False
End Sub
Sub Updateclock()
NextTime = Now + TimeValue("00:00:10") 'alle 10 Sekunden
ThisWorkbook.Worksheets("Tabelle1").Range("A1") = Time
Application.OnTime NextTime, "Updateclock"
End Sub