Páginas

Estamos Para Ayudarle

Si desea que le resolvamos cualquier duda, con respecto a Excel, deje un comentario en el Post de Bienvenida o envie un correo a hector.eduardo.pm@hotmail.com ;)

[MACRO] Ayuda con macro (gestion de error)


Usuario:
Buenas tardes serian tan amable de ayudarme con una inquietud que tengo como puedo colocar un msg box que logre salir cuando en input box no coloque el nombre del libro correcto en vez del error "se ha producido el error '9' en tiempo de ejecución: subdice fuera del intervalo

Sub cmbCopiar()
Dim a As String
Dim d As String
a = InputBox("Nombre del Archivo: ", "MiArchivo")
d = a
If d = "" Then
Else
Workbooks(a).Sheets("Mana_Infantil").Activate
Selection.Copy
Workbooks("libro1.xlsm").Sheets("Mana_Infantil").Activate
ActiveSheet.Range("a2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
Application.Dialogs(xlDialogSaveAs).Show
End If
End Sub


Gracias

Respuesta:
La manera más fácil de hacer esto es untilizando On Error, te quedaría algo como esto:

Sub cmbCopiar()
Dim a As String
Dim d As String
    a = InputBox("Nombre del Archivo: ", "MiArchivo")
    d = a
    If d = "" Then
    Else
        On Error GoTo ControlError  ' Activa la rutina de control de errores.
        Workbooks(a).Sheets("Mana_Infantil").Activate
        Selection.Copy
        Workbooks("libro1.xlsm").Sheets("Mana_Infantil").Activate
        ActiveSheet.Range("a2").Select
        Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
                :=False, Transpose:=False
        Application.Dialogs(xlDialogSaveAs).Show
        On Error GoTo 0 ' Desactiva la detección de errores.
    End If
  
    Exit Sub    ' Salir para evitar el controlador.
ControlError:   ' Rutina de control de errores.
    MsgBox "Error en la lectura de datos"
End Sub


Saludos

Usuario:
Muchas garcías funciona ecxelente

[MACROS] Como se autoborra archivo excel, en cuanto desbloqeen


Usuario:
Hola, quiera saber si hay una forma como una macro para borrar un archivo en cuanto se desbloque, debido a que tengo un archivo que creé, pero no me gustaría que hicieran mal uso con la información que tengo oculta y en las fórmulas, esta bloqueado las hojas y el libro en estructura, y se que es muy sencillo violar las claves ya que hay macros que lo hacen, por lo que me gustaría encontrar una forma de que el archivo se auto borre en cuanto lo desbloqueen. ¿Habrá alguna forma?

Respuesta:
Buenas noches amigo
 
Existe una posible solución aplicando Worksheets("Hoja1"). ProtectContents . Esto le devolvera True si la hoja esta protegida y False si la hoja esta desprotegida.
 
Con el siguiente ejemplo básico podrá ver como funciona el comando.
 
Private Sub CommandButton1_Click()
    If Worksheets("Hoja1").ProtectContents = True Then
        Range("B2").Select
        ActiveCell.FormulaR1C1 = "Protegido"
    End If
   
    If Worksheets("Hoja1").ProtectContents = False Then
        Range("B2").Select
        ActiveCell.FormulaR1C1 = "Desprotegido"
    End If
   
End Sub


Para que funcione correctamente debe cambiar el formato de la celda "B1" para desbloquear la misma.
 
Intente programar el código de una hoja para que verifique cualquier cambio, usando el evento Changue de Worksheet, y que en cada verificación compruebe que la hoja esta protegida. Si la hoja esta desprotegida, entonces que seleccione toda la hoja y la borre.
 
Si me me da algo de tiempo, puedo hacer el intento de programarle una hoja de ejemplo.
 
Saludos

Usuario:
Bien. Una respuesta aceptable.

[MACROS] Botón para guardar en pdf


Usuario:
Hola, tengo un botón en una hoja llamada "formulario" y quiero que cuando clique en él me guarde unos rangos de la hoja "enmarcador" d1733:q1787 a un archivo en pdf en la ruta c:/albaranes y ese archivo vaya llevando el nombre que hay en la celda c3 de la hoja "formulario".
¿Podéis ayudarme?

Respuesta:
Buenas tardes amigo, disculpe la tardanza en responder.
 
Imagino que usa Excel 2007 o superior. Esta es una posible solución a lo que desea hacer:
 
Sheets("formulario").Select
Range("D1733:Q1787").Select
Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= Range("C3").Value, Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
 OpenAfterPublish:=False

Saludos

Usuario:
Gracias, eso era la solución, ahora voy a seguir con este mismo botón para incluir en el código que me has dado pa posibilidad de imprimirlo.

[MACROS] Macro para concatenar


Usuario:
Buenos días
Necesito una macro que me concatene las columnas bcde pero que antes de guardarme la concatenación en la columna f me inserte una columna ya que en f hay datos gracias

Respuesta:
Buen día amigo, disculpe la tardanza en responder.
 
Una posible solución podría ser el siguiente código:
Columns("F:F").Select
Selection.Insert Shift:=xlToRight
Range("F1").Value = Range("B1").Text + Range("C1").Text + Range("D1").Text + Range("E1").Text

 
Saludos

Usuario:
Muchas gracias excelente respuesta

[MACROS] Cambiar texto en celda en función del día de la semana


Usuario:
Hola, espero puedas ayudarme con lo siguiente:
 
Tengo puesto en la celda B1 la fecha de hoy sin hora.
 
Range("B1").Select
    ActiveCell.FormulaR1C1 = "=TODAY()"
 
Y lo que quiero es que cuando ejecute la macro en la celda B6 aparezca un texto determinado, dependiendo de si el día de la semana es Sábado o si es otro día cualquiera de la semana.
El código que tengo puesto es el siguiente:
 
If "=TODAY()" = Saturday Then
    Range("B6").Select
    ActiveCell.FormulaR1C1 = _
        "LOS CAMBIOS VIGENTES HASTA LAS 16:00 H DEL LUNES ____/____ SON:"
    Else
    Range("B6").Select
    ActiveCell.FormulaR1C1 = _
        "LOS CAMBIOS VIGENTES HASTA LAS 16:00 H SON:"
End If
 
Es correcto este código o debería poner If Range("B1") = Saturday then. Etc.
 
Muchas gracias de antemano

Respuesta:
Buen día mi amigo, disculpe la tardanza en responderle. 
 
Efectivamente lo correcto es If Range("B1") = Saturday then
 
Saludos

Usuario:
Bien. Una respuesta aceptable.

[FORMULAS] Duda excel


Usuario:
Tengo dos celdas que quiero relacionar en C1 por la operación "división". (A1 / B1). ¿Qué expresión tengo que escribir en C1 para que me dé siempre un resultado numérico y nunca me salga un mensaje de error? Esto sucede cuando:
1) En B1 (que es el divisor) hemos introducido un cero o, por error, una letra o signo distinto a un número.
2) En A1 hemos introducido una letra o un signo distinto a un número.
Es evidente que la fórmula debe decir algo así: "dividir A1 entre B1 y indicar el resultado en C1, a excepción de que B1 sea igual a 0 o a un signo distinto de un número, o A1 sea un signo distinto a un número, con lo que el resultado indicado será "Sin solución". Me resulta imposible formularlo con la gramática del excel.
Muchas gracias.

