diff --git a/fhem/FHEM/WMBus.pm b/fhem/FHEM/WMBus.pm
index 891e7902a..0aa0e98c7 100644
--- a/fhem/FHEM/WMBus.pm
+++ b/fhem/FHEM/WMBus.pm
@@ -1443,13 +1443,20 @@ sub decodePayload($$) {
 sub decrypt($) {
   my $self = shift;
   my $encrypted = shift;
+  my $padding = 2;
   
   # see 4.2.5.3, page 26      
   my $initVector = substr($self->{msg},2,8);
   for (1..8) {
     $initVector .= pack('C',$self->{access_no});
   }
-  my $cipher = Crypt::Mode::CBC->new('AES', 2);
+  if (length($encrypted)%16 == 0) {
+    # no padding if data length is multiple of blocksize
+    $padding = 0;
+  } else {
+    $padding = 2;
+  }
+  my $cipher = Crypt::Mode::CBC->new('AES', $padding);
   return $cipher->decrypt($encrypted, $self->{aeskey}, $initVector);
 }
 
@@ -1817,6 +1824,7 @@ sub decodeApplicationLayer($) {
 
     if ($self->{aeskey}) { 
       if ($hasCBC) {
+        #printf("encrypted payload %s\n", unpack("H*", substr($applicationlayer,$offset)));
         $payload = $self->decrypt(substr($applicationlayer,$offset));
         #printf("decrypted payload %s\n", unpack("H*", $payload));
         if (unpack('n', $payload) == 0x2f2f) {