Macros y programación VBA
Temas sobre la automatización de Excel utilizando macros y VBA. Errores de VBA. ¿No consigues que tus macros hagan lo que necesitas?
8682 temas en este foro
-
Estimados. Por favor agradecere su ayuda en lo siguiente, tengo una tabla con ventas de articulos, necesito saber cuales son los articulos que tienen movimiento y si no tienen movimiento durante los ultimos 5 meses deberia agregarse el signo "X" al final de la tabla, por favor su apoyo al respecto. Subo el archivo Ayuda.zip
-
hola, necesitaria si se puede eliminar el excel que contiene la macro en uso. Si no se introduce bien la clave y para que no generen copia Lo que pense es que se cierre el libro y se elimine, puede ser con la instruccion: ThisWookbook.close y luego kill mas el Path en donde esta? pero no me lo toma, como podria hacerlo?
-
Veamos tengo la siguiente duda se puede capturar un hwnd de cualquier objeto que este en el userform?, por el momento logro esta acción sobre el userform con el uso de api pero no lo logro para por ejemplo un combobox Para la captura del hwnd uso lo siguiente Option Explicit ' declaración api '''''''''''''''''''''''''''''''''''''''''' Private Declare Function FindWindowEx Lib "user32" _ Alias "FindWindowExA" _ (ByVal hWnd1 As Long, _ ByVal hWnd2 As Long, _ ByVal lpsz1 As String, _ ByVal lpsz2 As String) As Long ' función para la captura '''''''''''…
-
0
Reacciones de usuarios
- 2 respuestas
- 1.9k visitas
-
-
Buenas Necesitaría a partir de un desplegable que debe repetirse en una columna a lo largo de varias filas, poder seleccionar varios elementos que queden separados por comas. He encontrado una forma de hacerlo añadiendo este código al excel, pero necesitaría modificarlo para: 1. Que me permita borrar los valores si me equivoco 2. Que me permita arrastrar a lo largo de las filas, y que lo que arrastre sea el desplegable y no los valores seleccionados en la fila anterior. A ver si me podeis ayudar Gracias! Este es el código: Private Sub Worksheet_Change(ByVal Target As Range) 'UpdatebyExtendoffice20180510 Dim xRgVal As Range Dim …
-
0
Reacciones de usuarios
- 3 respuestas
- 1.9k visitas
-
-
Estimados foreros: Acudo a su maestría para ver si me pueden ayudar con un problema de importación de TXT a Excel que tengo. He reutilizado, adaptándola, una macro que creó el maestro @Haplox y que mostró en este foro para otro compañero con un problema parecido al que ahora planteo. Aprovecho para agradecerle su propuesta, porque me ha sido muy útil. A lo que vamos... Verán, tengo un archivo de texto delimitado por puntos y coma, el cual quiero importar a una hoja de Excel, pero los datos de cada fila del TXT deben situarse en celdas NO contiguas. He retocado la macro de @Haplox, pero no logro que la importación se realice como yo necesito (se importan los…
-
Buenas tardes, Creo que este es el foro mas acorde a mi consulta, de no ser así, pido disculpas. Soy un usuario de Excel aficionado y tengo un nivel básico, no he trabajado nunca con macros ni programación, por lo que si mi consulta es muy absurda, tambien me disculpo. Ahora la duda. Tengo un Excel con una serie de datos ordenados en una lista (Digamosle Hoja1) con una columna de identificador y una segunda pestaña con una plantilla para imprimir (Digamosle Hoja2). En esta plantilla (Hoja2) introduzco el identificador y con formulas simples se me actualizan los campos necesarios con los datos de la fila correspondiente del identificador de la (Hoja1) y pulso imprimi…
-
0
Reacciones de usuarios
- 0 respuestas
- 1.9k visitas
-
-
Hola de nuevo, estoy haciendo una agenda (que he copiado de Internet) el caso es que me funciona todo menos lo de búsqueda por palabra o nombre, el código me he asegurado, es idéntico que el original (de Internet) pero me da error, podéis ayudarme ? me gustaría que la búsqueda la hiciese por "nombre" Mando un ejemplo del programa Muchas gracias Teléfonos.xlsm
-
Hola, Tengo una problema con unas columnas lo que sucede es que tengo muchas columnas de 27 filas cada una y quiero que todas esas columnas solo esten en una, por ejemplo: 1 | 2 | 4| 2 | 4 | 6| 3 | 5 | 8| . | . | . | . | . | . | . | . | . | 27 | 3 | 5| -------------------------------------------- Y al final quiero que quede asi en una sola coumna: 1 2 3 . . 27 2 4 5 . . 3 4 6 8 . . 5 ---------------------------- Lo podria hacer copiando y pegando pero el problema es que tengo algo d…
-
0
Reacciones de usuarios
- 0 respuestas
- 1.9k visitas
-
-
Hola! amigos(as) del foro hace poco me descargué este archivo de autoría de @JSDJSD El problema que tengo es intento cambiar la imagen del icono que lleva como nombre: AccessRefreshAllLists por otra de preferencia, tratando de cambiar en esta parte: imageMso="Inicioprueba" insertando la imagen en el editor, a pesar que al momento de validar el editor Office RibbonXeditor no salta ningún error, no realiza el cambio de la imagen. <!-- Created with IDBE RibbonCreator 2019 (Version: 1.1003) --> <!-- http://www.ribboncreator2019.com --> <!-- http://www.ribboncreator2019.de --> <customUI…
-
0
Reacciones de usuarios
- 2 respuestas
- 1.9k visitas
- 2 seguidores
-
-
formulario con combox buenos días, podríais ayudarme en la hoja que os envío?, Tengo un formulario en la primera hoja para se introducir datos y se añadan automaticamente en las hojas enero, febrero,...... hasta diciembre. He intentado con varios códigos vba que he visto en el foro, pero no hay manera.. gracias, control gastos y presupuesto anual.rar control gastos y presupuesto anual.rar
-
0
Reacciones de usuarios
- 4 respuestas
- 1.9k visitas
-
-
Buenas Noches, encontre un archivo con una macro para un archivo de consolidacion que estoy generando, pero no encuentro la forma de que junto con la informacion, en cada fila, me ponga en la celda de la "E" correspondiente, el nombre del archivo del cual esta obteniendo la informacion. Espero alguien pueda ayudarme con este tema. Incluyo archivo zip con el ejemplo. Saludos Consolidacion.zip
-
0
Reacciones de usuarios
- 11 respuestas
- 1.9k visitas
-
-
Buenos días Tengo una duda de si se puede hacer un multiplicación con vba solo cuando aparezcan unos valores determinados. Me explico: En el combobox1 tengo una selección ( montar cabezal) en el combobox2 tengo seleccionado (0.75)y en el combobox3 tengo seleccionado (48). La idea es que la formula actuara solo cuando apareciera esa selección en el combobox1. " montar cabezal = 48*0.75*0.25"-(0.25 es una constante) . Este resultado se mandaría a una columna de un listbox Gracias de antemano
-
0
Reacciones de usuarios
- 2 respuestas
- 1.9k visitas
-
-
Hola! Qué tal? Estoy intenando hacer una mini base de datos en Excel para mi trabajo (Debe ser en Excel si o si y el libro se usará para compartir) Quiero aclarar que soy principiante en tema de VBA y me manejo un poco con Macros pero no es mi fuerte, estoy aprendiendo. Solo necesito un formulario para ingresar datos (Lo cual hice un invento para que funcione ya que no puedo utilizar Tablas y luego compartir el libro) pero se me está complicando la parte donde debo buscar a los pacientes para luego agregar información, les dejo el archivo para ver si me pueden tirar unas ideas. La idea del proyecto es la siguiente: Trabajo en un Consultorio Médico que tiene su parte de Od…
-
0
Reacciones de usuarios
- 27 respuestas
- 1.9k visitas
- 1 seguidor
-
-
Estimados Buenas Noches Acudo a uds una ves mas para solicitar de vuestra valiosa ayuda. Arme un codigo de la siguiente manera, me ayude de google para llegar a este: Sub AbrirWeb() Dim IE As Object Set IE = CreateObject("InternetExplorer.application") IE.Navigate "http://www.mercadopublico.cl/Portal/Modules/Site/Busquedas/BuscadorAvanzado.aspx?qs=1" Do DoEvents Loop Until IE.readystate = 4 IE.Document.getelementbyid("txtSearch").Value = "2239-14-LP14" IE.Document.getelementbyid("btnBusqueda").Click IE.Visible = True 'Posibilidad de obtener codigo fuente 'IE.Visible = False End Sub[/CODE] Este código me abre la pagina web, lo hago así porque deb…
-
0
Reacciones de usuarios
- 0 respuestas
- 1.9k visitas
-
-
Hola amigos tengo el siguiente código para cargar una imagen: Private Sub foto_Click() On Error Resume Next Dim Ruta, Lista As String Ruta = ThisWorkbook.Path nombre = Worksheets("MATRIZGENERAL").Range("b6").Value If Lista = "" Then Exit Sub marcofoto.Picture = LoadPicture(Ruta & "\prueba\" & nombre & ".jpg") End Sub [/CODE] y todo funciona el problema es que cuando las imagenes son muy grandes solo se ve una parte en el cuadro marcofoto (image), como puedo solucionarlo para que redimensione la fotografia antes de cargarlo al marco y poder ver la foto completa. espero puedan ayudarme. saludos
-
0
Reacciones de usuarios
- 1 respuesta
- 1.9k visitas
-
-
Hola Amigos del Foro Recurro a su valiosa ayuda para avanzar en un archivo que he venido adaptando para una automatización que requiero. Tengo 2 Archivos 1.-Filtro Archivo.xlsm 2.-Mayor.xlsx El archivo 1.-Filtro Archivo.xlsm tiene 2 Hojas 1.a.- En esta hoja “PROFIT” esta la data de la información a filtrar en 5 columnas Código/Fecha/Referencia/Descripción/saldo CODIGO FECHA REF DESCRIPCION SALDO 110102 31/1/2020 4 223 0000008291 TRAN,J306725024AUTOMERCADOS PLAZA'S, C.A./J306725024 AUTOMERCADOS PLAZA'S, C.A. …
-
0
Reacciones de usuarios
- 9 respuestas
- 1.9k visitas
-
-
Estimados para la siguiente consulta adjunto programa de ejemplo Requiero ayuda para completar el programa de gestión de bodega que adjunto en este mensaje. En la portada del programa hay 3 enlaces para las distintas bodegas. Si vamos a una (cualquiera) les mostrara un listado de productos los cuales están hiper vinculados (hacemos clic en cualquiera de los productos) y nos llevará a su hoja respectiva. Hasta aquí esta todo bien. Ahora la idea es que el encargado de bodega respectivo complete la información de la fila correspondiente y haga clic en el enlace "Obtener Comprobante" y luego debiese aparecer una ventana consultando que número de comprobante es el que quier…
-
0
Reacciones de usuarios
- 0 respuestas
- 1.9k visitas
-
-
buena tarde, solicito de su ayuda ya que genere este código, pero al agregarle la parte cells select se atora y si se lo quito corre bien el problema es que las hojas se quedan formuladas por eso necesito que se peguen en valores espero me puedan ayudar. saludos [/hr] Sub crear() Dim n As Integer Dim i As Integer Dim a As Variant n = 4 Sheets("PARAMETROS").Select For i = 1 To 14 a = Cells(n + i, 1) Range("I2").Select ActiveCell.FormulaR1C1 = a Sheets("RESUMEN").Copy Cells.Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False …
-
0
Reacciones de usuarios
- 0 respuestas
- 1.9k visitas
-
-
Muy buen día, Tengo una macro la cual busca datos de una columna y concatena todos los números, exceptuando el "6011". El problema es que los concatena desde abajo hacia arriba, necesito que sea al veres. Adjunto el archivo, dentro hay un cuadro explicando como funciona.Plani.xlsm Si existe una formula que simplemente tome ese concatenado y lo haga al revés, seria perfecto! Saludos.
-
0
Reacciones de usuarios
- 3 respuestas
- 1.9k visitas
-
-
Hola amigos por aca de nuevo hoy les pido el favor haber si se puede claro, miren necesito un macro para que a la hora que seleccione yo una celda (C7) me aparesca un calendario y aque cuando yo seleccione una fecha me lo escriba en la misma celda(C7), diciendome algo asi: 02 de Septiembre del 2012(en ese formato), lo mismo para la celda (C8), es decir que aparesca el calendario y todo lo demas. Esto es para mi ya conocido formato de Todofiesta cosolea. si lo necesitan lo vuelvo a subir. gracias y saludos a todos.
-
0
Reacciones de usuarios
- 3 respuestas
- 1.9k visitas
-
-
Hola a todos.. de nuevo con un problema..tengo un excel con 4 bancos y cada una trabaja con varias monedas..diariamente tengo que ingresar, actualizar o eliminar operaciones de cada tabla.. lo que quiero es que en una hoja..solo seleccionando el banco y la moneda me llame a la tabla pedida y pueda ingresar las operaciones...y se guarde automaticamente o a traves d otra macro...les adjunto el excel... de antemano agradesco sus aportes :wink: BANCOS.zip
-
0
Reacciones de usuarios
- 1 respuesta
- 1.9k visitas
-
-
Muy buenos días compañeros del Foro Yo soy bastante nuevo en esto de BVA y lo poco que se lo he aprendido por mi cuenta investigando en internet y preguntando a personas que ya lo manejan. Estoy realizando un formulario en Excel 2007 en el cual voy a digitar los datos obtenidos en una encuesta en papel. El problema que tengo, debido a mis pocos conocimientos, es que no se como asignarle a un TextBox un rango de valores más un valor extra. Por ejemplo: el Textbox1 quiero que solamente acepte valores de 1, 2, 3, 4 y 99. Sé como hacer del 1 al 4, pero añadirle el 99 no tengo idea como hacerlo, ya probé varias formas pero no lo he logrado hasta el momento y les agradecería…
-
0
Reacciones de usuarios
- 4 respuestas
- 1.9k visitas
-
-
Buenas tardes, Tengo una tabla en la que capturo bastantes datos relativos a horarios de salida de vehículos y los retrasos que se producen en cada evento de salida. Registro cada retraso en franjas de 15 minutos (0:15), hasta un máximo de 4 horas. En la tabla tengo insertadas en la celdas destinadas a registrar éstos retrasos una lista desplegable que contiene cada uno de esos valores (0:15, 0:30,......,3:45, 4:00). El problema es que la tabla, para que muestre la mayor parte de los datos, tiene aplicado un zoom de 70% y la hora de desplegar la lista en esas celdas hace que los valores de lista se vean demasiado pequeños. Por ese motivo había pensado en que cada vez q…
-
0
Reacciones de usuarios
- 1 respuesta
- 1.9k visitas
-
-
Buen dia Tengo la siguiente macro que lo que hace es generar un archivo en txt, subi un ejemplo de como me genera las polizas (poliza 3) Esta macro toma los dados de una sola fina, lo que necesito esque la funcion se repita en varias fila, por ejemplo, si se corre en dos filas me debe de crear el txt con la informacion de las dos filas, subo un ejemplo de como necesito que quede en la poliza 2. Si alguien me pudiera ayudar meseria de mucha utilidad de antemano gracias. Póliza3.txt pólizas2.txt
-
0
Reacciones de usuarios
- 3 respuestas
- 1.9k visitas
-
-
Buenas tardes, Quisiera que me ayuden con un problema que tengo lo que pasa es que tengo una base de datos de algo de 2000 correos a los cuales quiero enviarles mi publicidad pero todos los correos estan en un cuadro de texto y asi no los puedo importar a outlook adjunto una muestra de como estan los correos a ver si alguien puede ayudarme con una macro ya que estoy en 0 de como hacerlo. Gracias anticipadas. otro.rar
-
0
Reacciones de usuarios
- 1 respuesta
- 1.9k visitas
-
Información básica de protección de datos
- Responsable: Sergio Andrés Celemín
- Finalidad: Moderar y responder comentarios de usuarios. Recuerda que la información que facilites es pública, y los datos que incluyas los leerá cualquier visitante de esta web, así como el avatar que poseas.
- Legitimación: Consentimiento del interesado.
- Destinatarios : Hetzner Online GmbH.
- Duración: Mientras se conserve este post o hilo en la comunidad, o decidas eliminar el comentario.
- Derechos: Puedes ejercitar en cualquier momento tus derechos de acceso, rectificación, supresión, oposición y demás derechos legalmente establecidos a través del email sergio@ayudaexcel.com
Información adicional: Encontrarás más información en la política de privacidad.