Hola, Hace tiempo atrás descargué una macro a través de la cual se puede controlar el puerto Serial del laptop y por lo tanto, se puede establecer una comunicación con un dispositivo serial en protocolo RS-232. Ahora necesito hacer lo mismo, pero utilizando el protocolo serial RS-485 Modbus Alguien tiene alguna experiencia en eso? Gracias

Hola nuevamente muchachos. Espero estén bien todos, es mi mayor deseo. Estoy teniendo otro problema por acá con la configuración de un TextBox donde quiero expresar números. Propiamente el número que va a estar reflejado en esos TextBox son la división del Salario Mensual entre los días a trabajar y eso me da un índice o tarifa salarial diaria. No tengo problemas en las operaciones matemáticas, sino en el formato a expresar en el TextBox. Este dato lo toma el TextBox de la Hoja, la que tengo configurada (Celda) como Numero. Podrían ayudarme. Gracias de antemano y excelente semana para todos. Saludos Pino

Buenas tardes. Tengo el siguiente código en una macro: Sub Prueba() hora = Hour(Now) If hora <= 18 & Sheets("Hoja1").Range("G7") = 1 Then MsgBox ("haz esto") ElseIf hora > 18 & Sheets("Hoja1").Range("G7") = 2 Then MsgBox ("haz esto otro") Else MsgBox ("No se cumple") End If End Sub Sin embargo, siempre se me ejecuta el Else aunque a priori se cumplan las condiciones del If. Adjunto el excel de prueba. ¿Alguna idea del por qué no entra en el If ni en el ElseIf? Gracias Prueba.xlsm

Buenas. Tengo dos preguntas sobre el uso de los formularios. Tengo un label con un texto en color negro, y me gustaría darle el color en hex: #731232 sin embargo, no sé cómo aplicarle este color a la letra. Por otro lado, quería saber si hay alguna forma de que los CommandButton tengan bordes redondeados en lugar de rectos. Gracias de antemano.

Buenas Tardes Foristas. Una vez más acá. tengo una pequeña duda y me gustaría que ustedes me ayuden . Quiero sumar dos o más TextBox y que el resultado me lo ponga en un Label en tiempo real. Necesito el código. Una amistad me dio este, y aunque no me pareció lo implementé y no suma. Private Sub LblImporte_Change () LblImporte.Caption = Val(TxtCantidad.valuie) * Val(TxtPrecio.Value) End Sub Gracias de antemano. Tengan un feliz resto del día. Pino

Hola Tengo una parte de la macro que por MsgBox se tiene que seleccionar un archivo (hasta aquí funciona) Do While Olb <> 1 MsgBox "Selecciona archivo ", , "" Olb = Application.GetOpenFilename If Olb <> "Falso" And Olb <> "" And Olb <> 1 Then Exit Do Loop Pero cuando de ese libro que se ha abierto tengo que seleccionar diferentes hojas y luego copiar, me falla en esta linea: Workbooks.Open(Olb).Sheets(1).Copy After:=Workbooks(2).Sheets(3) Me podríais ayudar a encontrar la solución Saludos

hola buenas, he estado hace un tiempo aprendiendo y desarrollando macros en vba para realizar scraping en paginas web, en una de las paginas que utilizo apareció esta protección del sitio, el posible bypasear con vba? he leído que se puede hacer con phyton pero no conozco ese lenguaje el mensaje que dice es Cheking your browser before accessing "sitio" dejo pantallazo https://ibb.co/wp4mwzP en caso de no ser posible, quizás ya sea momento de aprender otro tipo de lenguaje agradezco mucho la ayuda

Hola alquien me puede ayudar para crear una macro que seleccione solamente la región a la cual ya tiene un autofiltro?

Buenas. Tengo un libro de excel donde dependiendo del valor de unas celdas (Inicio de sesión) quiero que se muestren unas hojas y se oculten otras. Tengo esta macro: If Sheets("Principal").Range("K23") = Sheets("Usuarios").Range("B4") And Sheets("Principal").Range("K24") = Sheets("Usuarios").Range("C4") Then 'Se comprueba usuario y contraseña ''USUARIO1 Dim Hoja As Object For Each Hoja In ActiveWorkbook.Sheets If Hoja.Name = "Inicio1" Then 'Quiero que se vea la hoja Inicio1 Hoja.Visible = True Else Hoja.Visible = False 'Oculta el resto de hojas End If Next Hoja Sin embargo, cuando voy a ejecu…

