profanador

Dante Amor respondió: Si ejecutas la macro para poner "B", ¿Si ya tiene "B" agregar otra "B"? Si ejecutas la macro para quitar la " B", ¿Si no tiene B quitar el primer número?

Programar Excel respondió: enlace externo enlace externo enlace externo Estos ejemplos te serán de utilidad

James Bond respondió: Prueba con esta macro Sub TOTALIZAR() Set TOTALES = Range("I2").CurrentRegion Set GASTOS = Range("C2").CurrentRegion With TOTALES R = .Rows.Count: C = .Columns.Count Set TOTALES = Range("I3").Resize(R - 2, C) For I = 1 To R GASTO = .Cells(I, 1) If...

Dante Amor respondió: Te anexo la macro Sub Transponer() 'Por.Dante Amor Application.ScreenUpdating = False j = 1 For i = 1 To Range("A" & Rows.Count).End(xlUp).Row Step 4 Range("A" & i & ":A" & i + 3).Copy Range("C" & j).PasteSpecial Paste:=xlPasteAll, Transpose:=True j...

Aneudys Martinez respondió: Cargar un listbox con Datos que cumplen con una Condición Excel Vba Estas userform te buscara los activo solo cambia donde dice pendiente por activo La parte de pegar Agregar un botón y copiar este macro Private Sub CommandButton1_Click()...

Dante Amor respondió: Te anexo la macro Sub SumarCoincidencias() 'Por.Dante Amor Set h1 = Sheets("BD") Set h2 = Sheets("ESTD") For i = 2 To h1.Range("U" & Rows.Count).End(xlUp).Row tipo = h1.Cells(i, "U") prov = h1.Cells(i, "Y") Set b = h2.Columns("A").Find(prov,...