Respuesta:
Buen día, disculpe la tardanza en responder
 
Para esto puede utilizar la función SI en conjunto con la función ESERROR de la siguiente forma:
=SI(ESERROR(A1/B1);"";A1/B1)
 
Saludos

Usuario:
Excelente. Una fantástica solución.

[MACROS] Buscar Dato traer modificar actualizar


Usuario:
Buenas tardes expertos, les explico
Tengo un libro con 8 hojas, en las cuales la hoja uno esta vacía y las demás completas de datos.
En la hoja1 quiero ingresar un numero, ese número puede estar UNA SOLA VEZ en cualquiera de las hojas, que me lo busque y me traiga toda la horizontal de ese dato para yo poder modificarlo y que se actualice en la hoja correspondiente de donde lo encontró.
La idea es hacerlo con botones de buscar y actualizar y algo por el estilo, donde yo pueda entrar el "numero a buscar" le doy click en buscar, que me traiga toda la horizontal, la modifique en la misma hoja1 y luego le de click a actualizar y me actualice la modificación en la hoja correspondiente.
 
De ante mano muchas gracias.

Respuesta:
Buenas tardes amigo, disculpe la tardanza
 
Aquí le dejo un archivo como posible solución a su problema:
EJEMPLO Buscar_Dato_Traer_Modificar_Actualizar.html
 
