Aris8a

Agradecido Antoni! Tus sugerencias me ayudaron mucho! Como pudiese hacerte llegar el archivo?

Buenas tardes! Tengo el siguiente código: Private Sub btnCargaBancos_Click() Dim TasaCompra, TasaVenta As Double Dim InvBanesco, InvVzla, MontoBanesco, MontoVzla As Double Dim TasaDiaBan, TasaDiaVzla, TasaActual As Double 'Inversion = Val(txtInversion.Text) InvBanesco = Val(CDbl(txtInverBanesco.Text)) InvVzla = Val(CDbl(txtInverVzla.Text)) TasaCompra = Val(CDbl(txtTasaCompra.Text)) TasaVenta = Val(CDbl(txtTasaVenta.Text)) MontoBanesco = (InvBanesco / TasaCompra) * (1 - 0.18 / 100) * (TasaVenta * (1 - 0.18 / 100)) MontoVzla = (InvVzla / TasaCompra) * (1 - 0.18 / 100) * (TasaVenta * (1 - 0.18 / 100)) TasaDiaBan = (MontoBanesco / InvBanesco) * (1 - 0.055) TasaDiaVzla = (MontoVzla / InvVzla) * (1 - 0.055) If TasaDiaBan < TasaDiaVzla Then TasaActual = TasaDiaBan Else TasaActual = TasaDiaVzla End If MontoBanesco = FormatNumber(MontoBanesco, 2, True, vbFalse) MontoVzla = FormatNumber(MontoVzla, 2, True, vbFalse) TasaActual = FormatNumber(TasaActual, 5, True, False) txtBcoBanesco.Value = MontoBanesco txtBcoVenezuela.Value = MontoVzla txtTasaDiaria.Value = TasaActual End Sub Como se puede apreciar InvBanesco , InvVzla , TasaCompra y TasaVenta, son valores que introduce el usuario a través de los respectivos cuadros de texto. Tengo los siguientes problemas: a. Las fórmulas no se ejecutan correctamente (pareciese que no reconociese los números entrados vía cuadros de texto). b. Al darle valor cero (0) a cualquiera de los valores de InvBanesco o InvVzla, me genera un error en TasaDiaBan o TasaDiaVzla (según sea el caso), aunque, como se puede apreciar, debería generar un valor cero (0). Como dije en mi presentación estoy empezando en esto de la codificación...y quiero aprender de Uds! Agradezco su ayuda! Nota: lamentablemente el fichero es mas grande de lo permitido y no pude anexarlo.

Buenas tardes Israel. Realmente me disculpo porque estoy iniciándome acá en el foro y no tenía idea cierta donde ubicarme. Si eres tan amable...¿Cuál es la sección correcta para hacer consultas?...también aclaré que no tengo mucha formación -formal- en VBA. ya que mis conceptos los tengo a través del auto estudio. De todas formas agradezco tus precisiones!

Saludos amigos! Estoy desarrollando un formulario en VBA y se me ha presentado el inconveniente de que no logro controlar el formateo de mis cuadros de texto para que cuando el usuario ingrese los datos, automáticamente el formulario coloque las separaciones de miles (.) y de decimales (,). Ejemplo: el usuario ingresa 100000 y quisiera que el cuadro de texto coloque 100.000,00. Agradezco su experimentada ayuda!

Hola amigos! Soy Aristerneris, de Venezuela, soy un interesado en todo lo relacionado con Excel y autodidacta. Estoy acá porque he incursionado en el campo de elaboración de formularios en VBA y reconozco que necesito de la ayuda de personas que tengan mas conocimientos y experiencia que yo en este tema. Agradecería altamente lo mejor de su colaboración! Dios los bendiga!