diff --git a/SDL/Fakturierung/usrCntlFaktAbrechnung.vb b/SDL/Fakturierung/usrCntlFaktAbrechnung.vb
index af9a804e..fc4b2c0f 100644
--- a/SDL/Fakturierung/usrCntlFaktAbrechnung.vb
+++ b/SDL/Fakturierung/usrCntlFaktAbrechnung.vb
@@ -1444,7 +1444,7 @@ Public Class usrCntlFaktAbrechnung
                 POS.Anzahl = If(r.Cells("Anzahl").Value Is DBNull.Value, 0, r.Cells("Anzahl").Value)
 
                 '-----------------------MWST-Abrechnung! +  Kompat. zu FM-Zoll
-                If FIRMA.Firma_ID = 19 Then
+                If FIRMA IsNot Nothing AndAlso FIRMA.Firma_ID = 19 Then
                     Dim isRC As Boolean = If(r.Cells("ReverseCharge").Value IsNot DBNull.Value, r.Cells("ReverseCharge").Value, False)
                     setMWSTABRfromSPEDinPOS(r, POS, landNr, landBez, antrag)
                 End If
@@ -4464,7 +4464,7 @@ Nächste_Textzeile_lesen:
 
         Dim landbez As String = ""
         If SPEDBUCH Is Nothing Then Return landbez
-        If SPEDBUCH.FilialenNr = 4817 AndAlso SPEDBUCH.AbfertigungsNr > 0 And FIRMA.Firma_ID = 19 Then
+        If SPEDBUCH.FilialenNr = 4817 AndAlso SPEDBUCH.AbfertigungsNr > 0 AndAlso FIRMA IsNot Nothing AndAlso FIRMA.Firma_ID = 19 Then
 
 
             Dim antragsID As Integer = CInt(SQL.getValueTxtBySql("SELECT UStVAn_ID FROM tblUStVAntrag WHERE FilialenNr = " & SPEDBUCH.FilialenNr & " AND AbfertigungsNr = " & SPEDBUCH.AbfertigungsNr, "FMZOLL",,, "-1"))