Saludos
http://formulas-en-excel.blogspot.com/

Usuario:
Muchas gracias, muy buen dato.

[FORMULAS] Extraer datos de hoja por formulario


Usuario:
Hola
Un saludo
Tengo una base de clientes en Excel a los que accedo frecuentemente para tomar cierta o cual información. Necesito saber como puedo hacer para que, escribiendo cierto dato en un textbox de un formulario, me despliegue otro relacionado con dicho dato en el mismo formulario (o en otro). Por ej. Escribiría el numero de crédito en el textbox y me desplegaría la información del nombre de dicho acreditado, su numero consecutivo y el estatus de su crédito, ya sea en un promt o en el mismo formulario dentro de otro textbox.
A lo mejor es muy complicado pero por lo general cuando busco información utilizo el buscador (Ctrl+b) y tengo que hacerlo de uno por uno. Sin embargo necesito obtener la información de varios créditos a la vez. ¿Puede ser esto posible?
Muchas gracias.

Respuesta:
Buenas tardes amigo
Efectivamente si se puede hacer con un formulario pero para poder hacer varias búsqueda se necesitaría saber cuanto es el máximo de búsquedas, que desea realizar simultáneamente.

Exista otra forma mucho más fácil utilizando un condicional SI junto con la función BUSCARV. La ventaja es que usted podrá realizarle ajustes, a la Hoja, sin necesidad de saber programar lo que facilitaría aplicar el mismo método para cualquier otro caso que se le presente. Otra ventaja es que puede realizar cualquier cantidad de búsquedas simultaneas y los datos obtenidos los puede utilizar libremente (cosa que se haría algo difícil con un formulario).

Revise el siguiente archivo y me avisa si aun desea la solución con un formulario
EJEMPLO Extraer_Datos_de_Hoja.html

Saludos
http://formulas-en-excel.blogspot.com

Usuario:
Muy Bien. Me ha sido de gran utilidad

[MACROS] Actualizar textbox con celdas


Usuario:
Buen día, estaría agradecido si me pudieras ayudar con este inconveniente...
Tengo un formulario en donde tengo varios textboxs, lo que necesito es que cada textbox se actualice conforme las selecciones que voy asignándole en el worksheet.
******************************************************************
Ejemplo:
Al seleccionar con el mouse la celda "d5" aparezca inmediatamente en el textbox1 el valor de la celda "d5".
La EXPRESION:  TextBox1.Value = ActiveCell.value 
 sobre la CONDICION: TextBox1_Change()  
me entrega el valor  de la celda pero hasta que digito algo en el textbox1. 
Alguna sugerencia para actualizar el textbox automáticamente cuando selecciono con el mouse o teclado una celda cualquiera.
Muchas Gracias de antemano por tu preciado tiempo!

Respuesta:
Buenas tardes amigo, esto se resuelve escribiendo lo siguiente en el código de la Hoja que desee:
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    TextBox1.Text = Target.Value
   
End Sub


Para que esto funcione no debe estar en modo de diseño en la Hoja
Saludos

Usuario:
Exacto compañero, era el comportamiento de la hoja contra el form, muy bien detallada,
Al final me quedo así (Ya que era sobre un form):
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    UserForm1.Show
    On Error Resume Next
    UserForm1.TextBox1.Text = Target.Value  'Ejemplo
   
End Sub

Muchas Gracias! Puedo continuar con mi sistema!

[MACROS] Mensaje de error al escribir en una celda excel


