Frank Saaa

Frank Saaa

 1.825 puntos  Perú @franksaaa desde - visto
Preguntar

Actividad pública reciente

Ha preguntado en el tema en y en 3 temas más

Quiero dar formato a un contenido para enviar por correo.

Tengo una macro que envía un correo automáticamente por gmail, pero lo hace como texto plano, sin embargo quiero editar ese contenido pero no encuentro la forma. Si me ayudan. Set Email = New CDO.Message correo = "[email protected]" passwd =...
Ha valorado "Excelente" la respuesta

Validar si el contenido de un texbox esté en formato porcentaje

respondió: Una posibilidad es fijarte si el caracter de la derecha es el "%", algo como If Right(Textbox1.Text, 1) = "%" Then 'Si está en formato porcentaje Else 'No está en formato porcentaje End If Salu2
Ha valorado "Excelente" la respuesta

Rango dinámico no permite cargar datos a listbox

respondió: Ya probé tu código con datos y sin datos; y no me envía error. ¿Qué mensaje de error te aparece? ¿Y en qué línea se detiene la macro?
Ha valorado "Buena" la respuesta

Dividir dos texbox cuyo dato están en porcentajes

respondió: Quizas te sirva usar Cdec(textbox1)/ Cdec(textbox2) O prueba CDbl(textbox1)/ CDbl(textbox2)
Ha valorado "Excelente" la respuesta

Buscar dato en todas las hojas, actualizar dato en todas las hojas encontradas

respondió: Te anexo el código: Private Sub CommandButton1_Click() 'Por.Dante Amor If IsNumeric(TextBox1.Value) Then valor = CDbl(TextBox1.Value) Else valor = TextBox1.Value For Each h In Sheets Set r = h.Cells Set b = r.Find("cuotas", lookat:=xlWhole) If Not b...
Ha valorado "Buena" la respuesta

Cargar Listbox con rango dinámico

respondió: Para cargar datos a un formulario en un listbox desde un rango dinámico las instrucciones son: (solo cambia el b4 por la primera celda de tus datos) Private Sub UserForm_Initialize() Set datos = Range("b4").CurrentRegion 'carga rango dinamico pueder...
Ha empezado a seguir a
Ha valorado "Excelente" la respuesta

Validar dato de texbox con el de una celda.

respondió: Prueba poniendo la propiedad que utiliza el textbox que contiene el valor, y el nombre de la hoja en las celdas... if texbox1.Text <= Worksheets("MiHoja").cells(2,1) then... Salu2.