Also ich schlage mich nun schon lange mit einem Problem herum und da ich es mit keinem Makro lösen konnte hab ich sogar angefangen mich mit VBA vertraut zu machen, also brauche Hilfe...
Ich habe eine Tabellenblatt in dem ich meine Mitarbeiter mit Namen und verschiedenen personen-bezogenen Daten erfasst habe( also etwas wie eine kleine Datenbank). Unter anderem habe ich eine Spalte die die Gültigkeit des Werksausweises beinhaltet. Nun möchte ich ein Macro in VBA einsetzen das mir beim Öffnen der Datei eine MsgBox ausgibt mit den Namen meiner Mitarbeiter denen in den nächsten 10Tagen der Ausweis seine Gültigkeit verliert. Ganz toll wäre es natürlich wenn da noch etwas neben dem namen blinken könnte oder ähnlich aber auch eine MsgBox mit der Liste der Namen wäre scho hilfreich.
Also Spalte C beinhaltet den Vornamen, D den Nachnamen und Spalte O das Datum bis wann der Ausweis gilt, ich habs hiermit probiert, bekomme aber nur einen Laufzeitfehler als Ergebnis:
Sub Schaltfläche20_BeiKlick()
Dim Bereich As Range
Dim cell As Range
Set Bereich = Sheets("BAZA_PODATAKA").Range("O3:O20")
For Each cell In Bereich
If cell.Value < Date + 10 Then
If cell.Value > Date Then
MsgBox cell.Offset(0, -11).Value & " " & cell.Offset(0, -12).Value & " " & cell.Value
End If
End If
Next
End Sub
Bitte liebe Fortgeschrittene und Profis, HILFE.....
Danke.
Drazen