Supportnet / Forum / Tabellenkalkulation
Wie arbeite ich mit dem Makro???
Frage
Hallo
Ich habe noch nie mit Makro gearbeitet. Könnte Ihr mir Helfen?
Wie funktioniert das mit dem Makro??
Schon mal Danke
Dani
Antwort 1 von coros
Hallo Dani,
so richtig verstehe ich die Frage nicht. Mit einem Makro arbeitet man, wenn eine immer wiederkehrende Prozedur in einer Arbeitsmappe durchgeführt werden soll, die sich mit Formeln nicht mehr oder nur schwer erreichen läßt.
Alles weitere kann man besser erklären, wenn Du ein konkretes Projekt hast, und man Dir dabei helfen kann.
Weitere Infos findest Du u.a. z.B. bei Herbers Excel Forum oder bei vbfun oder auch auf meiner Homepage.
Bei Fragen melde Dich.
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
so richtig verstehe ich die Frage nicht. Mit einem Makro arbeitet man, wenn eine immer wiederkehrende Prozedur in einer Arbeitsmappe durchgeführt werden soll, die sich mit Formeln nicht mehr oder nur schwer erreichen läßt.
Alles weitere kann man besser erklären, wenn Du ein konkretes Projekt hast, und man Dir dabei helfen kann.
Weitere Infos findest Du u.a. z.B. bei Herbers Excel Forum oder bei vbfun oder auch auf meiner Homepage.
Bei Fragen melde Dich.
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
Antwort 2 von dani26
Hallo Oliver,
Ich würde gerne eine Tabelle erstellen in der sich die Uhrzeit automatisch in der Zeile /Zelle einfügt, wenn ich in der anderen schrieben habe.
Spalte1 / Spalte2/ Spalte3 / Spalte4
1 Uhrzeit leer schreiben
Hast du ungefähr verstanden was ich meine??
Schon mal danke für deine Bemühung mir zu helfen.
MFG
Dani
Ich würde gerne eine Tabelle erstellen in der sich die Uhrzeit automatisch in der Zeile /Zelle einfügt, wenn ich in der anderen schrieben habe.
Spalte1 / Spalte2/ Spalte3 / Spalte4
1 Uhrzeit leer schreiben
Hast du ungefähr verstanden was ich meine??
Schon mal danke für deine Bemühung mir zu helfen.
MFG
Dani
Antwort 3 von fedjo
Hallo Dani,
ich mal eine Mustertabelle erstellt.
Gruß
fedjo
http://rapidshare.com/files/132530322/Zeit.xls.html
ich mal eine Mustertabelle erstellt.
Gruß
fedjo
http://rapidshare.com/files/132530322/Zeit.xls.html
Antwort 4 von dani26
Hallo fedio,
So sollte es sein.
Nur
Spalte 1 / NR.
Spalte 2 / die Uhrzeit
Spalte 3 / leer
Spalte 4 / schreiben
Könntest du mir erklären wie du das gemacht hast!
Ein problem habe ich da noch ,wenn das über Makro geht weiß ich nicht wie mann das einfügt.
Danke schon mal!
Gruß Dani
So sollte es sein.
Nur
Spalte 1 / NR.
Spalte 2 / die Uhrzeit
Spalte 3 / leer
Spalte 4 / schreiben
Könntest du mir erklären wie du das gemacht hast!
Ein problem habe ich da noch ,wenn das über Makro geht weiß ich nicht wie mann das einfügt.
Danke schon mal!
Gruß Dani
Antwort 5 von fedjo
Hallo Dani,
also wenn ich deine Angaben richtig verstehe, dann soll nur in die Spalte B die Uhrzeit eingefügt werden.
Bei welcher Änderung in der Spalte A oder D soll die Uhrzeit eingefügt werden?
Ja es ist ein Makro.
Mit den Tasten "Alt, F11" Basic Editor aufrufen,
unter "DieseArbeitsmappe" in die Tabelle den Code einfügen wo die Uhrzeit eingetragen werden soll.
http://rapidshare.com/files/132791768/Zeit.xls.html
Gruß
fedjo
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
' wird im definierten Bereich ein Wert geändert, wird in der nächsten Spalte das Datum eingetragen
Dim RaBereich As Range, RaZelle As Range
' Bereich der Wirksamkeit
Set RaBereich = Range("A1:A65000")
Application.EnableEvents = False
For Each RaZelle In Range(Target.Address)
If Not Intersect(RaZelle, RaBereich) Is Nothing Then RaZelle.Offset(0, 1) = Time
Next RaZelle
Application.EnableEvents = True
Set RaBereich = Nothing
End Sub
also wenn ich deine Angaben richtig verstehe, dann soll nur in die Spalte B die Uhrzeit eingefügt werden.
Bei welcher Änderung in der Spalte A oder D soll die Uhrzeit eingefügt werden?
Ja es ist ein Makro.
Mit den Tasten "Alt, F11" Basic Editor aufrufen,
unter "DieseArbeitsmappe" in die Tabelle den Code einfügen wo die Uhrzeit eingetragen werden soll.
http://rapidshare.com/files/132791768/Zeit.xls.html
Gruß
fedjo
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
' wird im definierten Bereich ein Wert geändert, wird in der nächsten Spalte das Datum eingetragen
Dim RaBereich As Range, RaZelle As Range
' Bereich der Wirksamkeit
Set RaBereich = Range("A1:A65000")
Application.EnableEvents = False
For Each RaZelle In Range(Target.Address)
If Not Intersect(RaZelle, RaBereich) Is Nothing Then RaZelle.Offset(0, 1) = Time
Next RaZelle
Application.EnableEvents = True
Set RaBereich = Nothing
End Sub
Antwort 6 von dani26
Hallo fedjo
Erst mal Danke!
Wenn in Spalte D geschrieben wird soll die Zeit eingefügt werden!
Ich muß aber dazu sagen ich weiß nich wie dann das Makro geschrieben wird.
Mit Makro habe ich nie etwas zu tun gehabt.
Gruß Dani
Erst mal Danke!
Wenn in Spalte D geschrieben wird soll die Zeit eingefügt werden!
Ich muß aber dazu sagen ich weiß nich wie dann das Makro geschrieben wird.
Mit Makro habe ich nie etwas zu tun gehabt.
Gruß Dani
Antwort 7 von fedjo
Hallo Dani,
haben den Code geändert.
Mit den Tasten "Alt, F11" Basic Editor aufrufen,
unter "DieseArbeitsmappe" in die Tabelle den Code einfügen wo die Uhrzeit eingetragen werden soll.
Gruß
fedjo
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
' wird im definierten Bereich ein Wert geändert, wird in der nächsten Spalte das Datum eingetragen
Dim RaBereich As Range, RaZelle As Range
' Bereich der Wirksamkeit
Set RaBereich = Range("D1:D65000")
Application.EnableEvents = False
For Each RaZelle In Range(Target.Address)
If Not Intersect(RaZelle, RaBereich) Is Nothing Then RaZelle.Offset(0, -2) = Time
Next RaZelle
Application.EnableEvents = True
Set RaBereich = Nothing
End Sub
haben den Code geändert.
Mit den Tasten "Alt, F11" Basic Editor aufrufen,
unter "DieseArbeitsmappe" in die Tabelle den Code einfügen wo die Uhrzeit eingetragen werden soll.
Gruß
fedjo
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
' wird im definierten Bereich ein Wert geändert, wird in der nächsten Spalte das Datum eingetragen
Dim RaBereich As Range, RaZelle As Range
' Bereich der Wirksamkeit
Set RaBereich = Range("D1:D65000")
Application.EnableEvents = False
For Each RaZelle In Range(Target.Address)
If Not Intersect(RaZelle, RaBereich) Is Nothing Then RaZelle.Offset(0, -2) = Time
Next RaZelle
Application.EnableEvents = True
Set RaBereich = Nothing
End Sub
Antwort 8 von dani26
Hallo fedjo
Ich wollte nur noch mal Danke sagen!
Klappt richtig klasse!
Gruß Dani
Ich wollte nur noch mal Danke sagen!
Klappt richtig klasse!
Gruß Dani

