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?
8685 temas en este foro
-
Buenas tardes gusto saludarles. ¿Alguién conoce alguna opción o Macro, que le de una ubicación determinada a un ComboBox? El asunto es que tengo problemas con una macro que oculta un rango que va de fila 10:40, pero que en las filas 41 y 42 tiene un ComboBox en cada una (mas otros que han quedado ocultos en las primeras filas), y cuando la macro corre me indica que "no puede desplazar objetos fuera de la hoja", aun y cuando esos objetos tienen como propiedades "Mover y cambiar tamaños con celdas". Lo que pasa es que ya no quedan filas en la parte superior para alojar esos comboBox, por eso es que se me ocurre que tal vez exista una forma de ubicar dichos objetos en un …
-
0
Reacciones de usuarios
- 6 respuestas
- 2k visitas
-
-
Buenos dias / tardes / noches al foro. Muchas veces uno no recuerda el nombre completo de un archivo, pero si parte de el. Por ejemplo: Nombre del archivo: ManualDeExcelParaPrincipiantes Fracccion que recuerdo: principiantes Lo que necesito es una rutina que me busque un archivo dentro de una carpeta (incluyendo sub carpetas si las hay) por medio de una palabra clave, me despliegue un listado con los nombres de los archivos que contienen la palabra clave y que abra el archivo al hacer click sobre el. El archivo anexo es una adaptacion de una excelente macro del foro que mejore un poco. En ella se puede seleccionar la carpeta donde se desea la busqueda. En el text…
-
0
Reacciones de usuarios
- 3 respuestas
- 2k visitas
-
-
Buen día, Tengo una hoja de Excel en donde se va generando una base de datos con un folio consecutivo, realizo una búsqueda por el número de folio y lo cargo en un formulario donde complementan información y la guardan en otra hoja donde que vinculado por el numero del folio. El problema es que cuando encuentra el folio y carga el formulario no pone los datos, tengo que salir del formulario y volver a buscar y entonces ya lo carga correctamente, una ves mostrado se complementa la información guardo y todo bien, pero busco otro folio y se queda con los datos anteriores, tengo que salir y volver a buscar...Cómo puedo hacer para que lo haga a la primera? Gracias de anteman…
-
0
Reacciones de usuarios
- 6 respuestas
- 2k visitas
-
-
Muy buenas Tengo una macro en excel que añade cuadros de texto (4) en la presentación que está abierta en Powerpoint. El problema es que al pegarlas, automáticamente me cambia el tamaño del cuadro de texto. Ahí va el código ConsumerAcceptanceText = Range("a14").Value ' Valoración clientes y % Model Price ConsumerAcceptance = Format(Range("b14").Value, "#0.0") ModelPriceText = Range("a18").Value ModelPrice = Format(Range("b18").Value, "0%") Vacio = Range("b19").Value PPSlide.Shapes.AddTextbox(msoTextOrientationHorizontal, 250, 100, 170, 170).TextFrame.TextRange = ConsumerAc…
-
0
Reacciones de usuarios
- 0 respuestas
- 2k visitas
-
-
hola a todos, necesitaria si me podrian ayudar en lo siguiente, tengo una macro que me abre una cantidad "x" de paginas web, a veces se cierran algunas de ellas, y lo que necesitaria es, si hay alguna forma de que, al presionar el commandbutton me identifique si la pagina que va a abrir se encuentra abierta o no, en el caso de que se encuentre abierta que no lo haga nuevamente de lo contrario que la abra. gracias saludos
-
0
Reacciones de usuarios
- 2 respuestas
- 2k visitas
-
-
buenas noches vuelvo con una duda bastante loca en el evento worksheet_ change mi pregunta es la siguiente ¿es posible que un evento que un evento que esta en una hoja se ejecute en varios rangos de celdas? mi evento empieza de esta forma: Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range("S14:AW14")) Is Nothing Then On Error GoTo Salida Select Case Target Case "N": Target.Font.Color = vbBlack: Target.Interior.Color = vbBlue Case "DA": Target.Font.Color = vbRed: Target.Interior.Color = vbYellow Case Else: GoTo Salida End Select Exit Sub Salida: Target.Font.ColorIndex = xl…
-
0
Reacciones de usuarios
- 4 respuestas
- 2k visitas
-
-
Estimados: Reciban gratos saludos desde Nicaragua. Quisiera consultarles algo, como puedo hacer para que en un libro de Excel me aparezca una alerta de recordatorio, es decir no que se coloree una celda, sino que me aparezca un cuadro de texto o una ventana diciendo: “TE QUEDAN DIEZ DIAS PARA COMPLETAR Y ENVIAR EL FORMULARIO” dejando establecida que aparezca a partir de una fecha especifica En palabras sencillas seria que tengo un libro en Excel que las personas tienen que enviar el 15 de diciembre, entonces yo quiero que diez días antes les aparezca una alerta de recordatorio diciéndoles: “TE QUEDAN DIEZ DIAS PARA COMPLETAR Y ENVIAR EL ARCHIVO”.Creo que seria un macro…
-
Buenas tardes, me he encontrado con este error (foto) y no he podido dar con cual puede ser la raíz del problema. El archivo adjunto tiene una macro, su función es no escribir todo el reporte (todos los campos) solamente con llenar los campos azules y darle al botón Llenar Reporte, llena los demás datos automáticamente, los links de referencia hacia donde extrae la información están correctos los verifique bien, y si me extrae los datos cuando le doy en No. UT y después le doy al botón Llamar y me consulta bien. No se que pudiera ser, si alguien por ahí le da un review a la macro, como quiera yo estoy modificando, si encuentro el detalle lo comentare, a ver si …
-
0
Reacciones de usuarios
- 5 respuestas
- 2k visitas
-
-
Buenas tardes Deseo que por favor me ayuden con este macro ya que no he podido. Tengo una hoja en la cual deseo insertar un numero de filas empezando en A13 hacias abajo hasta 300 filas como maximo pero dos filas antes del valor total del presupuesto. Conservando las formulas que tienen la fila A12 y dejando en blancoi el campo descripcion. Todo esto en un UserFrom que se activa con el boton NUMERO ITEMS (1-300). Anexo ejemplo, como hago me dice que es muy grande. Muchas gracias
-
0
Reacciones de usuarios
- 7 respuestas
- 2k visitas
-
-
Buenos días, Necesitaría copiar los datos de un libro excel en otro. Pensando hacerlo en macro VBA Lo primero comprobar que el texto de los datos de origen corresponde a un determinado mes y año En función del mes correspondiente completar el número de filas que corresponde (p. ej de la 8 a la 91 en enero). Buscar todos los nombre de la fila del mes ubicados en una columna concreta, en el otro libro (que pueden estar colocados en diferente orden) y copiar el valor de 1 celda desplazada. Mi problema es que no consigo hacer referencia al valor copiado con la función Cells.Find pero igual hay otras fórmulas más optimizadas o que funcionen mejor. …
-
0
Reacciones de usuarios
- 5 respuestas
- 2k visitas
-
-
Hola, tengo un pequeño contratiempo y necesito hacer una macro que me haga lo siguiente, a ver si alguien me puede ayudar: Estando en un libro Excel ejecuto una macro que me copia una tabla en otro libro nuevo creado automáticamente. El nombre del libro que me crea automáticamente es libro1, libro2, depende las veces que ejecute la macro, el que genera por sí solo, pero si detecta que ya existe y quiero cancelar me sale un error(13). La cuestión es que quiero que ese libro nuevo se cree con la fecha y hora actual y así no tendré problemas con el nombre del libro. Tengo hecho la siguiente macro: Sub copiaTabla() ' 'Declaramos las variables. Dim NombreHoja As String …
-
0
Reacciones de usuarios
- 7 respuestas
- 2k visitas
-
-
Llevo varios días leyendo preguntas y respuestas en estos foros sobre macros y he visto que ayudas mucho y por lo tanto te hacen muchas preguntas, nunca creí que tendría yo el honor de que me contestaras a alguna pregunta, muchas gracias me ha ayudado bastante. Soy nuevo en el foro, he estado buscando dentro del foro e indagando pero hasta ahora no logro solucionar la traba que tengo. mi problema es el siguiente: En una hoja de excel un boto abre un formulario para pedir datos de equipo y herramientas a prestar, ese mismo formulario tiene otro boton que abre otro formulario con listbox mostrando, la clave del equipo, otro la descripcion, y otro la disponibilidad, quisie…
-
0
Reacciones de usuarios
- 2 respuestas
- 2k visitas
-
-
buenos dias tengo una hoja de excel conectada a mi base de datos con una consulta que me trae mis inventarios, pero al momento de actualizar datos siempre me pide que ingrese el usuario y la contraseña de mi base de datos. como puedo hacer que ya no me pida esta informacion ya que no le puedo pasar la contraseña y mi usuario de mis bases de datos a los usuarios comunes que estaran utilizando este documento.
-
0
Reacciones de usuarios
- 0 respuestas
- 2k visitas
-
-
Cordial Saludo, Les agradezco inmensamente su colaboración, requiero elaborar una macro que en la hoja 1 me permita al usuario digitar una cédula y en la parte inferior de la hoja 1 traiga toda la información de todas las columnas y filas que tiene esta cédula en la hoja 2(hoja que debe estar oculta por seguridad), la macro solamente debe permitir mostrar la información en la hoja 1 para una cédula digitada. En el archivo excel anexo envío un pequeño ejemplo. Les agradezco infinitamente la colaboración que me puedan dar este fin de semana ya que debo tenerla lista para el lunes a primera hora. EJEMPLO MACRO INFORMACION.xls
-
Buenos Dias Compañero, Trato de terminar este formulario y no puedo, se trata de totalizar los montos filtrados usados en el formulario. Lo que deseo es sumar el total de la columnas "Cost", "Abono", "Total" que estan en la hoja " Invoice Summary" y que se visualicen en los textbox Deuda Total, Total Abono, Deuda Actual. He encontrado soluciones en este foro pero no doy con el resultado quizas lo este haciendo mal. Saludos Jesus ayuda_3_Columnas_1.xlsm
-
0
Reacciones de usuarios
- 4 respuestas
- 2k visitas
-
-
Hola compañeros, Llevo un tiempo con un problema en el siguiente código, y no sé cómo solucionarlo. Private Sub Worksheet_Activate() Cells().Columns().Ungroup ' 1 Columns(4).Group ' 2 Columns(5).Group ' 3 Me.Outline.ShowLevels ColumnLevels:=1 ' 4 End Sub Me gustaría insertar un condicional en la primera sentencia tal que "If Cells().Columns().Group = True Then Cells.Columns.Ungroup", para de este modo ejecutar el resto de las sentencias (la segunda, tercera y cuarta) sin problemas. Pero esa instrucción me da problemas... En otras palabras, un evento tal que al activar la hoja, se agrupen la…
-
0
Reacciones de usuarios
- 5 respuestas
- 2k visitas
-
-
Hola a todos, consulta como puedo hacer para que esta macro me guarde varios archivos en PDF Sub Macro1() Dim nombre As String nombre = Range("d12").Value Range("A5:W51").Select ChDir "C:\INFORMES" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\INFORMES\" & nombre & ".PDF", Quality:=xlQualityStandard, IncludeDocProperties:=True _ , IgnorePrintAreas:=False, OpenAfterPublish:=False End Sub
-
0
Reacciones de usuarios
- 4 respuestas
- 2k visitas
-
-
Tengo un formulario que graba en la última fila vacía que se encuentra de la hoja "Datos". Quisiera que después de grabar el registro, o al cerrar el formulario, la hoja excel hiciese el scroll automáticamente para situarse en la fila en la que se ha grabado el registro. Lo que pretendo es que si lanzo el formulario cuando tengo en pantalla las filas 1 a 20 (por ejemplo), pero el registro se graba en la 300 (primera fila vacía), vea en pantalla dicha fila sin tener que ir a buscarla con el scroll. Private Sub cmdRegistrar_Click() Set TransRowRng = ThisWorkbook.Worksheets("Datos").Cells(1, 1).CurrentRegion NewRow = TransRowRng.Row…
-
0
Reacciones de usuarios
- 1 respuesta
- 2k visitas
-
-
Buenas tardes estaba intentando combinar los datos de dos hojas con la misma estructura de columnas y celdas dentro de una hoja diferente, pero existen tanto datos numéricos como de texto, además de celdas vacías por que es un excel que se va rellenando progresivamente. Son dos hojas Seguimiento1 y Seguimiento 2 las dos tienen datos iguales y diferentes dado que seguimiento 2 es una actualización del 1. Quisiera poder combinar los datos tanto de Seguimiento1 como de Seguimiento2 en otra hoja, he probado varias formas pero solo consigo que aparezcan los datos de Seguimiento1 en la nueva hoja y no una fusión entre los 2. En el ejemplo pongo datos en sitios diferentes en c…
-
0
Reacciones de usuarios
- 21 respuestas
- 2k visitas
- 1 seguidor
-
-
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…
-
0
Reacciones de usuarios
- 5 respuestas
- 2k visitas
-
-
Buenos días, estaba interesado en vincular el valor de una celda a un textbox de un userform, a continuación subo un ejemplo de un user form que agradeceré eternamente a Gengis y en el que explico lo que necesito. En la hoja1 hay un botón de formulario vinculado a un userform, pues necesito que cuando aparezca, en el textbox del campo Rango, aparezca ya vinculado el valor de la celda A1 de la hoja2, en este caso: B1:B10 Un saludo y muchas gracias. Ejemplo.rar
-
0
Reacciones de usuarios
- 0 respuestas
- 2k visitas
-
-
ESTIMADOS buenas noches , nuevamente vengo... si es posible me ayuden (Pls) en el Userform3 tengo un boton que dice Eliminar ( la idea es que borre datos de la hoja 2 ) y No se como hacerlo ... disculpen me ayudarian con la sintaxis... Descarga Historica 2 eliminar.xlsm
-
0
Reacciones de usuarios
- 3 respuestas
- 2k visitas
-
-
Buenas. Primero de todo he de decir que soy un principiante en VB, y es la primera vez que entro en un foro, así que pido disculpas por cualquier equivocación que pueda cometer de antemano. Segundo felicito a todo el mundo que participa en ayudaexcel por la gran ayuda que prestan en general, se esté dado de alta o no. Entro en la consulta. He realizado un formulario con Excel 2003 con ventanas de validación que registran los resultados en una hoja llamada “Basededades” y mediante un buscador las devuelve pudiéndose modificar y se pueden volver a grabar en la misma hoja. El problema está en que lo he probado hacer con “userforms” y “Comboboxs”, y no consigo realizar t…
-
0
Reacciones de usuarios
- 1 respuesta
- 2k visitas
-
-
Holas a todos, veran tengo este problemita. secede que tengo un libro llamado bitacora y este funciona con un form que se conecta mediante SQL todo esto en el mismo libro y funciona perfectamente. Ahora quise pasar el formulario y el modulo donde esta la conexion sql a mi otro proyecto osea tengo ahora una carpeta llamada prueba dentro de esta el archivo bitacoras y el otro akelos es te ultimo el principal, a este le agregue el form de bitacoras y el modulo de la conexion. pero l ejecutarlo no funciona el form de la bitacora no se conecta. me pueden ayudar a conectar a este libro de bitacoras . Option ExplicitPublic Cnx As New ADODB.ConnectionPublic Rst As New ADODB…
-
0
Reacciones de usuarios
- 10 respuestas
- 2k visitas
-
-
Buenos días, A ver si me podéis ayudar porque por mas que busco y leo no encuentro la solución. Igual la explicación es un poco farragosa. Tengo este tozo de código VBA generado por un script de SAP que básicamente lo que hace es abrir una Tx de SAP, cargar los datos de búsqueda y generar un informe. Luego ese informe lo exporta a Excel, y por ultimo lo guarda en la ubicación elegida. Hasta aquí todo correcto. El problema es que solo funciona si la ruta de guardado es local, pero no si es un SharePoint, me explico. La idea es que haga todo lo anterior y guarde directamente en un SharePoint donde están configurados los permisos para guardar. No se si algu…
-
1
Reacciones de usuarios
- 11 respuestas
- 2k visitas
- 3 seguidores
-
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.