Buenas Tardes, desde Colombia En un Userform tengo la Columna "A" con fechas y en la fila 1 tengo los datos de unas casas en la celda E1 se llama Casa01 la F1 se llama Casa0y y asisucesivamente hasta la celda O1 , en mi Matriz que va de E2:O50 tengo unos numeros, necesito que cuando el TEXTBOX1 que lo determina la fecha que escribay el COMBOBOX1 que lo determina el numero de Casa que escoja coincidan o se crucen me traiga el numero resultante, como hago, GRACIAS, por mi nivel NO PUEDO INSERTAR EL ARCHIVO

Hola estimadxs! En un proyecto he aplicado la siguiente macro para que la hoja Excel se tape, funciona pero cuando cierro la hoja y vuelvo a abrir la macro deja de funcionar, otra vez se la hoja, mi consulta ? es si pudieran ayudarme, es algo normal o falta algo en la macro para que quede fija. Gracias!!? Private Sub ocultar() Application.DisplayFullScreen = True Worksheets("Dashboard").Select End Sub

Buenos dias, expertos nuevamente solicito su ayuda, lo que pasa es que tengo un formulario que funciona bien, cuando busco un codigo me muestra bien, pero si pongo otro codigo no cambia de imagenes. Adjunto el archivo REPORTES.rar

buenas noches estimados les cometo tengo unas macros en vba excel busco un dato que se encuentra en mi archivo de excel en la columna "A1" en una pagina web y en las columnas a la derecha "B1" "C1" "D1" "E1" "F1" me coloca los resultados me gustaría que me ayudaran si podría recorrer un rango de la columna A y realizar la búsqueda y colocar a la par los resultados cada vez que lo recorre dejo abajo mi código, de ante mano muy agradecido saludos cordiales. ------------------------------------------------------------------------------------------------------------------------- Option Explicit Private Declare PtrSafe Sub Sleep Li…

Buenas tardes expexto, recurro a su ayuda para pedir sus valiosas ayudas, se trata de una dos hojas primero la hoja registro donde registra los pagos desde la columna D en la hoja pagos trabajo muy bien, pero necesito hacer otra macro que me copie los montos dependiendo del numero de cantidades de cuotas y en la fecha donde lo corresponde en la table del lado derecho donde comienza en la columna K. Por favor agradecere mucho la ayuda. Adjunto el archivo. Macro Neo.xlsm

Buenas tardes, Estoy teniendo bastantes dificultades para hacer una macro de un Excel con 2 hojas, donde la macro me señale en la hoja2, en este caso renombrada "To-do" las filas que no están en la hoja1, en este caso "Prio". Quisiera que me coloreará las celdas nuevas de la hoja "To-do", copiara las filas coloreadas y las pegará en la hoja Prio detrás de la última celda llena. Adjunto el Excel con el que estoy trabajando. He intentado coger el vba de un compañero que hacía algo similar, pero no me da el resultado esperado. Muchas gracias! Hinweisschild_Control.xlsm

Hola, Teniendo dos libros abiertos, quiero copiar la hoja1 del primer libro al segundo. El problema surge cuando el nombre del primer libro va cambiando y me gustaría no tener que cambiar en la macro cada vez que lo utilizo y el nombre del primer libro es distinto. Habría la posibilidad, teniendo dos únicos libros abiertos, poner en la instrucción que la hoja1 del primer libro activo la copie en el segundo libro activo. Workbooks("Libro1").Worksheets(1).Copy After:=Workbooks("Libro2").Sheets(2) Saludos

Buenos días a todos;-Os voy a insertar un enlace de mi requerimiento donde os explico un poco lo que quiero conseguir si es posible.Enlace video: Video textBox En la macro tengo un textbox con la propiedad multiline en true.Al ir escribiendo una vez que llegue a un número de caracteres hace como un salto de línea y empieza e escribir debajo para eso lo que hago es ir aumentando el alto del textbox y Frame.Mi idea es que una vez que yo haga clic en el textbox este aumente el tamaño del alto si no coge en la línea hasta hacerlo coger todo y al hacer doble clic que recupere su tamaño inicial.La simulación la he hecho solo aumentando el alto y no sé si se puede tamb…

