Hola, tengo un libro con el que hago escandallos para un restaurante. El libro contiene varias macros. Y cada vez que lo abro me da el siguiente error: Aviso: Hemos encontrado un problema con contenido de "wary_escandallos_19.xlms". ¿Desea qué intentemos recuperar el máximo de contenido posible? Si confía en el origen de este libro, haga clic en Sí. Le quito las macros y sigue dando el error. No se donde puede estar el error. No sé si tendrá algo que ver qué dicho archivo se abre en windows y en mac indistintamente. Muchas gracias por vuestras sugerencias.

Hola. Lo primero felicitar a tod@s por la ayuda prestada. Os cuento, he estado buscando en el foro si ya había alguna respuesta a mi consulta y, la verdad, es que hay unas cuentas pero todas con alguna variedad que me hacen perderme un poco (o bastante..) por lo que pido disculpas si este tema ya ha sido solucionado antes. En fin, lo que necesito, como bien dice el título, es pasar los datos diariamente desde un pestaña que uso como "cajón" para introducir los datos, a la pestaña definitiva desde donde luego uso dicha información. Como los datos se van acumulando, dicha macro deberá ir siempre a la primera fila vacía. Adjunto ejemplo. Un poco de ayuda, por favor. Much…

buenas noches, tengo una inquietud que me la adquiri al ir de tema en tema y encontrarme un archivo llamado agenda el cual es lo mas parecido al concepto basico de automatizacion, pero al estar probando el contenido me di cuenta que tiene un error un tanto fatal que no supe como resolver y es que la parte de busque no lee la cantidad de filas y columnas y la verdad no entiendo porque se pasma cuando contiene demasiados datos, he aqui mis preguntas ¿no se supone que debe leer el maximo de filas y columnas?, ¿como puedo hacer para que ello funcione si suponieramos que estan llenas las filas y columnas especificadas?, ¿como seria entonces el codigo para que funcionara como s…

Hola foristas, tengo un listbox "Plan" que se va llenando gracias al listbox "Ali".... En el listbox "Plan" se va a agregando un indice (que hace referencia al numero de fila que se encuentra el alimento en la hoja "Alimentos"), la cantidad y la unidad.... Dependiendo la cantidad y del indice, hago unas cuentas y me da un valor de carbohidratos, lipidos y proteínas que tiene y se agrega estos valores a los labels (tanto a la comida y al valor total) Lo que quiero hacer es como hacer que cada items que se va agregando al listbox realice esta cuenta, y si la modifico que también modifique esta cuenta. Function ProporcionDia y ProporcionComida la realiza siempre y cuando…

Buenas Tardes:Soy nueva en esto de las macros. quisiera que me ayudaran para crear una macro donde me concatene 3 columnas A B C D E F 43020963 43146540 23/05/2012 VACIO 1 492114960Lo que quiero es concatenar primero B2&A2&F2 y el resultado lo ponga en la columna D donde esta vacia esa columna Espero me puedan ayudar .Gracias.

Saludos Estimados. Me gustaría saber si alguno de los usuarios del Foro ha creado algún archivo del test AMITAI, sería posible que lo compartieran?. Saludos

Hola, deseo crear una imagen con extencion PNG de una rango de datos de Excel y guardarlo en una rita especifica, pero al realizarlo, me doy con la sorpresa que la nitides no es la misma que cuando lo hago manualmente, como hago con una macro para que la nitidez de la imagen no cambie.

Buenos días a todos...necesito una mano para resolver esto; es lo siguiente, esta macro no me arroja los datos dentro de la tabla, me lo arroja muchos mas abajo, ya intente de mil manera resolverlo pero no llego a la solución...agradecería si pueden decirme donde está el error..la idea es que me arroje los datos a partir de la fila "A7 " y de ahí en adelante..la celda "A7", tendría las fechas seria posible que esto me los ordenes?;.....dejo la macro y el link del archivo..gracias Private Sub CommandButton3_Click() Dim MES As String ' BOTÓN REGISTRAR Dim UltFila As Long MES = ComboBox4.Value If MES <> "" Then Sheets(MES).Activate …

Tengo un archivo quisiera generar una macro que me extraiga la información de las transacciones ordenadas en una hoja de excel y no encuentro la manera de solucionar ya que tiene varios emcabezados, Gracias por su ayuda adjunto archivo de ejemplo. 20131009_20131009.txt

Buenas noches amigos de AyudaExcel me conseguí código de la Web para enviar la hoja activa de excel pero hay un problema o error al abrirse el inputbox para tipear el nombre de la hoja y querer cancelar la acción con el botón "Cancelar" el envío la macro no se sale y continúa quisiera que al dar cancelar se salga de la macro; en este código no se diferencia la acción de de cada uno de los botones ya que da lo mismo aceptar o cancelar. Gracias por su ayuda Option Explicit ' Sub EviarHojaEmail() ' Dim NombreArchivo As String Dim RutaTemporal As String Dim Mensaje As String ' On Error Resume Next ' Mensaje = "Estás a punto de enviar la hoja activa por…