Usuario:
Buenos días y gracias por atenderme.
Tengo un programilla que me copia unos valores mediante formulario en una hoja (datos). Te copio el código para ponerte en situación.
Private Sub Guardar_Click()
   If MsgBox("¿Seguro que desea cargar los datos?", vbQuestion + vbYesNo, "CONFIRMACION") = vbNo Then
   TextBox3 = Empty
   Exit Sub
   End If
   Dim x As Integer
   x = Choose(ComboBox1.ListIndex + 1, 4, 18, 33, 39, 43, 46, 55, 61, 66, 72, 75, 80, 117, 122, 124, 126, 144, 169, 172, 197, 202) + ComboBox2.ListIndex
   Sheets("Datos").Cells(x, 4) = Sheets("Datos").Cells(x, 4) - SalidaMaterial.TextBox3.Value
   TextBox3 = Empty
   MsgBox ("La operación se ha realizado correctamente")
End Sub 

Lo que ue hace es sumarme el valor del textbox en función de los combobox. Me lol hace bien, pero si selecciono una opción en el primer combobox y ninguna en el segundo me copia el valor a una celda que no quiero. En este caso la celda 3, 17, 32, 38, 42, etc,
¿Cómo puedo quitar esta opción? Y que me de un mensaje de error cuando no haya seleccionado una opción en el combobox 2. 

Respuesta:
Buenas tardes, una posible solución seria colocar un condicional que verifique que ComboBox2 no este vacío.
 
El código podría ser algo como esto:
If ComboBox2.Text = "" Then
        MsgBox ("ComboBox2 no seleccionado")
        Exit Sub
    End If 

 
Pruébalo y me dices que tal te fue
 
Saludos
http://formulas-en-excel.blogspot.com/

Usuario:
Gracias, lo he probado y funciona, lo que pasa ahora es que si antes he seleccionado un producto en el combobox, se me queda y me hace otra vez lo mismo. ¿Cómo puedo vaciar el combobox cada vez que opero con el?
Un saludo.

Respuesta:
Pruebe colocando ComboBox2.Text = "" como ultima accion de la macro. Seria algo así como:
 
   TextBox3 = Empty
   MsgBox ("La operación se ha realizado correctamente")
   ComboBox2.Text = ""
End Sub 

 
Saludos

Usuario:
Excelente. Una fantástica solución.

[MACROS] Necesito crear una macro en Excel para hacer búsquedas de tablas combinadas


Usuario:
Hola,
Me gustaría que me pudieran ayudar en este caso ya que estoy un poco perdida.
Tengo una tabla con las siguientes columnas
Año, Trimestre, Convenio, Entidad, Responsable, Objeto y Actuación
En otra hoja tengo un cuadro combinado para realizar búsquedas por Año, Trimestre, Convenio, Entidad y Responsable.
Lo que quiero es que al pulsar un botón "Buscar" me aparezca una tabla (en la misma hoja o en otra) con todas las filas (puede haber más de una filae que coincida con los datos de búqsueda) que se correspondan con los datos de los cuadros combinados (no siempre se utilizaran todos ni los mismos cuadros combinados, es decir, unas veces se puede buscar por Año y Convenio, otras por Año, Trimestre y Responsable... etc).
Sería genial que en las filas aparecieran todas las columnas excepto por las que se ha realizado el filtro de la búsqueda.
No sé como realizar esto, ¿macro?, ¿Tablas dinámicas?, ¿Combinación de funciones?

Respuesta:
Buenas noches, disculpe la tardanza en responder
 
Le tengo una posible solución: Un Libro con dos Hojas llamadas "Datos" y "Busqueda".
En la Hoja "Datos" evidentemente estarán todos los datos que se desean filtrar.
En la Hoja "Busqueda" tendremos un Botón "Buscar" el cual realizara el filtro dependiende de los valores asignados a las celdas que van desde C3 a D7. En estas celdas usted puede seleccionar cuales criterios (Columna C) desea que se apliquen en la búsqueda conlocando "Si" o "No". También puede especificar los valores (Columna D) que se desea que se busque.
 
Revise este archivo y me dice que tal le parece
EJEMPLO Busque_Multiple_Con_Criterios_Multiples.html
 
