Saltar al contenido

lizethor

Miembro
  • Contador de contenido

    1
  • Unido

  • Última visita

Todo se publica por lizethor

  1. Un gran Saludo Estoy muy agradecida por tu informacion, he navegado durante mucho, tratando de encontrar esta respuesta; leyendo todas las intervenciones a mi parecer son acertadas, la opcion que plantea mjrofra es valida para mi, el unico inconveniente en mi caso es que copia todo lo de la hoja, hasta los botones; pero lo interesante es que no aparece error en los nombres repetidos y genera automaticamente una hoja con el mismo nombre y en "consecutivo"; por esta razon quise que mi formato tambien generara un consecutivo con el nombre que yo quisiera asignarle; y por suerte encontre otro codigo que complemento un poquito el tuyo y lo quise compartir a quien pueda interesarle; tambien mi intervencion es un mero agradecimiento por compartir conocimientos con el mundo en este medio, Gracias. Private Sub Guardar_Click() Sheets.Add after:=Sheets(Sheets.Count): Sheets("Original").Cells.Copy: ActiveSheet.Paste ActiveSheet.Name = Sheets(1).Range("C5").Value Application.CutCopyMode = False End Sub [/CODE] En el codigo "...Range("C5").Value ", es la celda donde coloco el nombre o consecutivo que quiero que lleve el nombre de la hoja.
×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.