Rudy Quispe

Tengo la siguiente macro que se ejecuta muy lento, la cual hace que mi trabajo sea un poco tedioso, la cual pido su apoyo en mejorarlo. Private Sub Worksheet_Change(ByVal Target As Range) Dim Fila As Long Application.ScreenUpdating = False Fila =...

Tengo la siguiente macro: Sub ACCESO_SOL_SUNAT() Dim IE As Object Dim Boton As Object Dim Opcion2 As Object Dim Opcion3 As Object Set IE = CreateObject("InternetExplorer.Application") On Error Resume Next If Range("E27").Value = "Declaración y Pago"...

Tengo una base de datos con información en la columna A, la cual quiero que se repita de acuerdo a lo que indica la columna B. Espero me puedan ayudar. A la vez cabe indicar que la columna A y B es referencial, dado que es un modelo de lo que busco.

Como puedo unir dos Private Sub Workbook_Open() y no crear conflicto. Primero: Private Sub Workbook_Open() UserForm1.Show End Sub Segundo: Private Sub Workbook_Open() Sheets(“Hoja1”).Select End Sub

Tengo la siguiente macro: Sub Tcmes() Dim URL As String Dim IE As InternetExplorer Dim HTMLdoc As HTMLDocument Dim TDelements As IHTMLElementCollection Dim TDelement As HTMLTableCell Dim r As Long Dim Tc_Mes, tc_año As String Dim intFound As Integer...

Como se realiza los botones en barra de herramientas para ejecutar una macro. Adjunto un modelo que encontré.

Se tiene la siguiente macro, en la cual desearía cambiar el navegador que hace referencia, esta macro al ejecutar abre el Explore, hay forma que al ejecutar navegue con el Chrome. Ub ACCESO_SOL_SUNAT() Dim IE As Object Dim Boton As Object Dim Opcion2...

Hay forma de oculta la barra de herramienta de una sola hoja, teniendo varias en un archivo.

Me podrían apoyar en la solución Adjunto mi archivo que estoy trabajando con la macro, si se observa al ejecutar y/o poner la condicionante de SI/NO cuando finaliza el proceso se selecciona toda la hoja cuando no debería, porque ejecuta otra macro, a...

Pido su apoyo en la siguiente estructura de una macro: Option Explicit Sub ACCESO_SOL_SUNAT() Dim IE As Object Dim Boton As Object Dim Opcion2 As Object Dim Opcion3 As Object Set IE = CreateObject("InternetExplorer.Application") On Error Resume Next...