Beunas noches. Tengo un formulario en el cual llevo trabajando algunos días, bueno bastantes. Lo que pasa es que tengo una macro que guarda los datos del formulario a una hoja de excel, pero al darle clic en registrar me sale un error "Se a producido el error 13 en tiempo de ejecucion, No coiciden los tipos" Si alguien pudiese revisar mi archivo para decirme en que estoy mal. Se los agradezco.

Hola a todos Estoy buscando la forma de hacer un grafico sobre el cual al mover con el mouse una linea de un punto x' a otro punto x'', el resto del grafico se autoregenere basado en una ecuacion que lo respalde. Para hacer una ilustracion grafica de lo que busco, tomemos como ejemplo google.maps, cuando nos traza la ruta de un sitio a otro, y tiene varias alternativas, si tu con el mouse desplazas la linea hasta un punto de la nueva ruta, el sistema hace el resto. Es posible hacer esto en excel ?

Hola a todos, tengo una macro que saque de otro foro y cuyo autor es Logroastur@2012, yo modifique mi archivo para que funcione, pero necesito cambiar la macro para adaptarla a mis necesidades, basicamente es un buscador que contiene 3 optionbutton que son los que deseo modificar para que al seleccionar el tipo de busqueda lo haga de acuerdo a la opcion elegida, claro esta que por la falta de conocimiento no puedo hacerla, asi es que recurro a ustedes para ver que solucion me pueden brindar, gracias. se podra poner un boton de borrar en lugar de elegir del desplegable para que lo haga? Buscar - copia.rar

Hola: Queria saber si es posible generar una macro que me ajuste los altos de fila según esta necesidad: a. autoajuste b. si el alto que resulta de lo anterior es menor a 50 autoajustar a 30 Bueno eso seria Gracias

Buenos días y agradecer de antemano la atención Tengo dos pestañas y necesito el código para que cuando no encuentre un dato en la pestaña 1 lo pase directamente a la ultima fila de la pestaña dos. En el fichero adjunto, sería buscar en la pestaña " Original" la columna B (Nº expediente ) y cuando no lo encuentres, pasa los datos a la pestaña "Copia" en la siguiente fila disponible. Gracias de antemano y un saludo PLANTILLA CONTROL CMRS2.rar

Hola. Tengo una macro que inserta un archivo PDF como attached file. Lo que ncesito es que además al final del cuerpo del correo agregue una magen jpg que hará las veces de firma. Ya buqué en el foro y no encontré como hacerlo. Anexo el archivo de Excel con las direcciones ejemplo y que también incluye la macro y una imagen que sería la firma. Mil gracias de antemano por la ayuda. Saludos. Directorio De Patitas.xls

Buenas tardes. recurro de nuevo a ustedes para ver si me pueden apoyar. Tengo esta macro que guarda toda la informacion de un userform, pero quiero que se detenga si el Textbox3 no es igual a cero, el textbox3 debe ser iagual a Cero para continuar el procedimiento. Private Sub CommandButton3_Click() 'Seleccionar hoja Sheets("Corte").Select 'selecionar rango de celdas a insertar Range("A10:S10").Select 'Inserta Celdas SEleccionadas Selection.Insert Shift:=xlDown 'Copia y pega los rangos seleccionados Range("A9:S9").Select Selection.Copy Range("A10").Select ActiveSheet.Paste 'Finaliza apliaccion Application.CutCopyMode = False Range("C10").Select 'grabamos los dato…

Hola: Por favor necesito ayuda en el siguiente problema: Tengo una lista desplegable en A1 con 2 entradas. Quisiera que al seleccionar la entrada No. 1 de la lista, la celda B1 automáticamente quedara en cero o en blanco (y si es posible, bloqueada para que no se puedan ingresar datos) y que al seleccionar el dato No. 2, se pudiera ingresar un valor manualmente en la celda B1. Muchas Gracias Juan Luis

Hola a todos!!! Mi problema es el siguiente: Tengo una hoja de calculo, en el cual tengo alrededor de 200 textbox's y quiero saber como puedo hacer una clase para poder manejarlos a todos por igual, estoy usando excel 2007 y vb Gracias de antemano

