%3F.png)
Estoy intentando recorrer tablas, filas, columnas y celdas seleccionadas.
Sin embargo, no puedo lograr que el objeto Tabla se establezca correctamente en la variable del bucle for.
Inspeccioné el elemento TypeName(objSel.Tables.Item(1)
para validar que el tipoESde tipo Mesa. Pero sigo recibiendo el error "Tipo no coincidente".
Respuesta1
Parece que el problema se debió a que estaba intentando almacenar una tabla de Word en una tabla de Outlook.
Antes (no funciona):
Dim aTbl As Table
Dim i As Integer
For i = 1 To objSel.Tables.Count()
Debug.Print (TypeName(objSel.Tables.Item(i)))
Set aTbl = objSel.Tables.Item(i)
Debug.Print (TypeName(aTbl))
Next
Despues de trabajar):
Dim aTbl As Word.Table
Dim i As Integer
For i = 1 To objSel.Tables.Count()
Debug.Print (TypeName(objSel.Tables.Item(i)))
Set aTbl = objSel.Tables.Item(i)
Debug.Print (TypeName(aTbl))
Next