diff --git a/modules/completion/company/autoload.el b/modules/completion/company/autoload.el
index f4db3eae7..a235864e0 100644
--- a/modules/completion/company/autoload.el
+++ b/modules/completion/company/autoload.el
@@ -37,3 +37,10 @@ C-x C-l."
   (let ((company-backends '((company-keywords company-dict))))
     (call-interactively 'company-complete)))
 
+;;;###autoload
+(defun +company/dabbrev-code-previous ()
+  (interactive)
+  (require 'company-dabbrev)
+  (let ((company-selection-wrap-around t))
+    (call-interactively #'company-dabbrev-code)
+    (company-select-previous-or-abort)))