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?
8680 temas en este foro
-
Buenas Tardes Chicos, Quisiera me orienten con este archivo que manejamos varias personas, el tema es que en una celda del excel anotan una hora para hacerle una llamada a una persona, quería sabe si es posible que, cuando sea ese dia y la hora , me arroje un mensaje indicando que se debe hacer la llamada , Por favor su orientación, Saludos desde Chile. hora.xlsx
-
0
Reacciones de usuarios
- 1 respuesta
- 1.2k visitas
-
-
Hola de nuevo amigos, por aqui con un problema que me cuesta resolver, les explico, tengo una orden dentro de un evento if If TotalV.Text = Previsto.Text Then TextBox75.BackColor = vbRed End If Esto funciona bien, el problema lo tengo en las matematicas y me da el error If TotalV.Text 10% Previsto.Text Then TextBox75.BackColor = vbRed End If La orden le diria que si el valor del TotalV es el 10% del valor de Previsto me coloree el text. pero me lanza error y me dice que no se puede hacer la operacion Muchas gracias por anticipado por su colaboracion Saludos cordiales
-
0
Reacciones de usuarios
- 2 respuestas
- 727 visitas
- 1 seguidor
-
-
https://ayudaexcel.com/foro/topic/8996-abrir-abrir-y-guardar-link-internet/ Buenos días, El archivo adjunto (Autoria, Juan alias nvr)abre un link de internet y se guarda en una carpeta. pero el link que esta en el archivo adjunto no abre, tampoco se guarda me da error. Echenme un cable, que esta mal en el link. Saludos, César DescargarArchivos3-nvr.xls
-
0
Reacciones de usuarios
- 5 respuestas
- 3k visitas
- 1 seguidor
-
-
Buenas tardes todos Master del Excel... estimados es posible algun control de facturas ? la Idea es que el formulario me Alerte que el Numero de la factura del Proveedor ya fue ingresada (que No se repita en ingreso de una factura del prov.) desde ya gracias Totales.. para uds. atte Milton no se como subir el archivo ya que pesa 570 mb comprimido https://drive.google.com/drive/my-drive
-
0
Reacciones de usuarios
- 4 respuestas
- 1.2k visitas
-
-
Buenas, un favor, tengo un problema con la ejecución de una macro donde quiero que un libro luego de rellenarlo se guarde con otro nombre y se cierre pero cuando ejecuto la macro no se ejecutan esos dos pasos Windows(Lname).Activate Range("D17:F51").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Worksheets("CARATULA").Activate ActiveWorkbook.SaveAs Filename:= KName & ".xlsm", FileFormat:= _ xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False Workbooks(KName).Close …
-
0
Reacciones de usuarios
- 1 respuesta
- 763 visitas
-
-
Buenos días Tengo en mi proyecto el Textbox1 que es el resultado de unir el Combobox4 y el Combobox3. Lo que deseo es que el resultado del Textbox1 busque en la columna G de la hoja Prueba y devuelva el resultado de la columna H al Textbox2. Estoy intentándolo con estas líneas, pero no consigo reaolverlo. ¿Podrían ayudarme? Un saludo TextBox1.Text = ComboBox4.value & ComboBox3.value Set h = Sheets("Prueba") Set b = h.Columns("G").Find(TextBox1) If Not b Is Nothing Then TextBox2 = h.Cells(b.Row, "H") End If
-
0
Reacciones de usuarios
- 2 respuestas
- 2.3k visitas
-
-
Hola a todos: Necesito ayuda con un archivo que tengo, con dos columnas: la columna A con CLAVES y la columna B con FECHAS de todo un año. Con una macro, asigno en la columna C el Nº DE SEMANA de la fecha de la columna B (calculada para Excel 2007). Lo que quisiera es que copie todas las filas, incluida la cabecera, hasta que encuentre una fecha del mes de diciembre del mismo año que tenga como nº de semana el 1 (lo que querrá decir que ya es una semana del año siguiente), las pegue en la hoja2 y las del mes de diciembre con nº de semana 1 las copie y pegue en la hoja 3. Por ejemplo, en el archivo que adjunto necesitaría que copie desde la fila 1 hasta la 8…
-
0
Reacciones de usuarios
- 2 respuestas
- 650 visitas
-
-
Saludos muy comedidos, deseo ayuda para que mediante alguna macro pueda directamente asignar una letra para que la macro se ejecute con Ctrl + la letra de la celda respectiva. En el ejemplo la macro muestrapass manualmente se le asignado la letra "s" y la macro ocultapass se la asignado la letra "o", de esta forma al aplicar Ctrl+s muestra la Hoja PASS y con Ctrl+o oculta la Hoja PASS. las letras se las ingresa en la Hoja PASS Gracias ejecutar macro opciones Ctrl mas letra en celdas.xls
-
0
Reacciones de usuarios
- 9 respuestas
- 1.3k visitas
- 1 seguidor
-
-
estimados se podra realizar la Division de un valor que tenga un Textbox3 por el valor que indique el Combobox1? con resultado en 4Combobox desde ya agradecido atte Milton fecha de pago.xlsm
-
0
Reacciones de usuarios
- 2 respuestas
- 2.1k visitas
-
-
buenas tardes...a todos..los master bueno les comento que en mi Formulario cuando ingreso fecha ejem.11 de marzo y despues al grabar lo lleva a la planilla de excel como 03 del 11 por favor me pueden ayudar a solucionar detalle ..(Gracia Totales) fecha de pago.xlsm
-
0
Reacciones de usuarios
- 4 respuestas
- 2k visitas
-
-
¡Hola! Estoy trabajando en un libro con bastantes fechas y sumas, así que recurrí a un macro para agilizar el llenado de una plantilla. Es algo complejo de explicar pero trataré: Subí un ejemplo con colores para ser mas especifico. Tengo una tabla que ocupo para vaciar datos, con una fecha legal (que me sirve de guía) y fechas de migración con el numero de documentos. Mediante dos combobox selecciono el rango de fechas a trabajar (Hoja "signos" columna A), necesito copiar ese rango de fechas a la hoja "Plantilla" celda C12 en adelante (en el ejemplo use del 22-02-19 al 26-02-19), luego, en D12, deberá buscar la fecha mas antigua del día legal, en el ejemplo corr…
-
0
Reacciones de usuarios
- 1 respuesta
- 858 visitas
-
-
Buenos días Estoy intentando hacer copias automáticas de seguridad del libro de trabajo (libro1.slxm) cada vez que se cierra el libro. Las copias se guardarán en la carpeta Bakup (que se encuentra en la misma ruta que el libro de trabajo), y deseo conservar sólo las tres últimas copias mas recientes. ¿Me podrían ayudar? Un saludo y gracias anticipadas
-
0
Reacciones de usuarios
- 1 respuesta
- 695 visitas
-
-
chicos, Alguien tiene algún ejemplo de al momento de hacer click en un checkbox te cuente 1 y pegue ese valor en una celda(Celda A30), y al momento de volver seleccionar de nuevo el mismo checbox te pegue el valor 2 en la celda A 53 y asi hasta el infinito y mas alla? seria de mucha ayuda para lo que estoy haciendo y no se me ocurre como hacerlo. gracias y saludos
-
0
Reacciones de usuarios
- 1 respuesta
- 748 visitas
-
-
Hola, Tengo varias hojas en un mismo archivo Excel y necesito que pulsando un botón se impriman todas las hojas seguidas, sin que se imprima una hoja en cada folio. Es decir, si tengo 3 hojas y en la hoja 2 no hay nada escrito, que imprima la hoja 1 y a continuación la hoja 3, sin imprimir la hoja 2 que está en blanco. Si pudiera ser, si la hoja 1 solamente ocupa la mitad de la página, que la hoja siguiente se imprima a partir de esa mitad de página. Muchas gracias por vuestra ayuda.
-
0
Reacciones de usuarios
- 1 respuesta
- 2k visitas
-
-
Buenas tarde estimados: Les agradecería me ayudaran a darle una nueva presentación a los registros de una base de datos. Lo que preciso es extraer los datos de la Hoja1 para que los muestre en la forma en la Hoja2 del ejemplo. Gracias de antemano Libro1.xlsm
-
0
Reacciones de usuarios
- 0 respuestas
- 572 visitas
-
-
Buenas a todos, tengo un problema cuando configuro una hoja en la impresora EPSON imprime bien, pero cuando quiero imprimir en una HP o CANON se desconfigura la configuración en la que está bien configurada. Vi algunos archivos de Excel, no sé cómo lo hacen pero en cualquier marca y modelo de impresora imprime bien. No quiero convertirlo en PDF quiero imprimir directamente. Gracias.
-
0
Reacciones de usuarios
- 7 respuestas
- 1.4k visitas
-
-
Buenas tardes, Alguien me podría ayudar a corregir este código que tengo para unir un rango de celdas (varias hojas) en una sola: Sub UNIR() Dim Resp As Byte Resp = MsgBox("UNIR CONTENIDO", _ vbQuestion + vbYesNo, "Microsoft Excel") If Resp = vbYes Then MsgBox "Continuar proceso", vbExclamation, "Microsoft Excel" Application.ScreenUpdating = True For x = 5 To 17 Sheets(x).Select [B28].CurrentRegion.Offset(2, 1).Resize([B28].CurrentRegion.Rows.Count - 2, [B28].CurrentRegion.Columns.Count - 1).Copy Sheets("RV Consolidado").Select [C7].End(xlDown).Offset(1, 0).PasteSpecial Paste:=xlPasteValues Next Application.ScreenUpdating = F…
-
0
Reacciones de usuarios
- 1 respuesta
- 2k visitas
-
-
Buen Día Comunidad, Espero me puedan apoyar, tengo la siguiente macro que me habre un link mediante un ribbon a través del navegador internet explorer y funciona, solo que quiero en caso de tener abierto, lo habra sobre el que ya se encuentra abierto, en una nueva pestaña, Sub ejemplo(Matriz As IRibbonControl) Set WebUrl = CreateObject("InternetExplorer.Application") WebUrl.Navigate "https://ayudaexcel.com" WebUrl.Visible = True End Sub Quedo al pendiente y agradezco de su apoyo,
-
0
Reacciones de usuarios
- 2 respuestas
- 10k visitas
-
-
Buen día Estoy trabajando en una tarea donde tengo que construir rostros y en una hoja de Excel pegar la imagen construida (controles imagen) con los datos insertados en el formulario. Me podrían ayudar? Gracias. Adjunto la imagen del formulario. Lo que me falta es capturar el rostro que ya formé y pegarlo en una hoja de Excel.
-
0
Reacciones de usuarios
- 2 respuestas
- 5k visitas
-
-
La impresion predeterminada en la impresora de mi empresa es en blanco y negro. Como puedo hacer para que una macro VBA que imprime un listado de archivos lo haga en color ?
-
0
Reacciones de usuarios
- 3 respuestas
- 3.4k visitas
-
-
copiar y pegar.xlsx
-
0
Reacciones de usuarios
- 6 respuestas
- 1.1k visitas
-
-
¡Hola! Estoy creando un macro que contiene un formulario para llenar las celdas consecuentes a la selección del combobox que es la fecha. Me he detenido en un punto, donde no se como hacer referencia a la celda seleccionada en el combobox (Fecha Legal). Con esa Fecha lo único que necesito es que al dar clic al botón capturar, vacié esos datos. El formulario ya esta prácticamente completo. Estuve buscando como hacer refencia a la celda que contiene la fecha seleccionada en el combobox pero nada. Muchas gracias. SIGNOS.xlsm
-
0
Reacciones de usuarios
- 13 respuestas
- 7.6k visitas
-
-
Hola amigos por aca de nuevo pidiendo de su apoyo, ten mun userform donde tengo un ComboBox como buscador este funciona bien pero ahora quisiera que al seleccionar o buscar un articulo de la lista del ComboBox1 aparesca la imagen en un control Image1 la cual esta en una carpeta llamada imagenes donde esta el archivo, la imagenes tienen el nombre que aparece en textbox1 Private Sub ComboBox1_Change() If ComboBox1 <> "" Then TextBox1 = Empty TextBox2 = Empty TextBox3 = Empty TextBox4 = Empty ComboBox2 = Empty End If Dim c As Range With Worksheets("Inventario").Range("B2:B1000000") Set c = .Find(ComboBox1, , LookIn:=xlValues, LookAt:=xlWhole) If Not c Is Nothing…
-
0
Reacciones de usuarios
- 0 respuestas
- 1.9k visitas
-
-
Estimados espero que se encuentren bien, para solicitar su valiosa ayuda en complementar la macro que necesito, les explico al cargar los xml a la hoja de excel requiero que en la celda de CFDI Relacionado en la celda "AD" tenga todos UUID y no solo 1, ya que en diversos mxl hace referencia a mas de 2 asi Tambien que extraiga el importe pagado Celda "AE". anexo ejemplo en la hoja si pueden apoyarme se los voy a gradecer mucho. PD. la macros la tome de este foro y estoy intentando adecuarlo a mi necesidad. Saludos Cordiales cfdi.rar
-
0
Reacciones de usuarios
- 0 respuestas
- 639 visitas
-
-
Buen día Por favor su ayuda.. En archivo adjunto encontraran unos datos que debo transformar según las siguientes condiciones: -En cada una de las celdas de la columna A hay una serie de datos de 4 dígitos separados por punto y coma(;). La idea es separar cada uno de esos datos y pegarle la misma información que hay en el resto de la fila, como se hizo de ejemplo en la pestaña "Ejemplo", donde se cogieron los 17 datos que hay agrupados en la celda A2 de pestaña "datos a trabajar", y se utilizo texto en columnas para separarlos y luego se transpusieron en la columna A y simplemente se relleno con los mismos datos de la fila 2. Y hacer esto mismo con todas…
-
0
Reacciones de usuarios
- 6 respuestas
- 1.7k 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 [email protected]
Información adicional: Encontrarás más información en la política de privacidad.