Joaom Manuel

Desde Venezuela TEngo esta macro que quiero que me revise si en columna B, existe el nombre escrito en TextBox (txtProd). ¿Si existe? MsgBox ("Este nombre ya está registrado. Verifica ...."), vbInformation, "Existe" Exit Sub 'sale sin guardar Si no...

Saludarlos es poco para lo que he obtenido de ustedes. Quisiera que esta macro funcionara para varios ListBox en varios Formularios, desde un Módulo llamándola con Call Deseleccionar(Me) Me da errores que no se explicarlos Sub DEselecciona(miform)...

En celda formato de celda personalizada, he probado con yy resultado negativo, con aa negativo, en barra de fórmulas =yy(), negativo y algo más. Cuando personalizo con aa, me sale nada en la celda, voy a verificar, encuentro a\a\ y no fue esto que...

La grabadora me da esto ActiveCell.FormulaR1C1 = _ "=IF(R[-1]C[1]<0.5,12%,IF(R[-1]C[1]<=2000000,9%,IF(R[-1]C[1]>2000000,7%)))" y en la macro tengo esto en Private Sub Worksheet_Change(ByVal Target As Range) If Application.Sum([F14:F23]) > 0 Then...

=SI(J38="";12%;SI(J38<=2000000;9%;SI(J38>=2000001;7%;12%))) Funcionan 2 partes, la de 9% y 7% solo la 1ª parte SI(J38="";12%; no. Si coloco SI(J38=1;12%; ya funciona pero si esta vacia, "" NO Quiero que cuando la celda este vacía, se presente 12% en...

Esta fórmula =SI(I10>=12500;ABS((I10*0,01-250)-I10)) me funciona pero al no existir valor en I me dice en J FALSO. Quiero que nada me diga y quien nada ponga en J si nada existe en I. ¿Cómo hice? =SI(I10>=12500;ABS((I10*0,01-250)-I10);0) Le agregue...

Dam, ¿Cómo te ha ido el domingo? Espero que bien. En este evento Private Sub cboHojas_Change() quiero Deseleccionar la linea de la hoja anterior al ejecutar este evento. Sopone que tengo en cbohojas la hoja1 seleccionada y en esa hoja esta una linea...

Buena stardes amigo Dam En una macro (código) tengo estas líneas 'Seleccionaren hoja, linea, solo las columnas de datos, desde A hasta G valor = lista.ListIndex + 2 Set Menu = Range("A1").CurrentRegion Menu. Rows(valor).Select para que al click en...

Tengo un código que me cuenta líneas de un ListBox, del cual quise hacer lo propio para usar limpiando TextBox (con nuevo nombre) de varios formularios, el cual no me sale, (no doy pié con bola) Public Sub Limpiar(ByVal miform As Form) ‘Recorremos...

Una ves más a Dante Amor Gracias Dam, muy bueno tu anterior respuesta, como siempre Al buscar, comienzo por ingresar el 1º carácter, el 2º, 3º, 4º, etc. Muestra lo que quiero y como quiero, como están los demás 2 formularios. Retrocedo eliminando...