Amigos tengo la siguiente macro: Sub Ocultar() Dim r As Range Application.ScreenUpdating = False ActiveSheet.Unprotect Rows("21:500").Select Selection.EntireRow.Hidden = False For Each r In Range("A21:A500") If r = 1 Then r.EntireRow.Hidden = True Next r Application.ScreenUpdating = True End Sub He probado distintas formas para que queda mas rápida porque es demasiado lenta, he hecho por ejemplo ciclo for, la he separado en distintos rangos, he llamado con otra macro los distintos rangos, pero nada, nose como dejarla mas eficiente. ayuda amigos muchas gracias

Buenos días, ¿alguien sabría decirme si es posible importar datos de una web que tiene un boton para exportar datos a Excel?, al pulsar ese boton se abre el diálogo para efectuar la descarga, hay que aceptarlo y al momento se abre una excel con los datos importados, esto quería hacerlo en automático con Excel, ¿me podríais dar alguna pista de por donde van los tiros? (he utilizado el buscador y he visto muchas consultas sobre importar datos Web, eso es sencillo, pero no encontré nada con un botón de exportar a excel en la web...) Gracias! Un saludo.

Buenos días Tengo el siguiente código pero las condiciones en lo marcado en azul son más de 100 por lo que la línea se me hará infinita. Hay alguna otra forma de poner las condiciones usando más líneas ( no solo una ) o bien que vaya a buscar a un rango determinado donde estén todas las condiciones a buscar Paso fichero donde el rango a buscar sería de la pestaña CLIENTES. el rango D4:D25. Sub DESPRECIAR() Dim I, J As Integer J = 8 'DONDE EMPIEZA A ESCRIBIR For I = 4 To 4000 ' DONDE EMPIEZA A BUSCAR If Range("EXPORTACION!N" & I) = "CLIENTE 1" Or Range("EXPORTACION!N" & I) = "CLIENTE 3" Then Range("FILTRO!b" & J) = Range("EXPORTACION!B" &amp…

amigos tengo una macro que al parecer unicamente me esta abriendo un libro, veran intento abrir varios libros que estan almacenados en la columna "I", desde i2 hasta i26.. pero no funciona, me pueden ayudar. Gracias. Anexo codigo: Sub ejemplo() For i = 2 To 24 Workbooks.Open "C:\Users\Gerardo\Documents\EXCEL ARCHIVOS\" & Worksheets("hoja1").Range("L" & i) Next i end sub[/HTML]

Hola a todos Necesito crear un filtrado de datos mediante combobox dependientes(ya lo he obtenido y funciona). Mi duda surge a la hora de poder visualizar esos datos. en un listbox. tengo 5 columnas, y la idea es que mediante el filtrado de los combobox, aparezcan los resultados de la quinta columna en el listbox (por ejemplo, si elijo en el ejemplo un pais, una tecnología y un cliente, deberán aparecer los cursos) Os adjunto el archivo donde aparece todo y el listbox sin funcionar (en vacio). Agradecería mucho si alguien me puede echar una mano, ya que ando bastante verde en estos temas. un saludo y gracias por anticipado COMBOBOX DEPENDIENTES.xls

Hola amigos, tengo la siguiente macro: Sub Tabla_de_Excel_a_Word() 'Copia el rango de Excel seleccionado en un nuevo documento Word Sheets("Reporte").Select Range("C8:T20,C89:T92").Select 'copiar rango selecionado Selection.Copy 'Crea nueva aplicación Word Dim swMSWord As Word.Application Set swMSWord = New Word.Application With swMSWord .Visible = True .Activate End With 'Abre nuevo documento Word swMSWord.Documents.Add 'Pegado con vínculo de las celdas Excel swMSWord.Selection.PasteSpecial link:=True 'Libera el objeto Word Set swMSWord = Nothing End Sub La cual copia mis tablas de Excel a un Word, pero tengo dos problemillas y necesito de …

Buenas, estoy creando una Herramienta de consulta sobre distintas bases de datos de costos de servicios, estas bases de datos son independientes entre si, por lo que cada una puede variar independientemente de otra y en distintas fechas. Y estoy buscando la mejor forma de crear la herramienta para que se puedan consultar los distintos costos de las familias de servicios y dentro de estas familias ademas se pueda seleccionar uno o varios servicios en particular. Ademas de eso me interesaría que dentro de cada familia se puedan actualizar los costos de los distintos servicios facilmente. Pero eso es un tema aparte, primero me interesa que se pueda mejorar esta herramienta…

Hola a todos tengo un problemilla tengo una lista con una serie de datos, mi pregunta es la siguiente: habria alguna macro capaz de leer en la columna Ahasta donde ponga TOTAL PROVEEDOR y concatenar los datos de la columna n? Gracias a todos por vuestro tiempo y la labor de aprendizaje un saludo 01-Prueba.xls

Hola, Estoy teniendo un problema a la hora de distribuir un texto en varias columnas. Estoy trabajando con un fichero de datos de una encuesta, el cual de momento sólo tengo en un .txt y me gustaría pasar a .csv para trabajar con él en SPSS. No tengo manera de separar en celdas de forma automática porque no tengo un separador concreto, no hay comas, los espacios no coinciden necesariamente con nuevas celdas, etc. Decidí hacerlo manualmente ya que tengo los datos de donde empieza y acaba cada columna, pero se me hace tedioso y da lugar a errores al hacerlo de manera manual. ¿Existiría una macro capaz de separarlo en columnas de forma que yo metiera el número de de carac…

buenas foreros mi consulta es la siguiente tengo este trabajao de excel que busca archivos de microsof. en carpetas luego uno elige cual abrir de las opciones que le presenta dicho buscador. lo que quiciera es que no solo habra archivos de excel. si no tambien jpg y archivos .EXE o cualquier otro tipo de formato, trate de hacer configurarlo pero sin optener buenos resultados espero la ayuda de ustedes gracias. Abrir archivos.xls

Buen día: Antes que nada gracias por el apoyo. Tengo una macro la cual me cuenta los colores que se colocan en una celda mi duda es como seria para contar también por valor numérico. De hecho el fin es que que me cuente por las dos condicionantes por color rojo y por valor numérico que si en dado caso una celda este de rojo y no tenga numero no me la cuente y que esto sea por fila. Gracias por el apoyo anexo Excel. contar color.rar

hola Compañeros Un favor Ayuda No consigo ordenar Estas Cuentas.. para un informe y para hacer unos estados Financieros Ayuda Gracias Cuentas.rar

Buenas tardes En un determinado rango tengo unas celdas con un montón de fórmulas y condicionales y de ellas algún resultado me da error ( #¡DIV/0! ). Para evitar añadir a la ya complicada fórmula la función SI.ERROR , necesitaría un código desde VBA que me diese resultado cero al encontrar error. En el fichero adjunto sería el rango C8:G8 . Gracias de antemano por la gestión y el tiempo y un saludo Rafael ELIMINAR ERROR EN RANGO DETERMINADO.rar

Hola, He planteado este tema en otro ya cerrado, lo vuelvo a subir. Tengo un listado de 7.000 líneas y necesito eliminar aquellas cuya suma sea 0. He intentado adaptar una macro, y funciona, pero solamente con las columnas que se ponían de ejemplo. En mi caso son 11 columnas y no he sido capaz. Adjunto las cabeceras. El subtotal lo incluyo en el debe y haber para cambios en la columna "proveedor". Saludos Cabeceras.xls

buenas necesito ayuda en un tema me gustaría que poder filtrar un listado de datos explico en el fichero que adjunto tengo varias columnas en las cuales aparecen la identificación del empleado en otra columna aparece su hora de entrada y salida varias veces al día lo que necesito es poder calcular entre la primera entrada y su ultima salida cuantas horas ha estado el empleado en la empresa no olvidemos que la cantidad de entradas y salidas puede variar de un empleado a otro una vez echo esto poder compara estos datos con un listado que tengo en cual aparece las horas que estamos pagando al mes a este personal . ejemplo.xls

Buen dia; En una hoja tengo desde el rango A2 hasta A100 nombres de Maquinarias y del rango B1 hasta AF1 fecha del 01-ene-2013 al 31-ene-2013. La intencion es que mediante un userform seleccionando la fecha con un DTPicker, en un ComboBox seleccionar la maquina y en un Texbox1 escribir un valor x. seleccionar celda intersectada por ambos valores buscados y colorcar el dato introducido en el Texbox 1. He intentado con el metodo Cells.Find pero no obtengo resultado. Espero Ayuda de su parte. Saludos...