Aneudys Martinez

Aneudys Martinez

Unused RAM is wasted RAM
 91,4K puntos  República Dominicana @aneudysmartinez desde - visto
Preguntar

Respuestas en Programación

Respuesta en y en 1 temas más a

Colorear celdas según valor celda anterior

[email protected] mandame el archivo para adatapla una macro
Respuesta en y en 2 temas más a

Tengo una base de datos en excel con 130 columnas de las cuales solo requiero 15 y quiero copiarlas a otra hoja

Te falto solo elegir desde donde epieza a pegar las columna Mi este caso desde al celda a1 hasta la ultima columna por pegar Sub Macro1() 'copia columnas a la hoja2 Sheets("comprobantes").Select...
Respuesta en y en 2 temas más a

Modificar macro para seleccionar solo rango especifico

Solo cambia la parte donde dice set MiRango = application.inputbox("seleccione rango a exporter", type:=8) por estas set MiRango = range("d11:d33")
Respuesta en y en 2 temas más a

Formulario VBA en excel que contenga lista desplegable.

[email protected] mandaem el archive para agregar la macro
Respuesta en y en 2 temas más a

Macro que al abrir un libro pida clave y active solo una parte del menu creado con hipervínculos

Josue lo puedes conseguir de esta manera Ejemplo en el evento open del thisworkbooks Private Sub Workbook_Open() Dim nombre As String Dim paso2 As Boolean nombre = UCase(InputBox("Nombre de Usuario")) paso2 = False Select Case nombre Case...
Respuesta en y en 2 temas más a

Formulario relleno en UserForm, Capurarlo en una segunda hoja para que funcione como una base de dato o registro.

1 - para los del registro Puedes crear una macro que copie los datos que quiere en tu base de datos Los del check Para que no copie los datos Puedes usa algo asi If CheckBox1 = True Then Range("a1") = TextBox1 Else Range("a1") = "" End If o If...
Respuesta en y en 2 temas más a

Activar celda de Hoja de Excel por medio de un Listbox

Estos lo consigo con una búsqueda desde la la primera columna del listbox así En el evento click del listbox Private Sub ListBox1_Click() Set busco = ActiveSheet.Range("a:a").Find(ListBox1, LookIn:=xlValues, lookat:=xlWhole) If Not busco Is Nothing...