Jump to content

jumarcano

Members
  • Content Count

    10
  • Joined

  • Last visited

About jumarcano

  • Rank
    Member

Converted

  • Campos
    ;

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Tienes razon, no indique donde. Los nombre van en la columna A. Todos los vendedores tienen nombre Entonces, necesito que se utilice la columna A
  2. Disculpa la molestia. Como los nombres de hoja eran muy largos los modifiqué a una letra y sus respectivos valores numéricos. Si no los quieres de dicha manera, avisas y lo eliminamos. Quiero eliminar el nombre corto y su valor numerico. Hice una prueba ahorita y es mejor el nombre completo. Solo tengo que buscar el nombre. Si no tengo que adivinar cual es el vendedor. Por ejemplo Vendedor 1 es Pedro Peres Vendedor 2 Luisa Rosal Entonces necesito que la hoja se llame, Pedro Peres, Luisa Roral..... ect Gracias de antemano ae20190924_post42166_Macro Argentina.xlsm
  3. Muchas garcias. Es lo que estaba buscando. En cuanto a los nombres esta bien..... es mas facil buscar saludos
  4. Por favor si Por favor, te agreceria que revisaras mi archivo. Este archivo me esta dando error usando la misma formula que me enviaste. La vez pasada no logre subir el archivo por el fichero. Intento por mega. Espero puedas revisarlo Gracias nuevamente por tu respuesta https://mega.nz/#!95NFHCZY!hco2CBpYyIcdUbiiX3ZpR5qtzqjG9w0KGMZcIkrNUGc
  5. Gracias por tu excelnte respuesta. Pero me da error en el archivo que quiero adaptarlo
  6. por eso,lo que quiero es que cuando agregue un nombre diferente en la lista cree la copia con el nombre nuevo. Es decir que si tengo 20 nombres diferentes, pueda crear la hoja 21 con su nombre Producto1 con su hoja Producto1 Producto2 con su hoja Producto2 Producto3 con su hoja Producto3 Producto4 con su hoja Producto4 Producto5 con su hoja Producto5 Producto6 con su hoja Producto6 Producto7 con su hoja Producto7 Producto8 con su hoja Producto8 Producto9 con su hoja Producto9 Producto10 con su hoja Producto10 Producto11 con su hoja Producto11 Producto12 con su hoja Producto12 Producto13 con su hoja Producto13 Producto14 con su hoja Producto14 Producto15 con su hoja Producto15 Producto16 con su hoja Producto16 Producto17 con su hoja Producto17 Producto18 con su hoja Producto18 Producto19 con su hoja Producto19 Producto20 con su hoja Producto20 Producto21 con su hoja Producto21
  7. Gracias por tu pronta respuesta. Exactamente ocurre una vez. Ocurre el error cuando agrego un nombre mas a la lista asi no sea duplicado. Por ejemplo tengo 20 nombres difrentes y agrego el 21 totalmente diferente y me da error
  8. Pedon es esta la macro Sub Copia() Dim C As Range '-- Application.ScreenUpdating = False For Each C In Range("A4", Range("A" & Rows.Count).End(xlUp)) Sheets("ModeloS").Copy , Sheets(Sheets.Count) With ActiveSheet .Range("B3") = C If Len(.Name) > 31 Then .Name = Left(C.Offset(, 1), 31) Else .Name = C End If End With Next C Application.ScreenUpdating = True End Sub
  9. buenos días, Tengo el siguiente macro. Es para copiar una hoja y dar nombre de acuerdo a una lista. Sin embargo, cuando agrego un nombre mas en la lista me da erro. Alguien me puede ayudar? Sub Copia() Dim C As Range Application.ScreenUpdating = False For Each C In Range("A2", Range("A" & Rows.Count).End(xlUp)) Sheets("Molde").Copy , Sheets(Sheets.Count) With ActiveSheet .Range("A5") = 😄 .Name = Left(C.Offset(, 1), 31) End With Next C Application.ScreenUpdating = True End Sub Ejemplo Copiar Hoja.xlsm
  10. Hola y si yo quisiera hasta el numero de filas que tiene una celda. algo así, que empiece desde A2 hasta el numero de fila que tiene la celda "H1"
×
×
  • Create New...

Important Information

Privacy Policy