Elsa Matilde

En la sección Contactos de mi sitio aparecen mis correos. Podés enviármelo al de Gmail (cibersoftPUNTOarg). Enviame allí tu libro y me explicas todo en detalle.

Como no dejaste ningún tipo de ejemplo o imagen de cómo se encuentran tus datos ni los controles de tu formulario, no podemos hacer mucho desde aquí. Te invito a mirar el video N° 36 de mi canal y desde el enlace al Blog podrás descargar el libro de...

Cualquiera de las 3 instrucciones que dejo en la imagen te coloca en la celda, el importe en negativo. Solo tené presente la diferencia entre VAL y CDBL si vas a optar por alguna de éstas.

Puedes descargar desde mi blog (https://elsamatilde.blogspot.com/2020/01/ ) un formulario completo para registro en base (Proveedores, Clientes, Alumnos, etc). Solo debes ajustar los textos de los campos a utilizar. Allí verás un control para...

Veo en la imagen que tienes un código para el botón AGREGAR, donde se ejecuta una macro para el agregado y luego la llamada al Userform. Aquí habría que considerar 2 situaciones: Si debe guardarse o no el registro cuando haya campos vacíos....

Una función contiene fórmulas matemáticas (no se pueden modificar). Por ej: PI, HOY y tantas otras son funciones que NO necesitan argumentos. =HOY() es una fórmula que utiliza la función HOY =PI () es una fórmula que utiliza la función PI =BUSCARV()...

Se puede lograr con macros o con fórmula, como se observa en la imagen. Mi separador de argumentos es punto y coma. Reemplaza por coma si ese es tu modo. Luego podrás conservar solo los valores copiando y pegando en el mismo lugar, opción 'solo...

También te invito a visitar la sección de Manuales de mi sitio que dejo al pie. Desde allí podrás descargar una versión reducida a modo de demo donde ya se desarrolla parte de su contenido. Quiero remarcar el volumen del contenido en manual 500Macros...

Te dejo el código ajustado para las 3 primeras formas, faltaría repetir las instrucciones para el resto ajustando el nombre de cada objeto. Sub Copia_Datos() 'hoja con las formas Sheets("Hoja2").Select 'Codigo dato = Sheets("Hoja1").[A1]...

Al momento de definir el inicio de tu rango le agregué 2 variables según tu imagen. Y al final la instrucción para la cuadrícula: Private Sub CommandButton1_Click() Set h = Sheets("Blad1") x = 7 : a = 5 Z = 2 : b = 1 For i = Txtini_y.Text To Txtfin_y...