ich lasse über VBA Zellen prüfen ob diese leer sind. In einer MsgBox werden dann die leeren Zellen angezeigt ($A$1 usw.)
Ich möchte aber das in der MsgBox die Bezeichnung steht (Datum).
Ist das überhaupt möglich?
Danke.
MsgBox Range("D6").Name.Name
Dim chkRange As Range, myC As Range
Dim msg As String
Set chkRange = Sheets("Abnahme").Range("A6,A8,A10,a12,d10,B6,g5,e260")
msg = ""
For Each myC In chkRange
If IsEmpty(myC) Then
msg = msg & myC.Address & vbCrLf
End If
Next
If msg = "" Then
Else
MsgBox "Folgende Zellen sind leer:" & Chr(13) & vbCrLf & msg, vbInformation + vbOKOnly, "Prü _
fergebnis"
Exit Sub
End If
Hier ist mal der VBA.