Excel VBA Macro: User Defined Type Not Defined

by

Your error is caused by these:

Dim oTable As Table, oRow As Row,

These types, Table and Row are not variable types native to Excel. You can resolve this in one of two ways:

  1. Include a reference to the Microsoft Word object model. Do this from Tools | References, then add reference to MS Word. While not strictly necessary, you may like to fully qualify the objects like Dim oTable as Word.Table, oRow as Word.Row. This is called early-binding. enter image description here
  2. Alternatively, to use late-binding method, you must declare the objects as generic Object type: Dim oTable as Object, oRow as Object. With this method, you do not need to add the reference to Word, but you also lose the intellisense assistance in the VBE.

I have not tested your code but I suspect ActiveDocument won’t work in Excel with method #2, unless you properly scope it to an instance of a Word.Application object. I don’t see that anywhere in the code you have provided. An example would be like:

Sub DeleteEmptyRows()
Dim wdApp as Object
Dim oTable As Object, As Object, _
TextInRow As Boolean, i As Long

Set wdApp = GetObject(,"Word.Application")

Application.ScreenUpdating = False

For Each oTable In wdApp.ActiveDocument.Tables

More Related Contents:

  1. Extract Data from Word Document to an Excel SpreadSheet
  2. Macro to export MS Word tables to Excel sheets
  3. Generate Word Documents (in Excel VBA) from a series of Document Templates
  4. Sequence of numbers based on start and end value of 2 cells [closed]
  5. Function to convert column number to letter?
  6. How do I find the last column with data?
  7. Better way to find last used row
  8. How to insert a picture into Excel at a specified cell position with VBA
  9. 2 Dimensional array from range [closed]
  10. Save multiple sheets to .pdf
  11. Having multiple Excel instances launched, how can I get the Application Object for all of them?
  12. How can I create a calendar input in VBA Excel?
  13. Using Google Chrome in Selenium VBA (Installation Steps)
  14. Dir() function not working in Mac Excel 2011 VBA
  15. Concatenate cell data into another data if values matches
  16. Iterating through populated rows
  17. How to convert 32 bit VBA code into 64 bit VBA code
  18. Using VBA to detect which decimal sign the computer is using
  19. Loop through each row of a range in Excel
  20. Fill formula down till last row in column
  21. Outputting Excel rows to a series of text files
  22. How to create a range from two ranges in VBA?
  23. XML parse VBA excel (function trip, & MSXML2.DOMDocument)
  24. If string contains word from list, return value adjacent to list value
  25. every possible combination of the contents of 2 columns in excel
  26. excel vba freeze pane without select
  27. Converting a string representation of a constant into a constant?
  28. Create folder path if does not exist (saving from VBA)
  29. How to highlight selected text within excel
  30. How to fix a VBA “type mismatch” error after switching to 64-bit Excel

Leave a Comment