MSG box

Via VBA?

yes, lige præcis.

Hvilken Excel version anvender du?

Version 2010.

Den simple version:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
    MsgBox "Husk at udfylde celle A1", vbOKOnly + vbInformation
End Sub

Koden skal lægges i ThisWorkbook

Hvis meddelelsen kun skal vises, hvis cellerne ikke er udfyldt kan du bruge

Private Sub Workbook_BeforePrint(Cancel As Boolean)
If IsEmpty(Range("a1")) Then
    MsgBox "Husk at udfylde celle A1", vbOKOnly + vbInformation
    Cancel = True
End If
End Sub

Er det flere celler, skal du selvfølgelig teste for dem allesammen.

Dit eksempel kunne fx hedde

Private Sub Workbook_BeforePrint(Cancel As Boolean)
  If IsEmpty(Range("a4")) Or IsEmpty(Range("a5")) Then
    MsgBox "Husk at udfylde celle A1", vbOKOnly + vbInformation
    Cancel = True
  End If
End Sub

Er
Workbook_BeforePrint()
en medfødt funktion ?

mvh finb

Ja, det er det. Den findes som valgmulighed, i kodearket til ThisWorkbook.

Tak JKRONS, det virker perfekt :)

Velbekomme.