Thema Datum  Von Nutzer Rating
Antwort
Rot Zellüberprüfung neben ActiveCell
 29.04.2020 10:44:22 QT91
NotSolved
29.04.2020 10:58:51 Gast40073
NotSolved

Ansicht des Beitrags:
Von:
QT91		 Datum:
29.04.2020 10:44:22		 Views:
1116		 Rating:
     
Antwort:
  Ja
Thema:
Zellüberprüfung neben ActiveCell

Servus zusammen,

ich möchte über einen Button eine Uhrzeit in eine Spalte Schreiben, funktioniert soweit,
danach soll er eine Spalte nach rechts schauen, schauen ob die Zelle leer ist und wenn ja mit 0 beschreiben.
Dasselbe mit der nächsten Zelle:

Sub Ende()

Columns("B:B").Select
Selection.Find(What:="").Activate
ActiveCell.FormulaR1C1 = Format(Now, "YYYY-MM-DD hh:mm:ss")
ActiveCell.Offset(0, 1).Select
Selction.Activate
    If ActiveCell.IsEmpty Then
    ActiveCell.Value = 0
    End If

ActiveCell.Offset(0, 1).Select
Selction.Activate
    If ActiveCell.IsEmpty Then
    ActiveCell.Value = 0
    End If
    

End Sub


Es gibt mir den Fehler zurück  "Objekt erforderlich"

Kann mir da jemand weiterhelfen?

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Zellüberprüfung neben ActiveCell
 29.04.2020 10:44:22 QT91
NotSolved
29.04.2020 10:58:51 Gast40073
NotSolved