Programa VBA (el objeto de solicitud no admite propiedades ni métodos)
Atenuar shp como hoja de trabajo
Atenuar shp como forma
Para cada sht en ActiveWorkbook.Sheets
Para cada shp En sht.Shapes
Si shp.Name es como "Cuadro de texto*" Then 'Determina el tipo de shp según el nombre
If shp.TextFrame.Charers.TextThen 'Determina el shp escriba según el nombre
Si shp.TextFrame.Characters.Text = "" Entonces shp.Delete
Finalice si
Para cada shp en ActiveWorkbook p. > Siguiente
Siguiente
End Sub
¿Algunas formas no son compatibles? Propiedad TextFrame.Characters.Text. Primero debe determinar que la propiedad .TextFrame.Characters.Text. no es compatible y luego manejarla.
De lo contrario, si encuentra una forma que no admite la propiedad .TextFrame.Characters.Text. obtendrá un error. El código anterior le proporciona un método para determinar la propiedad .TextFrame.Characters.Text. TextFrame.Text? ¿Puedes consultarlo?