Estimados Estoy de a poco entrando en el fascinante mundo de programar en VB, pero me falta mucho por aprender. Por esta razon , necesito ayuda para crear la siguiente macro: - Realizar una macro que permita ingresar la edad de una persona a través de un inputbox y Muestre un mensaje si es mayor de edad o no. Tengo este codigo, pero algo le falta al parecer: Public Sub prueba() X = MsgBox("Desea Continuar", vbYesNo + vbQuestion, "Opción") End Sub Muchas gracias saludos meggido

Hola!, ando teniendo un problema y no encuentro exactamente lo que necesito por internet, ni dentro del foro. Tengo un libro, que la primera y segunda hoja contienen direcciones y fechas. Y una tercera hoja que se llama planificado, en la cual tomando el parametro de la fecha actual, necesitaria que me copie los datos de la primera y segunda hoja sumandole 1 día. Ejemplo: Hoy es 24/07/2012, que copie los datos del 25/07/2012 (la idea seria saber a que lugares tengo que ir con un día de anticipación). Si alguien me podria dar una mano, o guiar un poco como armarlo, estaria muy agradecido!. Muchas Gracias dias.rar

Buenas tardes grupo Recuro a usted a ver si alguno me puede ayudar con un problema que tengo. Tengo mi configuración regional en español (los campos numericos el searador de desimales esta con una coma "," ). el problema surge cuando quiero enviar datos al SQL que esta en ingles que el separador de desimales esta con un punto "." llevo semanas intentando con varias alternativas y ninguna me funciona todas dan error [microsoft][ODBC SQL Server Driver][SQL Server]error converting data type varchar to numeric Algunas de las alternativas que he probado son las siguientes. Sql = Sql & "'" & Format(ActiveCell.Offset(0, 8), "[en-US]…

Hola a todos, en primer lugar os deseo Felices Fiestas a todos. Vuelvo con consultas para ir completando mi trabajo de simulaciones genéticas en Excel. Necesito ayuda con una de las plantillas que utilizo para definir caracteres en la aplicación. En su día @Antoni me ayudó escribiendo una macro para que cuando se seleccionara una celda de la plantilla, esta se coloreara con un color seleccionado previamente. Esto funciona muy bien, pero ahora necesito ampliar la funcionalidad de ese macro para definir más ampliamente los caracteres que uso en las simulaciones. Intento explicar lo que necesito. Adjunto el archivo de Excel con el que trabajo. Están visi…

Buenas, Me gustaría encontrar una macro o función que me permita buscar en el texto de una celda y en función de lo que encuentre devolver un valor u otro. Por ejemplo... si el valor de una celda es "Carlos"... la fórmula podría buscar si es "arlos" y devolver un "Hola Carlos", pero si el valor es "Luis Manuel"... poder buscar también "Luis" y que te devuelva "Hola Luis"... Es como concatenar varios IF de texto (usando *) y que te devuelva un valor u otro dependiendo de lo que encuentre... ¿Alguien me puede ayudar? Muchas gracias

Hola amigos del foro ante buenas tardes con todos disculpen espero se encuentren bien aquí escribiendo esperando puedan ayudarme tengo 02 problemas al ejecutar unas macro. 1.- En la Hoja RUC cuando ejecuto la macro "GENERA ARCHIVOS ZIP" no me sale el resultado deseado que son los datos de la columna "E" 2.- En la Hoja VALIDA CPE cuando ejecuto la macro "GENERA TXT" no me sale con la cantidad deseada que son datos de 100 en 100 y me esta arrojando diferentes cantidades a estos. adjunto mi archivo esperando me haya dejado entender gracias. adjunto el archivo pero me dice que es pesado, adjunto un link gracias. https://we.tl/t-EqX8pdb74a

Muy buenas noches, junto con leer varios temas similares y descargar bastantes archivos que habían en la pagina para poder seguir la idea , mis intentos han fracasado. Les cuento... Tengo una base de datos a la cual le pude crear un código para que guarde ciertos datos específicos, como nombre apellidos teléfonos etc , hasta ahí todo bien. Mi problema es que no he podido colocar bien los códigos del formulario " buscador" en el Visual Basic. He leído demasiadas cosas, pero no soy un gran entendido de excel. La idea es si en buscador coloco el apellido y le doy al botón buscar , encuentre los datos que le pido. Desde ya agradezco su tiempo por leer y tratar de ayudarme . …

Buenas para todos, he visto en algunos temas anteriores la realización de mapas, ahora mi consulta es la siguiente: Dispongo de un archivo en el cual voy seleccionado las ciudades y van apareciendo los nombres de los mismos, y a más de ello ¿es posible agregar la cantidad de habitantes por Densidad de puntos? Desde ya agradecería sus me puedan encaminar. Mapa Central.rar

Hola a todos, Necesito transponer una matriz y además cada fila que se genera en la nueva matriz copiarla 14 veces. Luego si tengo la matriz con las siguientes columnas ABCDE... me deberia quedar de esta forma: A´ ... A´ B´ .... B´ C..... Donde A´ corresponde a la columna transpuesta y se debe repetir 14 veces. Adjunto el archivo correspondiente, la columna que necesito transformar en la que se llama variables relevantes. Gracias y Saludos! Variables relevantes.zip

Hola a todos, acá nuevamente solicitando su tiempo para el siguiente inconveniente que tengo ? La siguiente macro, encontrada en la web, me funciona a la perfección. Sin embargo, cuando el archivo esta en uso crea un nuevo archivo temporal con la extension (.ldb) y es ahi donde la macro no funciona. Como resolver este inconveniente? Sub CopiarArchivos() FileCopy "Y:\INVENT.mdb", "Y:\INVENT2.mdb" End Sub Saludos

Buenos dias chicos Me gustaría crear una macro que me sumara las cantidades del campo "coste" en funcion de las fechas limite introducidas con anterioridad y que correspondan a cada tipo de producto. Os mando el archivito, porque creo que me explico como un libro cerrado. Un saludo y gracias macro entre fechas.rar

hola buenos días amigos forista antes que nada agradezco a todos los que se tomaron la amabilidad de leer mi post, un saludo especial para el Gran Macro Antonio y para Bigpetroman que siempre me han ayudado con sus ejemplos comentarios y sujerencias, bueno la duda que tengo es saber si es posible mediante una macro Exportar una tabla de una base de datos de access a otra bd de access (manualmente desde la base de datos se puede hacer ya que existe la opciòn de importar e exportar) pero quisiera saber si esposible automatizar esto mediante una macro desde excel de antemano muchas gracias a todos. EJEMPLO.rar

Hola buenas, me gustaría saber cómo hacer una macro que me coloree una fila según el criterio de una celda. Tengo una columna "tipo" en la que puede haber diferentes valores, pero quiero que por ejemplo en la celda que aparezca la palabra "garantía" aunque luego haya más palabras me marque la fila de color rojo. ¿Es posible o tiene que ser el texto exacto? Muchas gracias. Saludos. color fila.xls

Buenas tardes, tengo este formulario, lo que quiero hacer es que dando click en un option button el criterio sea solo el señalado es decir, si doy click en codigo que me filtre los datos del listview por el codigo escrito en el textbox respectivo, si doy click en nombre que lo filtre solo por el nombre escrito en el textbox y asi tambien con el combobox. en el listview se muestra la totalidad de datos que estan en una hoja de calculo. Por favor si alguien puede ayudarme con un ejemplo seria fenomenal. muchas gracias

Hola!! Soy nuevo aquí con ustedes esperemos y alguien pueda ayudarme!! Tengo una macro que me manda información de Excel a Word y a partir de esta información estoy generando un reporte. El reporte fue generado a través de una plantilla de word *.dotx. y esta es abierta con la macro para que se añada la información. Debido a que tengo un procedimiento muy largo lo dividí en varios procedimientos, esto funcionó perfectamente el problema es que cuando comienza el siguiente procedimiento no me toma el documento activo para que siga generando el reporte. En seguida colocó un ejemplo del código: Private Sub Inicio_Click() Dim datos(0 To 1, 0 To n) As String patharch…

Hola buenas, Necesito ayuda porfavor, tengo una fuente de datos (pestaña Prueba) donde el combobox están los datos del campo "Datos" y no me sale que al seleccionar un dato del combobox se desplieguen todos sus id y nombres correspondiente en una celda de excel. Ejemplo: si en el combobox selecciono Perú, en la misma celda de excel se debería desplegar todos sus datos. Favor si alguien me puede ayudar estaría muy agradecido. Adjunto link: https://drive.google.com/open?id=1Bbog2UwVWrCbfmAuDEoAeVdD5FgIRpIv Saludos

Hola: Tengo un archivo con todos los iconos de Excel y sus face-id, pero no consigo encontrar algunos de ellos. Hay tantos, y en tan poco espacio, que seguro que los he tenido delante y no los he sabido ver. A ver si alguien me echa una mano para encontrar los que se muestran en la imagen. Gracias [ATTACH]40845.vB[/ATTACH] Nota: Os dejo este link con el archivo por si le interesa a alguien https://dl.dropboxusercontent.com/u/241435/Todos%20los%20iconos%20de%20Excel.xls Al abrir el archivo, hay que tener un poco de paciencia ya que tarda un poco en visualizar los iconos.

Hola: Necesitaría una macro para importar varios txt en un directorio a un mismo archivo excel. Buscando en el foro he encontrado este hilo, y el archivo excel con la macro que se indica me funciona bien: https://www.ayudaexcel.com/foro/macros-programacion-vba-10/pasar-varios-txt-al-mismo-libro-diferentes-hojas-24406/ El único problema que tengo es que necesitaría que los txts los importa con la opción de separación por espacios y no por comas. Esta opción la puedo elegir si importo un txt únicamente mediante la barra de herramientas común, pero en el caso de la macro no se si se pudiera cambiar, bien modificando el código, o bien modificando alguna opción general del …

Muy buenas, tengo un formulario donde se debe de actualizar datos de una tabla mediante un botón, el problema que tengo con el código es que solo me corre cuando actualiza un celda pero cuando añado para que me actualice mas celdas de una fila me sale el error 1004. Agradeciendo de antemano por su ayuda. Private Sub BT_Modificar_Click() Dim fila As Object Dim linea As Integer Dim MENSAJE As String valor_buscado = Me.TXT_Cod Set fila = Sheets("BASEdeDATOS").Range("A:A").Find(valor_buscado, lookat:=xlWhole) linea = fila.Row MENSAJE = MsgBox("¿ESTÁS SEGURO DE EDITAR LOS DATOS?", vbQuestion + vbYes…

tengo la siguiente macro que es un boton para ordenar los estudiantes que van a revision con sus notas (la cual son formulas todas) y datos como cedula, fecha de nacimiento, lugar de nacimiento, sexo. Se ordena por la columna de la cedula (HD) pero hace como que si ordenara todo pero solo ordena una columna la GK, las otras entre GL y HL desde la fila 475 hasta la 513 no las ordena, la macro es la siguiente: Sub Botón1327_AlHacerClic() ' ' ActiveSheet.Unprotect Range("EL383").Select ActiveCell.FormulaR1C1 = "REVISION" Range("GK475:HL513").Select Selection.Sort Key1:=Range("HD475"), Order1:=xlAscending, Header:=xlN○ _ (Selection.Sort Key1:=Range) error…

Buenos días: La macro que adjunto puede copiar y almacenar en orden todas las hojas de un libro. Por ejemplo tengo 3 hojas (a,b y C) con encabezados comunes (de B5 a J5) y filas variables. Crea una hoja llamada "Resumen" y copia en ella con encabezados incluidos, todas las filas y de forma ordenada sin dejar espacios. Sub ejemplo() 'por luismondelo Sheets.Add after:=ActiveWorkbook.Sheets(ActiveWorkbook.Sheets.Count) ActiveSheet.Name = "RESUMEN" For Each hoja In ActiveWorkbook.Sheets If hoja.Name <> "RESUMEN" Then hoja.Range("b5:j" & hoja.Range("b65000").End(xlUp).Row).Copy Sheets("RESUMEN").Range("a65000").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlVa…

Buenas Tardes, Necesito extraer de una tabla que tengo en Access el valor máximo del campo "PEDIDO" y que lo deposite en la celda B2 de la Hoja1 de Excel al dar click en un CommandButton de un formulario de Excel.

Amigos... Quisiera su apoyo en el siguiente problema de excel, tengo el libro con los datos de ingreso y devolucion (salidas) de un determinado mes, lo que deseo es que en la hoja stock me muestre la cantidad de materiales restando el ingreso y egreso, pero teneiendo en consideracion el estado (N o R), osea sumara materiales que sean iguales en estado y lo mismo pasaria con la resta (devolucion). Apreciare su apoyo acostumbrado al foro. Saludos cordiales ejemplo 2.xls

Hola buen día, Estimados tengan una excelente mañana, favor su ayuda si se puede extraer el formato de celda personalizado (solo la moneda) a otra celda. En la columna A y B tengo los siguientes datos y necesito extraer la moneda a la columna C y que mede el resultado en la columna D, he realizado un código muy largo me gustaría saber si se puede optimizar o alguna mejor forma de hacerlo. mil gracias HELP.xlsm

buenas noches, dispongo de una macro que me entrega para cada celda un valor distinto de 0 (dentro de un rango de celdas), al utilizar ciclo for, no obtengo todos los resultados inmediatamente (algunas celdas siguen con valor 0, por la naturaleza de los datos de entrada), por lo que debo ejecutar la macro varias veces hasta que se rellenen todos los datos del rango con un valor distinto de 0 como puedo ejecutar la macro de forma automática varias veces, hasta que todos los valores de mi rango, sean distintos de 0? muchas gracias