Saludos
http://formulas-en-excel.blogspot.com

Usuario:
Hola,
Muchas gracias por tu respuesta.
He estado echándole un vistazo y tiene muy buena pinta aunque me gustaría hacerle un par de cambios.
En primer lugar si hago una búsqueda que el resultado tiene 7 filas, y la siguiente tiene 3, me aparecen las 3 de la segunda búsqueda pero también las filas 4, 5, 6 y 7 de la primera. Es decir, tendrían que borrarse los registros antiguos para cada nueva búsqueda.
En segundo lugar, me gusta la idea, aunque yo lo había pensado de otra forma, igual que tiene un desplegable para si/no, yo había pensado en montar un desplegable para cada criterio con todas las opciones. Siguiendo el ejemplo, que en año se desplegara 2001, 2005, 2006, 2007 y 2009, en trimestre 1, 2, 3 y 4... etc y en cada uno de ellos también la opción en blanco que equivaldría a cuando no se quiere realizar una búsqueda por ese criterio.
De esta forma para las búsquedas solo tendrían que seleccionarse las opciones de los desplegables, bien en blanco (para que no busque por este criterio) o con algún dato.
Y por último, aunque es lo menos relevante, que en los resultados no aparecieran los criterios por los que se ha hecho la búsqueda, por ejemplo, si busco por año y responable, que solo saque los resultados de trimestre, convenio y entidad.
He mirado el código de la macro aunque no lo comprendo muy bien. Me gustaría que me dijeras si estos cambios que te comento son viables o no, sobretodo el segundo ya que me parece mucho más práctico para el usuario final.
Muchísimas gracias por tu ayuda de verdad

Respuesta:
Buenas noches, disculpe la tardanza.
 
Realize los ajustes que solicitaste. Me gusto mucho la idea de aplicar criterio de búsqueda en base a las listas con valores asignados.
 
Las listas desplegables fueron creadas con validación de datos (Menu Datos -> Validación) ustilizando los datos que puedes ver en el rango de celdas H3:AH7. Todas estas columnas las puedes ocultar sin problemas.
 
También ajuste la macro para que no muestre las columnas con los criterios utilizados para la búsqueda pero no esta permitido realizar una búsqueda con los 5 criterios, simultáneamente, porque no habrían columnas que mostrar.
 
Revisa el archivo y me dices que tal te parece
EJEMPLO Busque_Multiple_Con_Criterios_Multiples.html
 
Saludos
http://formulas-en-excel.blogspot.com 

Usuario:
Muchas gracias!
Esa era exactamente mi idea

[MACROS] Como usar Fileappend filewrite EmReadscreen


Usuario:
Hola experto
Estoy programando una macro en excel, pero no conozco como funcionan estas funciones me las puedes explicar
Fileappend
Filewrite
Emreadscreen
Gracias y espero su respuesta

Respuesta:
Buenas tardes amigo, disculpe la tardanza en responder.
 
No tengo información referente a esos comandos pero si tengo una posible solución.
Para FILEAPPEND puede utilizar APPEND, y para FILEWRITE puede utilizar WRITE. En el caso de ENREADSCREEN lamentablemente no conozco algún equivalente.
 
Los comandos estrellas que se necesitan para poder aplicar esto, correctamente, es OPEN y CLOSE.
 
APPEND no es un comando, es una opción del comando Open que define la forma como se va a tratar el archivo que se piensa abrir. En este caso se abrirá para adicionar lineas de texto al final del archivo.
 
WRITE si es un comando y su funcion es escribir en el archivo que se piensa abrir. Tambien puede usar el comando PRINT.
 
Le dejo un código de ejemplo para que lo revise:
 
Private Sub cmdAppend_Click()
 
    Dim intFileHandle As Integer
    Dim myStr As String
    myStr = "Celda A1 " & Range("A1").Value
    intFileHandle = FreeFile
    Open "Prueba.txt" For Append As #intFileHandle
    Print #intFileHandle, myStr
    Close #intFileHandle