hola a todos, me gustaría saber si hay alguna forma de pasar varios txt con datos, a 1 solo csv ó xls, pero que cada txt esté en una hoja diferente pero todo en el mismo libro........ Espero haberme explicado Gracias y un saludo

Buenos días, gusto saludarles. Tengo el siguiente código: Private Sub cmb_tipo_persona_Change() Dim valor, rango1, celda1, rango2, celda2, rango3, celda3, rango4, celda4, rango5, celda5 As Range Set rango1 = Hoja2.[Personas_Físicas] Set rango2 = Hoja2.[Sistema_de_Banca_de_Desarrollo] Set rango3 = Hoja2.[Empresarial] Set rango4 = Hoja2.[Corporativo] Set rango5 = Hoja2.[Sector_Público] valor = cmb_tipo_persona.Value cmb_tipo_cartera.Clear lbl_tipo_cartera.Caption = "" Select Case valor Case Is = "Personas_Físicas" For Each celda1 In rango1 cmb_tipo_cartera.AddItem celda1.Value Next celda1 …

Buenos dias compañeros seria posible que me ayuden con el siguiente tema, quiero hacer una macro que me compare los dos últimos datos de una columna dinámica de tal manera que si el ultimo es mayor tome el promedio de los dos dos datos y si es menor tome ese valor. Además después se compare con el ultimo dato de una columna de otro libro de tal manera que se tome el menor de estos dos. Agradezco en lo que me puedan orientar, estaré atento a sus comentarios.

Buen día, Me gustaría saber cómo bloquear celdas con fórmulas en un libro que contiene un código Visual Basic que oculta dichas celdas. Pues si se quiere bloquear las celdas con fórmulas, al momento de ejecutar el código de Visual Basic para ocultar dichas celdas aparece: Se ha producido el error “1004” en tiempo de ejecución: No se puede asignar la propiedad Hidden de la clase Range. A modo de aclaración el código de Visual Basic está asociado a los controles Active X de casilla de verificación. Cuando las casillas de verificación se marcan ocultaran ciertas filas para hacer más fácil la impresión. Resumiendo me gustaría bloquear celdas que contienen formulas sin que…

Hola, Necesito ayuda con un código y agradecería mucho si alguien me echara una mano. Necesito dos cosas y después de horas no hay manera de conseguirlo, soy un negado para la programacion. 1. Hacer que cada vez que el codigo de proveedor cambie inserte una fila entre los dos. 2. Hacer que cada vez que haya una fecha que sea anterior a la fecha de sistema se ponga en color rojo. A lo que habia llegado es a : Sub () Private Sub Worksheet_SelectionChange(ByVal Target As Range) On Error Resume Next Range("A2").Select Do Until IsEmpty(ActiveCell) If ( ? ) Target.EntireRow.Interior.ColorIndex = 42 End If ActiveCell.Offset(1, 0).Select Loop End Sub Cualquier ay…

Tengo un problema a la hora de ejecutar mi macro en ocasiones no existe un nombre en mi reporte, y en ese momento la macro se detiene, como hacer para que no se detenga se que tengo que agregar unas lineas con la palabra "Falce" pero no se se donde adicionarla Este es el inicio de mi macro, que debo hacer para que en caso de que no encuentre "ACTIVO A CORTO PLAZO" siga en ejecución la macro ya que si no tengo en mi reporte la frase "ACTIVO A CORTO PLAZO" se detiene y me manda un error Cells.Find(What:="ACTIVO A CORTO PLAZO", After:=ActiveCell, LookIn:= _ xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _ xl…

Buenos días Chic@s; Que tal estáis??, ya estamos a viernes ;) Ayer se me vino a la cabeza una mejora para una de las macros que tengo pero…..me fallan cosas. Tengo una macro que hace una consulta SQL a una base de datos Access, esa consulta en vez de llevármela a un Excel, quiero que me la muestre en un userform ( la cantidad de columnas y de filas a mostrar de la consulta puede variar ) y que pueda ordenar los datos al pulsar sobre el encabezado ( esto es lo que veo más difícil ). Lo que he hecho en alguna otra ocasión ha sido, hacer la consulta, abrir un nuevo Excel, copiar los datos en ese nuevo excel, mostrarlo en un ListBox y una vez consultado, c…

Comprobar números en un textbox mediante macro Hola a todos, Mi pregunta es la siguiente. ¿Cómo puede verificarse que en un textbox sólo haya números, de cualquier tipo: enteros, decimales, etc? Por ejemplo: -Bien: 100; -50; 50,5 -Mal: "100 "; --50; 50.5; H Cuando pongo esto para comprobar si en el textbox2 hay un número o no: If [U][B]IsNumeric(CDec(textbox2))[/B][/U] = False Then Msgbox "Error"[/CODE] Me da error de VB (el de programa, de Finalizar o Depurar, el "no coinciden los tipos") cuando por ejemplo pongo una letra (simulando "un error al introducir un número"), y no puedo llegar al Then. Pongo anidado el CDec porque si pongo una coma "," para escribi…