Hola a todos! Tengo un formulario en VBA para registrar datos en una tabla de excel. Lo que necesito, es que cada vez que se hace click en el botón "Registrar" de mi formulario, en la primera celda de cada fila vaya generando algo así como un Autonumerico con formato "REG-0001" y al volver a cargar datos en el formulario y al apretar nuevamente dicho botón, lo haga con el código "REG-0002" ...03,04 y así sucesivamente.... ¿Alguien me puede guiar? ¡Gracias!

Hola a todos! Es la primera vez que hago un formulario en Excel (solía usar Access) pero aun así soy novato en estos temas y no he encontrado nada al respecto para utilizar en un formulario vba excel... Lo que necesito es: En un Cuadro de Texto de un Formulario hecho en VBA en Excel, lo siguiente: 1- Una máscara fecha con formato ../../../.. En donde los ".." Serian los números a tipear. 2- Una máscara numérica con formato __-__-______-__ en donde los "_" serian los números a tipear. 3- Aquí ya sería una Personalización, y es que al escribir en un campo texto, las primeras letras de cada palabra se pongan en Mayúsculas y el resto en minúsculas automáticame…

Buenas, A ver si podeis ayudarme o guiarme un poco ya que soy bastante novata en este tema y me está costando bastante, sería de agradecer... Me baso en el ejemplo adjunto, tengo 3 pestañas (Usuario1,Usuario2,Usuario3). Cada pestaña es de un usuario que tiene actividades propias y otras con dependencias (las que aparecen como a Sí en la columna dependencia) con otros usuarios (columna Destinatario donde aparece el usuario del que depende). Mi intención es que haya un botón en cada pestaña que cuando le des a actualizar en una pestaña, por ejemplo, Usuario 1 le da a actualizar, a este le aparezcan todas sus actividades y todas aquellas que otros usuarios l…

Buenos días, Estoy intentando generar un código ID por fila en un excel (p.e. 20PG_01, 20PG_02...). La idea que cada vez que inserte o elimine una fila de mi excel se actualice el ID en todas las filas automaticamente. ¿podríais ayudarme?

Buenos días; A ver si me podéis ayudar. Tengo problemas con la apertura de un archivo CSV desde una macro. A veces, al abrirlo desde la macro, se come el encabezado pero no pasa siempre, no sé qué puede pasar…. La configuración regional es de “;” igual que la separación del csv. He intentado adjuntar el excel pero...ya no se como se hace, no me aparece la opción, lo arrastro desde el escritorio y nada. Os añado las líneas que tengo. Workbooks.OpenText Filename:=RutaExcel, _ DataType:=xlDelimited, Local:=True Gracias y un saludo,

Hola! amigos del foro quisiera solicitarles el apoyo con lo siguiente, estoy intentando crear un código que revise al abrir un libro verifiqué si el nombre del libro es el asignado lo valide, en caso que el nombre no corresponda no permita habilitar los formularios que se encuentran en cada una de las hojas, los cuales se activan mediante un botón. Inicialmente he creado el evento open para validar el nombre del libro, pero aún no logro como definir que si este nombre es diferente no permita habilitar los formularios con el clic del botón. Agradezco la colaboración que me puedan brindar. Private Sub Workbook_Open() Dim nombre As String Dim archivo As…

Buenas a todos. Tengo un archivo excel que nada mas abrirlo se abre un formulario de inicio de sesión. Mientras este formulario está abierto no se puede ver el archivo de excel, y una vez que se inicia sesión ya se puede acceder al libro. No obstante, la macro me genera dos problemas: 1.El primero de ellos es que cuando abro el libro, es decir, cuando doy dos clicks al archivo de excel, el excel se abre rápidamente, se cierra y ahí me muestra el formulario de inicio de sesión. Pero yo no quiero que funcione así. Yo quiero que al dar dos clicks al archivo de excel directamente se me abra el formulario sin que se abra el excel. 2. Si abro el archivo de excel…

Hola!! A ver si me sé explicar y si alguien me puede ayudar. Tengo ya toda la Excel con macros programadas funcionando pero ahora necesitaba que toda la hoja de Excel esté bloqueada, y que tan solo se desbloquee la siguiente fila que no tenga celdas rellenadas, es decir: Ejemplo: Rango celdas (A3:F3) desbloqueadas (para poder poner datos); una vez todas las celdas ya contienen información (y no son blancas/vacias), quisiera que la macro bloquee la fila de A3:F3 para no poder modificar los datos entrados y a su vez, desbloquear la siguiente fila: A4:F4 para poder entrar los datos ahí, y así sucesivamente con todas las filas siguientes. Alguien podría ayudarm…