End Sub
Private Sub cmdWrite_Click()
   
    Dim intFileHandle As Integer
    Dim myStr As String
    myStr = "Celda A1 " & Range("A1").Value
    intFileHandle = FreeFile
    Open "Prueba.txt" For Output As #intFileHandle
    Write #intFileHandle, myStr   ' Delimita con comas los datos introducidos.
    Write #intFileHandle,    ' Coloca una línea en blanco.
   
    Dim MiBool, MiFecha, MiNull, MiError
    ' Se establecen valores Boolean, Date, Null y Error.
    MiBool = False: MiFecha = #2/12/1969#: MiNull = Null
    MiError = CVErr(32767)
    ' Los datos booleanos se escriben como #TRUE# o #FALSE#. ' Los literales de fecha se escriben en el formato de
    ' fecha universal, por ejemplo,#13-07-1994# representa
    '13 de julio de 1994. Los datos nulos se escriben como #NULL#.
    ' Los datos de error se escriben como #ERROR código_error#.
    Write #intFileHandle, MiBool; "es un valor booleano"
    Write #intFileHandle, MiFecha; "es una fecha"
    Write #intFileHandle, MiNull; "es un valor nulo"
    Write #intFileHandle, MiError; "es un valor de error"
    Close #intFileHandle    ' Cierra el archivo.
End Sub
 
Saludos
http://formulas-en-excel.blogspot.com/

Usuario:
Muy Bien. Me ha sido de gran utilidad

[FORMULAS] Condicionar casilla para que aparezca valor en celda


Usuario:
Hola, bueno mi problema es que estoy haciendo una hoja de calculo para facturación, tengo los siguientes títulos: descripción, cantidad, precio unidad e importe. Bueno he creado una fórmula en importe con la función PRODUCTO para que me multiplique la cantidad con el precio unidad y me salga el resultado en importe, pero el problema es que me sale 0,00 si no inserto ningunos valores en cantidad ni en precio unidad, solo quiero que me aparezca el valor en importe cuando inserte algún valor en las otras casillas y mientras que este en blanco, para que a la hora de imprimir no me aparezca en toda la columna los "0,00". En fin no se si esto se podrá hacer de alguna manera para ocultar las celdas de importe hasta que se aplique algún valor en las otras celdas, espero su ayuda, gracias

Respuesta:
Buenas tardes, esto se puede resolver con una función "SI" de la siguiente manera.
=SI(Y(C2<>"";D2<>"");C2*D2;"")
 
Lo que hace la función es verificar que las dos celdas (C2 y D2) no estén vacías. Si la condición se cumple entonces multiplicara los dos valores. Si alguna de las dos celdas esta vacía entonces el resultado sera "" (vacío).
 
Saludos y espero que con esto puedas resolver tu inquietud.
http://formulas-en-excel.blogspot.com/

Usuario:
Hola, gracias por la respuesta, acabo de probar la fórmula y funciona pero claro me pone en el resultado "FALSO" en el caso de que no se metan datos, y yo no quiero que me aparezca nada, es decir la celda vacía, en fin, a ver si se puede hacer para que no aparezca, gracias

Respuesta:
¿Esta seguro de que copio bien la fórmula? Ese valor sale cuando no se coloca "" en el tercer parámetro de la función SI.
 
Le dejo este archivo para que lo revise
EJEMPLO Condicionar_Casilla.html
 
Saludos
http://formulas-en-excel.blogspot.com/

Usuario:
Ok, al final lo conseguí, muchas gracias por tu ayuda, saludos

[FORMULAS] Como cambio la condición de la fórmula


Usuario:
Hola, nuevamente me gusto tu trabajo pero encontré otra incógnita que es:
Como cambio la condición de la letra "e" por una palabra.
Pues como puedes ver también habían (actividades con otras palabras como vencido)

Respuesta:
Me alegra que te gustara el trabajo.
Si te fijas bien en la Hoja1 esta oculta la columna "A". En esa columna están los condicionales que son la base de la selección de los datos a transferir. La fórmula de esos condicionales es la siguiente:
=SI(L4="e";A3+1;A3)
 