Hola buenas tardes. Les comento que recien empezé a incursionar en esto de las macros por necesidad, pero se poco y nada de VB. Estoy tratando de que, luego que un usuario llene una planilla excell 2007 (solo una hoja) al apretar un boton llamado "Enviar", por medio de una macro se genere un mail en Lotus y copie en el cuerpo del mismo, un rango de celdas. Estuve leyendo un monton en el foro, y llegue hasta la ayuda de Ron de Bruin. De ahi tome la macro "Lotus Notes: Send data from a range as part of an e-mail's body", que ya muchos de ustedes deben conocer, pues entiendo que este tema está muy difundido. Pero mi problema es que debido a mi ignorancia, no puedo solu…

Buenos Días compañeros, Se me presenta un problema con la ejecucion de una macro que estaba armando para que los graficos me cambien de color, los graficos me cumplen la condicion si el relleno de cada barra lo dejo con el color que necesito , pero a la hora de cerrar y abrir el archivo y ejecutar la macro, las barras con porcentaje 0% cambian su relleno en automatico, dejando las barras de color azul.El codigo actual es el siguientePrivate Sub Mes_Click()' Datos a Mes Abril''Muestra Hojas Para Realizar CambiosSheets("Dashboard").SelectSheets("Tablas").Visible = TrueSheets("Dashboard").Select'Cambia Formulas de AcumuladosApplication.ScreenUpdating = FalseRange("B24:C25").…

Buenas tardes amigos, un saludo, uds saben si es posible ejecutar unas macros que fueron desarrolladas en Windows de excel y tratar de ejecutarlas en excel de Mac? , tengo un archivo que usa macros y me han pedido que se pueda utilizar el archivo en una máquina de MAC, pero al abrirlo este me despliega un mensaje que el archivo que intento abrir tiene errores y que excel de mac podría repararlo en su máxima capacidad, realizo el proceso y me descompone el formato así como no me traslada los códigos de macros, no se si debo tomar en cuenta algunas variaciones que necesite saber para modificar mis código y pueda llevarlo a ejecuta a excel de mac. muchas gracias!

hola buenos dias, tengo una macro que copia una hoja( ingreso), me copia el contenido y renombra la hoja con fecha del informe pero el problema que se me genera es cuando no modifico la fecha sigue corriendo la macro me crea otra hoja pero no renombra la hoja con la fecha porque ya existe en otra. mi consulta es ¿ cómo puedo hacer para que se detenga la macro y que me avise en un mensaje que la fecha del informe ya existe y no se puede guardar ? para solucionar el problema adjunto la macro Sub guardar() Application.ScreenUpdating = False Sheets("ingreso").Copy After:=Sheets(1) ActiveSheet.Name = Range("d13") Sheets("ingreso…

Tengo un libro “Presupuesto de Obra", el Cual tiene una Hoja llamada Presupuesto, que contiene las Columnas: Ítem, Descripción, unidad, Vr unitario y Vr Total. También tiene una hoja llamada: “1.1” (su nombre hace referencia a los datos de la celda (A9) de la Columna Item, para Hacer esto, necesito una macro o modulo que Copie la Hoja “1.1” y tome su nombre de los datos de las celdas siguientes en la Columna Item de la Hoja Presupuesto. Luego de llenar los datos en la Hoja Copiada, lleve el resultado a la celda (I50 Subtotal APU)correspondiente de la columna Vr unitario de la hoja presupuesto. Gracias por su apoyo. Presupuesto de Obra.zip

Hola amigos del foro : Bueno tengo uan consulta ya que soy nuevo en excel cual seria la funcion correcta para tener como resultado un reporte con valores repetidos ejemplo : Un reporte de guia por fecha desde y hasta ; y tambn que genere un reporte x nombre osea q tenga uan opcion para yo poner un valor y k me genere un reporte ejemplo : [TABLE=width: 711] [TR] [TD=colspan: 5]REPORTE DE GUÍAS INROPRINT SAC[/TD] [/TR] [TR] [TD][/TD] [TD][/TD] [TD][/TD] [TD][/TD] [TD][/TD] [/TR] [TR] [TD=colspan: 2]INGRESAR FECHA[/TD] [TD][/TD] [TD][/TD] [TD][/TD] [/TR] [TR] [TD]DESDE[/TD] [TD]01/05/2012[/TD] [TD][/TD] [TD][/TD] [TD][/TD] [/TR] [TR]…

HOLA AMIGOS , reciban un buen saludo, mira tengo este caso quiesiera tener un aventon con esto, he llegado hasta donde mis conocimientos me lo han parmitido se que aqui estan los maestros del tema. Este es el caso: En mi negocio tengo clientes que me deben y otros que yo les debo, bn quiero controlar los plazos ya sea para yo pagar o para que me paguen estos son 5, 10 o 20 dias los flujos son constantes, por ño que me urge tener control sobre esto en el inicio del programa quiero ver la informacion de pagos o deudas que tengo para el dia basado en la informacion para esto tengo un userform1 con un multipage de cobros y deudas, quiero traer a este listboz la info…