Jump to content

Nombre hoja interno para usarlo en formula.


lphant

Recommended Posts

Buenos días;

 

Tengo un Excel desde el cual busco información en otros Excel que nunca suelen tener el mismo nombre en la hoja.

 

Para que la cosa sea rápida, no quisiera abrir el Excel, por eso lo de buscar la información con la fórmula de la macro.

 

Mi problema viene en el nombre de la hoja, existe alguna forma de poder poner en la formula el nombre interno de la hoja??.

 

Muchas gracias.

 

Un saludo,

Ejemplo.xlsm

Link to post
Share on other sites

Estimado:

Debería de adjuntar la información completa para ver en que columna se encuentra la información en tus otros libros,

De todas maneras aca te preparé algo

1.- Extraer la información

2.- Abre el archivo Copia de Ejemplo

y dale ejecutar ==> seleccione la carpeta donde esta tu información, (En este caso los ejemplos que puse en la carpeta llamada: Nueva carpeta)

y Listo.

Saludos,

Buscar.rar

Link to post
Share on other sites
Hace 17 horas, DiegoLG dijo:

Estimado:

Debería de adjuntar la información completa para ver en que columna se encuentra la información en tus otros libros,

De todas maneras aca te preparé algo

1.- Extraer la información

2.- Abre el archivo Copia de Ejemplo

y dale ejecutar ==> seleccione la carpeta donde esta tu información, (En este caso los ejemplos que puse en la carpeta llamada: Nueva carpeta)

y Listo.

Saludos,

Buscar.rar 38 kB · 3 downloads

Muchas gracias.

Es muy buena opción, lo de usar la fórmula era por no abrir el Excel ( está en red ) y tarda mucho en abrirse pero creo que voy a tener que abrirle.

Pd: lo que me has pasado funciona perfectamente.

Gracias y un saludo.

Link to post
Share on other sites

Estimados, creo que aunque a veces la teoría es dejada de lado ante soluciones prácticas, igual siempre es importante.

- Las hojas NO tiene un "nombre interno", tienen un módulo de clase que lleva un nombre pero que no está directamente relacionado al nombre que vemos en la pestaña de la hoja.

- Las fórmulas, aunque muchos no lo crean, también abren los archivos (incluso esas que muchos creen que trabajan sobre "libros cerrados") ¿difícil de creer? A un libro con datos colóquenle clave de apertura, ahora en otro libro intenten vincular con fórmulas algunas celdas entre libros ¿notan lo que pasa?

Saludos

Abraham Valencia

Link to post
Share on other sites

Archived

This topic is now archived and is closed to further replies.

a


  • Crear macros Excel

  • Posts

    • Bigpetroma, eres un genio al final me diste la solución lo es probado con el código que a me ha dejado y funciona bastante bien hasta ahora así como esta ejecutando es la solución perfecta, gracias por ahora seria tema cerrado.
    • amigo, lamentablemente NO nos estamos entendiendo, tu quieres que la macro haga algo pero no terminas de explicar, lo mas que voy a hacer por ti es dejarte esta macro que hace lo mismo que tu macro original pero mucho mas resumida Sub correspondencia() Dim NumCriterios As Variant Dim nCantDatos As Double Dim nDatos As Double Dim wHoja As Worksheet Dim nVariable As Integer Dim sVariable As String Dim sDatos As String ' ' correspondencia Macro ' ' Acceso directo: CTRL+a ' ''''''''''''''''''pedimos la cantidad de crieterios ''''''''''''''''''''''''''''''''''''''''''''''''''''''' NumCriterios = InputBox("Escribe el número de criterios") 'Caja de texto para escribir el numero de criterios If IsNumeric(NumCriterios) = False Then Exit Sub '''''''''''''''''' obtenemos la cantidad de datos a procesar ''''''''''''''''''''''''''''''''''''''''''''''''''''''' nCantDatos = Sheets("BD").Cells(Rows.Count, "A").End(xlUp).Row 'contar el numero de nDatos For nDatos = 2 To nCantDatos 'Ciclo para realizar las combinaciones Worksheets("Correspondencia").Copy Before:=Sheets(nDatos) Set wHoja = ActiveSheet For nVariable = 1 To NumCriterios sVariable = Worksheets("BD").Cells(1, nVariable).Value sDato = Worksheets("BD").Cells(nDatos, nVariable).Value wHoja.Cells.Replace What:="<" & sVariable & ">", Replacement:=sDato, LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False 'Busca y reemplaza los valores de la base de nDatos Next nVariable Next nDatos End Sub   de resto no puedo ayudarte mas, pues tienes que ayudarme a entender para poder ayudarte, la macro supuestamente busca hasta 8 campos (tu macro original) en la tabla de la hoja DB, pero esa hoja solo tiene 2 campos nombre y nota, no veo el sentido de elegir 8 criterios cuando NO existen. y lo otro, dices que algunos no te cuadran, pero no dices cual para revisar. suerte  
    • Si disculpe, pero como lo digo solo eso necesito esa macro necesito que me replique la correspondencia pero hasta ahí funciona bien pero en la sumatoria en algunas correspondencias no lo suma bien solo eso el total sale distinto a los criterios.
    • Saludo amigo hace mes me ayudaste con este archivo que   ponga Trimestre i aparezca solo los meses Ene, Feb, Mar; Trimestre II aparezca solo Abril, May, Jun; Trimestre III aparezca solo Jul, Agos, Set; Trimestre IV aparezca solo Oct, Nov, Dic, se estuviera a su alcance me lo pudiera corregir solos que aparezcan por mes se pongo enero me aparezca solo enero y así sucesivamente con los otros meses gracias 
    • yo veo lo que hace la macro, simplemente hace una copia de la hoja Correspondencia y supuestamente sustituye los criterios o campos, pero en este caso simplemente cambia solo dos, <nombre> y <nota> y tu hablas hasta de 8 criterios, si puedes explicar lo que intentas hacer
  • Recently Browsing

    No registered users viewing this page.

×
×
  • Create New...

Important Information

Privacy Policy