La letra "e" la puedes sustituir por otra palabra o por una referencia a otra celda.
Te modifique el trabajo para que coloques en la Hoja2 (celda "M1") la palabra que deseas que se busque.
EJEMPLO Base_de_datos_actividades_Oper.html
 
Saludos

Usuario:
Esta muy buena tu idea, y te lo agradezco nuevamente. Pero cuando la fórmula pasa las fechas las suma, resta o no se que hará con ellas, por que sea lo que haga no las pasa iguales.
Si me puedes colaborar con esto, seria muy bueno, y si no, te quieres molestar más esta bien. Pero sino solo ocultare esa columna.
Esta preguntita más, tengo otra base de datos, y quise implementar los trucos que me enseñaste. pero me aparecio un error (######). Yo creía que el error era por el nombre de las hojas, pero no fue así, le cambie el nombre y siguió igual. Porque todo lo puse igual a la otra con las ubicaciones de las celdas y todo pero no.

Usuario:
Hola, ya se me arreglo cambiando el nombre de las hojas. Pero yo no quiero que el nombre de la hoja 1 quede como (Hoja1) ni el de la hoja 2 Quede como (Hoja2).
Pero si no les coloco este nombre no me funcionan.
Ha y no te olvides de mirar la posibilidad de lo de la fecha.

Respuesta:
No es ninguna molestia, estamos para ayudar ;)
 
Para que las fechas te aparezcan correctamente debes cambiar el formato de las celdas haciendo click con el botón derecho del mouse y seleccionar el formato "Fecha".
 
Con respecto a la segunda duda, cuando en una celda te aparece #### es porque el resultado es un numero con un largo más ancho que el mismo ancho de la columna. Ajusta el ancho de la columna hasta que logres ver el resultado.
 
Saludos y no dudes en preguntar =)

Respuesta:
No hay problema, cambia el nombre de las hojas pero en la fórmula
=SI(FILA(A3)-2<=TUHOJA!$A$2;BUSCARV(FILA(A3)-2;TUHOJA!$A$4:$L$199;COLUMNA(A3)+1;0);"")
 
Saludos
http://formulas-en-excel.blogspot.com/

Usuario:
Gracias por tu ayuda

[FORMULAS] Pasar datos de una hoja a otra con una condición

Usuario:
Hola, mi pregunta es: que la información que tengo en la hoja1 desde a1 hasta k1, me la pase a la hoja 2, cuando en la celda k1 se escriba la palabra ejecutado.


Respuesta:
Buenas tardes, esto se puede resolver con la fórmula "SI". 
  
En la celda "A1", de la Hoja2, debe colocar la siguiente fórmula: 
=SI($K$1="ejecutado";Hoja1!A1;"") 
  
Luego copia y pega la celda "A1" en las celdas desde "B1" en adelante. 
Saludos =)



Usuario:
Hola, primero gracias por tu diligencia. 
Lo hice como usted lo dijo y me apareció Erro de Fórmula. No se por que si me puede dar otra sugerencia, lo agradezco.



Respuesta:
Es extraño, debería funcionar bien. ¿Tu version de Excel es en español? 
  
Este archivo es un ejemplo de como funciona. Las fórmulas están en la celdas de la Hoja2. 
EJEMPLO Pasar_Datos_con_Condicion 
  
Saludos



Usuario:
Hola gracias por tu respuesta. Me sirvió en una parte pero al implementarla me apareció otra cosa, y es la siguiente: 
Que cuando este pasando los datos ala hoja 2 no me deje espacios de los que no cumplen la condición. 
Si no me entiendes bien dime como me puedo expresar mejor 
Este es un link donde puedes ver lo que me ocurrió implementando tu respuesta 

Muchas gracias


Respuesta:
Ok amigo, lo que usted necesita es algo un poquito más complejo que un condicional. Modifique un poco su archivo para que haga lo que usted esta pidiendo. 
Al colocar la letra "e" en la celda que, de la Hoja1, los datos de esa fila se verán reflejados en la Hoja2 
EJEMPLO Base de datos actividades Operaciones2.xls 
  
Saludos



Usuario:
Gracias por tu esfuerzo y rapidez de respuesta. 
Saludos