¿omo sumar en TextBox una celda?

[digit]

Hola a todos:

Tengo creado un UserForm y he creado un TextBox en el cual necesito que me aparezca la suma ce la última celda con datos + 1.
Me explico: Hoha donde esta la columna (Hoja...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Creedence]

A ver si es lo que buscas.

 

[digit]

Lo siento pero no consigo que me funcione, ¿alguien tiene alguna otra idea?. Os envio el archivo por si vale de algo. La columna donde aumentarán los números es en la a y el texbos es el contador...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Creedence]

Descartando un poco lo poco cortes de tu parte al escribir "¿alguien tiene alguna otra idea?", como diciendo: "no me sirve...el que sigue por favor", creo que si es lo que necesita tu plantilla, y...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[galileogali]

Credende: tienes todo mi apoyo!!!

 

[digit]

Hola Credence: Tengo que pedirte mil disculpas por mi respuesta, por lo que veo has pensado que no he valorado en absoluto tu trabajo, pues me vuelvo a disulpar, a disculpar, a disculpar... ya...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[ioyama]

Hola digit

Aclarado el "malentendido" te hago la siguiente sugerencia. Podrí­as usar algo como

Private Sub UserForm_Initialize()
uf = Range("A65536").End(xlUp).Row...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[digit]

Hola Ioyama:

Ante todo espero que hayais entendido mi explicación, la verdad es que me ha fastidiado mucho que penseis que no valoro vuestro trabajo, si fuera así­ no tendrí­a claro cual es el...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[ioyama]

Hola digit

a) en cuanto al contador
en Private Sub CommandButton_CargarDatos_Click...actura = TextBox_ContadorFactura + 1 así­...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Creedence]

Disculpas aceptadas y...pues estaremos en espera de la siguiente consulta, sin embargo no esta de mas el siguiente comentario...estamos para apoyarnos unos a otros, y en este foro, el apoyo...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[digit]

Hola Creedence:

Como he comentado, te estoy muy agradecido a ti y a los compañeros que me habeis ayudado. Gracias a eso hoy ha sido un dí­a muy productivo y creo ver ya la luz al final del tunel...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Creedence]

Primero quisiera preguntar, si el "no me funciona" te refieres a que te ocasiona algún error?, o a que no hace lo que tu quieres?, por que a mi si me esta ocasionando errores el UserForm1 y...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[digit]

Hola a todos:

Cuando creí­a que todo ya funcionaba me ha surgido un nuevo problema, en el formulario tengo una serie de cálculos y lo que me ocurre es que los resultados no son los deseados...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[galileogali]

Private Sub ComboBox_TipoIva_Change()
With Application.WorksheetFunction
TextBox_Iva = .Round(.Round(Val(TextBox_BaseImponible), 2) * .Round(Val(ComboBox_TipoIva), 2) / 100, 2)
TextBox_Total =...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[digit]

Hola Galileogali:

Muchas gracias por tu ayuda, he hecho lo que me comentas y el cálculo me lo hace perfectamente pero al volcar el datos a la hoja de cálculo me multiplica por cien la base...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[galileogali]

como para no usar Fixed, usa esto:

Cells(fila, col + 5).Value = Base_Imponible / 100

 

[digit]

Hola Creedence y Galileogali gracias a todas vuestras aportaciones el formulario me funciona muy bien. Aún me quedan cosas por pulir pero esos "detallitos" los intentaré pulir poco a poco.
Un...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí