Hola buen día.. Necesito una macro que me haga lo siguiente Tengo un textbox dentro de un formulario cuyo contenido lo arroja en la hoja activa, al darle aceptar, este contenido del textbox, se completa al seleccionar en un listbox que extrae de una base de datos, es decir de otra hoja...hasta ahi todo funciona...pero como hacer para que al ser diferente el contenido del textbox pueda yo escribir en este, y me lo pueda reemplazar en la base de Datos?...cuyos datos se encuentran el la columna F a partir de la fila 2.. Tengo estas lineas de código pero no me actualiza la base de datos que está en la hoja 27 pero se llama RUC empresas..no se si ahi esta el error o e…

Buenas, tengo el siguiente problema, una vez genero la fecha d, los valores que extraigo son erróneos y me sale por defecto en año = 1905, mes = 01(enero) y día = 29, cuando obviamente no estamos a esa fecha. No he encontrado la solución por ningún sitio, y estoy un poco verde en esto, si alguien me puede echar una mano lo agradecería! Saludos Private Sub ComboBox4_Change() 'Se utiliza para poder generar un numero de oferta Range("B3").Select Selection.End(xlDown).Select seleccion = ActiveCell.Row d = Date y = Format(Year(d), "yyyy") m = Format(Month(d), "mm") dia…

Hola buenas tardes, Tengo un problema para comparar tres filas en excel, se los agradecería demasiado si me ayudasen. Estas son las tablasTabla 1: Tabla:2 Necesito una formula o una macro en donde me compare: -Entidad de la "Hoja1" es igual a la Entidad de la "Hoja2" -Municipio de la "Hoja1" es igual a la Municipio de la "Hoja2" -Localidad de la "Hoja1" es igual a la Localidad de la "Hoja2" Si se cumplen las 3 condiciones que copie Numero A de la "Hoja2" a una columna de la "Hoja1" Les agradecería mucho su ayuda

Hola, En la macro que adjunto al momento de darle doble clic a la casilla de chequeo (check box), excel me pone un check y me lo tacha, al igual que el tema. En qué parte puedo modificar la macro para que no me tache las palabras?? Por favor su ayuda. Check_list_prueba.xlsm

buenas espero que estén bien, necesito de su ayuda ya que estoy aprendiendo a manejar el excel a nivel macro, ya e vistos muchos vídeos y e leído mucho y no consigo la solución que busco tengo este formulario, me funciona muy bien pero quiero colocarle el PasswordChar = "*" y no doy con esa solución Private Sub LOGS_Click() CLAVE_LOGS = InputBox("EXCRIBA SU CLAVE") If CLAVE_LOGS = "w21052014r" Then Sheets("LOGS").Visible = True Sheets("LOGS").Select Else MsgBox ("CLAVE INCORRECTA!!!") Sheets("portada").Select End If End Sub si hay alguien que me ayuda por favor

Buenos días a todos, Primero que todo estoy en proceso de aprender, por tal motivo recurro a ustedes para que me orienten o me ayuden a resolver el siguiente problema, ya que no he sido capaz a traves de una macro o como ustedes me puedan guiar, es lo siguiente: 1. Tengo un archivo con varias hojas, que vienen hacer los días del mes, en el ejemplo el Archivo se llama "Datos_Prueba" y los días son 16-17 y 20 2. Se generan unos registros día a día de las filas 1 a la 19, de 20 a la 39, de la 40 a la 59 y de la 60 a la 80, esto es porque hay varios módulos por cada representante de ventas y se tienen 20 filas por cada uno de ellos. 3. Hay una Base de Dato…

Hola, quisiera saber si hay forma de conectarme a sql server pero con otro usuario de red de windows. Esta primera cadena, realiza la conexión pero con usuario local de sql server: cn.ConnectionString = "provider=sqloledb.1;data source=DESKTOP-GRP18I3;user id=prueba;password=prueba;initial catalog=prueba" Esta segunda cadena, realiza la conexión pero con el usuario que en ese momento esta logueado en la PC: cn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=True;Data Source=lims\ts;initial catalog=Prueba" Ambas funcionan correctamente sin embargo quisiera saber si es posible poder utilizar la segunda conexión, pero…

Estimados amigos del foro, me gustaría lograr hace desde Excel que se pueda copiar y pasar el modelo de texto que esta en la primera pagina de word a la siguiente pagina, si vuelvo a aplicar la macro se continua en la siguiente y así sucesivamente Subo el archivo de wor para que revisen, en este archivo esta una macro que hace lo que quiero pero esta en codigo macro de word, pero quiero hacerlo desde excel Se puede?? Gracias por su apoyo. PruebaPagWord.docm

Buen día, amigos espero puedan ayudarme, estuve buscando modelos para poder ejecutar mi pequeño proyecto, pero me perdí en el intento de interpretar códigos, necesito ayuda, saben mi problema es el siguiente: tengo un libro llamado rendiciones, consta de tres hojas bd, consulta y rendición, la hoja rendición es la principal, deseo que mediante el comando consultar pueda derivarse a la hoja consulta y al ingresar un dato en la celda pueda filtrarse información de la base de datos, DESDE YA AGRADESCO INFINITAMENTE SU APOYO. RENDICIONES.xlsx

Buen dia! Tengo esta inquietud.. Tengo esta formula Sub ordenarfiltro() Sheets("Mantenimiento").Activate Range("a2").Select Range("A2:J2").Select Range(Selection, Selection.End(xlDown)).Select Selection.Sort Key1:=Range("a3"), Order1:=xlDescending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal End Sub Ahora yo quiero que si la celda "A2" esta vacia, la macro no corra. Osea que no pase nada.. eso es para el caso de que aun no se hayan llenado valores en la tabla. Simplemente eso.. Gracias!!

Hola... Tengo una serie de datos estimados y necesito automatizarlos para obtener la Campana de Gauss de una manera más rápida, usando como base el archivo adjunto. Coloqué una imágen que refleja como debería ser el resultado final, hombres del lado izquierdo en color azul y mujeres del lado derecho. La idea es obtener la Campana de Gauss con proyecciones de más años, por ello la intención de automatizar la tarea. ¿Es posible? Apu-1.rar

Buen dia! Hoy estoy trabajando en un programa para controlar tiempos de mantenimientos de maquina. Ya cree un ListBox donde me toma automáticamente todos los datos de una tabla de mantenimiento. LO que estoy buscando es que mi ListBox, ponga la fecha actual (seria la fecha de mantenimiento) solo en las casillas que están seleccionadas. Si están todas seleccionadas, todas. Ya tengo el ListBox que toma la Tabla automáticamente Tengo el Listbox Con las Casillas de Check en multiselection Solo me falta hacer que la(s) casilla(s) seleccionada(s) cumpla(n) una acción. Que seria Poner la fecha actual en la columna "K" Donde corresponda. Y que la fecha sea …

buen dia, hola tengo una super duda, pues como lo dice el titulo requiero pasar datos de un listbox a otro, lo que sucede es que la verdad me cuesta mucho trabajo el utilizar listbox porque me confundo mucho con respecto a los items y el manejo de las columnas e indices, trate de hacer un ejemplo pero no me queda porque solo logro pasar un item a una sola columna del listbox pero quiero que se pase tal cual sea lo que haya en el listbox1 al listbox2 ya que en un futuro pretendo agregar mas cosas en el listbox2 mas lo que ya venia del listbox1. espero darme a entender, dejo el archivo muestra. Saludos listbox aotro listbox.rar

Hola un saludos a todos de nuevo se que esta pregunta no correponde, pero no encuentro como colgarlo de foro correcto pero espero puedan ayudarme estoy trabajando con imágenes en word, se trata de insertar una imagen y que luego esta sea seleccionada y modificada en cuanto a su tamaño, utilizo el siguiente código para insertar la imagenSelection.InlineShapes.AddPicture FileName:= _"C:UsersArturoDesktopFotosListasFoto d (" & nf & ").jpg" _, LinkToFile:=False, SaveWithDocument:=Truela imagen queda insertada en una tabla pero el problema es que se pierde su selección es decir que necesito seleccionarla con el mouse para modificar su tamaño, y como son bastantes …

buenas tengo una consulta, se puede realizar en excel a nivel macro un chat pero no red normal, o algo que se le parescagracias por su tiempo espero su respuesta

Holas, me proporcionaron el sigiente codigo en VB para lograr enviar correos de acuerdo a una condicion. en un rango de correos lista El codigo funciona perfecto, sin embargo, el codigo se monto sobre un ejemplo sencillo, ahora necesito adaptarlo a una hoja mas elabaroda en donde las posiciones de las celdas son distintas NO logro distingir en la lista de instrucciones cuales son las celdas que puedo variar para ajustarlo a la otra hoja. Sub Macro68() '------------------ 'by Cacho Rodríguez '------------------ Dim LD(), C As Range, Q% For Each C In ActiveSheet.ListObjects(1).DataBodyRange.Columns(2).Cells If InStr(LCase(C), "enviar…

Hola a todos Encontré está macro en Internet, la cual me pareció que me podía funcionar, pero, quizás yo esté haciendo algo mal. Explico lo que necesito: Requiero que a través de este formulario me permita filtrar las celdas que contenga los días que señale, por ejemplo: Filtrar la información del 23/06/2016 al 01/07/2016 y que solamente me muestre la información con este filtro de fechas. Anexo un ejemplo que diseñe. Espero que me puedan apoyar. Prueba Fechas.xlsm

Este problema me supera, mis conocimientos en VB son muy basicos, pero de seguro alguno puede resolverlo en menos de 2 min. Necesito una macro que evalue un rango de filas que contienen cada una un correo electronico, si la condicion a evaluar (en un rato comento cual es) se cumple, entonces debe copiar esa direccion o direcciones de correo eltronico y enviar via outlook un correo masivo Tanto el asunto como el cupero del mesaje son iguales, por eso pueden incluirse en alguna celda y tomarlo a aprti de alli, si mas un caso cumple con la condicion entonces se pueden copiar en un solo mensaje todas las direcciones de correo, La condicion …

Muy buen día, tarde, noche. Quisiera solicitar de su amable colaboración en un pequeño inconveniente que estoy teniendo. Estoy siguiendo un tutorial para un sistema de facturación, pero me he quedado atorado en un proceso, el cual es el siguiente: Según el instructor, para continuar con el tutorial se debe descargar un archivo que él dejo en un ejecutable, y que supuestamente me guarda una Dll entre mis archivos, la Dll se llama DllAdo.dll, la cual permitirá realizar una conexión entre Excel y Access, y que todo quedará según él más rápido. La cuestión es que nos indica que se debe crear un módulo de conexión con la siguiente función: '''''''''''DLL ADO ''''…

Bueno tengo 2 ficheros iguales , en nombre y se supone que en todo en sus interior , uno funciona el otro no no encuentro diferencias visibles. Necesito construir una macro que abra los dos ficheros y compare lo que esta en las distintas hojas y en la parte de programacion y de haber diferencias que las muestre. gracias

Buenas noches! Amigos(as) acude a este foro para buscar una solución a lo siguiente: El archivo que he adjuntado cuenta con un formulario vba en la hoja llamada "Datos" el cual se muestra en botón Inicio, este formulario cuenta con un combobox que carga una lista de los datos contenidos de la columna A hasta la columna N. Una vez cargado los datos son seleccionados y se imprimen por medio del botón llamado Reporte, existe forma que me evite ir seleccionando uno a uno el usuario a imprimir? entiéndase que con seleccionar una opción o checkbox imprima automáticamente todos los registros cargados en el combobox. Espero haberme explicado bien y agradezco…

Buen dia amigos Llevaba un tiempo considerable sin aportar ni participar y esta vez vengo a pedirles una orientacion. Cuando realizo busquedas en una base de datos utilizo el siguiente comando basado en un combobox: busq = TextBox1 HojaXX.Visible = xlSheetVisible Set RANGO = HojaXX.Range("a:a").Find(busq) Label1 = HojaXX.Range("G" & RANGO.Row).Value End if Esto es cuando basado en el combo lleno un label o al reves si voy a llenar un campo de una hoja. Pero como hago para llenar un listbox y que basado en los datos insertados vaya a una hoja y los ponga. O sea, por ejemplo. En la linea 1 del listbox introduzco el codigo A con la …

Buen día foro, adjunto un archivo el cual se compone de dos hojas (Hoja1 tabla de datos) y (Hoja3) formato de consulta/reporte) en el cual entre otras la Columna A tiene un numero el cual se ordena consecutivamente, la columna E un numero de Parte y columna G numero de Certificado, lo que estoy batallando es para que tomando como referencia la columna A me aparezcan solo datos únicos y elimine los duplicados, ya que la referencia de la columna G (numero de certificado) si se agrupa en una celda, el link que se genera automáticamente en la columna J ya no me abre puesto que me toma la referencia del certificado todo agrupado y lo nombra con todas las referencias agrupadas.…

Biuenos dias les mando saludos a todos.... Esperando pueda alguien apoyarme.. envio un archivo con una macro que compara los datos dela columna A con AV estos cuando encuentra que son iguales copia la fila desde la columna B hasta la columna AK y la pega todo ese rango apartir de la columna AY enfrente del dato repetido dela columna AV Pueden ejecutar la macro para que vean lo que explico de como funciona Mi solicitud esta en que si alguien me pueda ayudar a hacer algún arreglo a la macro para que funcione de manera mas rapida lo mas posible ya que ejecutar tengo que ejecutar esta macro en tres hojas de dato…

En un excel tengo dos hojas, una es la Base de datos y la otra la que quiero que alimente la base de datos. Hasta el momento tengo una macro que me permite consultar los datos de la base de datos, dados un nombre de cliente y un nombre de presupuesto (BOTÓN BUSCAR PRESUPUESTO). Esta funciona muy bien. Luego he creado otra macro que me limpia la hoja para crear un nuevo presupuesto (BOTÓN NUEVO). Lo que necesito es una tercera macro que, o bien, me cree un nuevo presupuesto pegando los datos que yo le informe en la hoja de BBDD o bien que me los modifique en el caso de que ese presupuesto ya exista en la BBDD, mediante el tercer botón (GUARDAR / MODIFICAR). En el…