Alberto Pereda

Alberto Pereda

 1.225 puntos  España @albertopereda desde - visto
Preguntar

Actividad pública reciente

Ha respondido en y en 2 temas más

Macro que elimine columnas de una Hoja

Prueba esto: Sub borrar() Hoja2.Select Range("a:a,b:b,f:f,j:j,l:l,m:m,n:n,o:o,p:p,q:q,r:r,s:s,t:t,u:u,v:v,w:w,x:x,y:y").Select Selection.Delete End Sub
Ha valorado "Excelente" la respuesta

Necesito una macro con formulario para ingresar correlativos

respondió: En la imagen puedes ver el resultado de la macro y como esta construido el formulario, la numeración ocurren en A2 hasta A502 en este caso, en los textbox1 tu indicas a partir de que numero va ser el consecutivo y en el textbox hasta donde se...
Ha respondido en y en 2 temas más

Borrar números en un rango bajo una condición

Bueno podrías usar la siguiente macro: En la Hoja: ------------------------------------------------------------- Private Sub worksheet_selectionchange(ByVal Target As Range) If Range("G8") = 0 Then Call borrar End Sub...
Ha valorado "Excelente" la respuesta

Macro para copiar un rango de celdas de arriba hacia abajo para llenar los espacios vacíos

respondió: Prueba con este código en una copia del libro, por si no hace lo que necesitas: Sub prueba() Dim wksP As Worksheet Set wksP = Worksheets("PENDIENTES") Dim lFin As Long, lBucle As Long lFin = wksP.[A1000000].End(xlUp).Row For lBucle = 2 To lFin If...
Ha respondido en y en 2 temas más

Macro para abrir una carpeta dependiendo del nombre de la celda fijada

Tal vez esto rte sirva: Private Sub CommandButton1_Click() Dim File As String File = "Ruta de la carpeta" & Val(TextBox1) Call Shell("explorer.exe " & File, vbNormalFocus) End Sub En el TextBox1 escribes el nombre de la carpeta que buscas.
Ha valorado "Buena" la respuesta

Como reemplazar una búsqueda mediante userform en dos hojas a la vez.

respondió: Quizás algo de esto te ayude https://www.programarexcel.com/2013/04/formulario-colorea-celdas.html Fijate que lo que hace es buscar el dato y colorear la fila, tu ahí debes escribir lo que la macro debe hacer. Estos ejemplos también busca datos...
Ha valorado "Excelente" la respuesta

En una hoja, utilizando la herramienta de subtotales deseo encontrar el total de unidades en Stock por Categoría

respondió: Con tan poca información estoy agregando algo de imaginación... veamos: Si utilizas Subtotales imagino que será porque tienes una tabla con filtros. Entonces al filtrar por Categoría se te mostrará el subtotal de Stock, como en la imagen: Si esto no...
Ha valorado "Excelente" la respuesta

Como hacer que un combobox me muestre solo los registros de un determinado usuario en un userform

respondió: Si lo que deseas obtener son los registros de la hoja del usuario ... paso 1 Si lo que deseas obtener son los registros de hoja DATOS pero de cierto usuario ... paso 2. 1) No se comprende el papel del label... pero si seleccionas el usuario desde el...
Ha respondido en y en 2 temas más

Insertar Filas y copiar fórmulas automáticamente de la fila anterior con macros

Tal vez es esto lo que buscas: Sub Insertar() Dim fila As Integer fila = ActiveCell.Row If fila < 4 Then 'evita que inserte filas antes de la fila 4 MsgBox ("Ahi no se puede insertar") Exit Sub End If Rows(fila).Insert Shift:=xlDown If fila = 4 Then...