Thema Datum  Von Nutzer Rating
Antwort
16.02.2022 15:41:58 Milena
Solved
17.02.2022 07:26:16 Milena
NotSolved
Rot VBA Datum schreiben Wenn Wert in der Zelle Else....
17.02.2022 10:47:54 Gast68363
Solved
17.02.2022 14:01:03 Milena
Solved

Ansicht des Beitrags:
Von:
Gast68363
Datum:
17.02.2022 10:47:54
Views:
438
Rating: Antwort:
 Nein
Thema:
VBA Datum schreiben Wenn Wert in der Zelle Else....

Naja, es gibt mehrere Möglichkeiten das zu lösen; alle sind aber straight forward.

Option Explicit

Public Sub Test()
  
  Dim rngLiefertermin As Excel.Range
  Dim i As Long
  Dim j As Long
  
  With Worksheets("Tabelle1")
    For i = 178 To 180
      Set rngLiefertermin = Nothing
      For j = 7 To 1 Step -1
        If IsDate(.Cells(i, j).Value) Then
          Set rngLiefertermin = .Cells(i, j)
          Exit For
        End If
      Next
      If Not rngLiefertermin Is Nothing Then
        .Cells(i, 34).Value = rngLiefertermin.Value
      Else
        'kein Datum in der Zeile gefunden
      End If
    Next
  End With
  
End Sub

 


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
16.02.2022 15:41:58 Milena
Solved
17.02.2022 07:26:16 Milena
NotSolved
Rot VBA Datum schreiben Wenn Wert in der Zelle Else....
17.02.2022 10:47:54 Gast68363
Solved
17.02.2022 14:01:03 Milena
Solved