Insertar y cambiar de nombre una hoja de excel
Buenas experto, estoy tratando de crear una hoja de excel y que a la misma vez me cambie el nombre, pero no me sirve, tengo esta macro pero no funciona
Sub marcro (1)
sheets.add type:="Worksheet"
with activesheet
.move after:=worksheets(worksheets.count)
.name = "AS400 Macro"
end with
end sub
Le agradeceria mucho me ayudaran
Sub marcro (1)
sheets.add type:="Worksheet"
with activesheet
.move after:=worksheets(worksheets.count)
.name = "AS400 Macro"
end with
end sub
Le agradeceria mucho me ayudaran
1 respuesta
Respuesta de solooffice
1
Si te parece podrías probar con esta pequeña modificación
Sub AgregaHojaAS400()
Worksheets.Add
With ActiveSheet
.Move after:=Worksheets(Worksheets.Count)
.Name = "AS400 Macro"
End With
End Sub
Sub AgregaHojaAS400()
Worksheets.Add
With ActiveSheet
.Move after:=Worksheets(Worksheets.Count)
.Name = "AS400 Macro"
End With
End Sub
