Borrar Hojas
Hola tengo una macro que crea un grafico1 en una hoja que se llama igual, pero en VB aparece como nombre asignado a esa hoja Gráfico1 (Gráfico1) ... Por lo que al eliminar esta hoja no me resulta si le asigno el nombre "Gráfico1", incluso aparece un gráfico pequeño en la vista de VB para esa hoja
Pongo algo así, pero no me elimina la hoja
Sub elim_graf()
Dim hoja As Worksheet
Application.DisplayAlerts = False
For Each hoja In Worksheets
If hoja.Name = "Gráfico1" Then
hoja.Delete
Application.DisplayAlerts = True
Exit Sub
End If
Next hoja
Application.DisplayAlerts = True
End Sub
Me puede dar una mano
Muchas gracia
Pongo algo así, pero no me elimina la hoja
Sub elim_graf()
Dim hoja As Worksheet
Application.DisplayAlerts = False
For Each hoja In Worksheets
If hoja.Name = "Gráfico1" Then
hoja.Delete
Application.DisplayAlerts = True
Exit Sub
End If
Next hoja
Application.DisplayAlerts = True
End Sub
Me puede dar una mano
Muchas gracia
