Bernardo Gómez

Bernardo Gómez

 República Dominicana @bernardogomez2 desde - visto

Actividad pública reciente

Voto positivo a la respuesta

Cómo verificar los datos de dos tablas de Access?

respondió: ¿Podrías poner una imagen, aunque sea con datos inventados de ambas tablas?. La verdad, me he perdido. Porque para saber los que están en una tabla y no están en otra puedes crear, con el asistente, una consulta de búsqueda de no coincidentes, pero...
Voto positivo a la respuesta

Dar formato a la función "Now"

respondió: Pruebe con: txtA4Fecha =Format(now,"dd/mm/yyyy hh:mm")
Voto positivo a la respuesta

Repetir el mismo Private Sub de forma automática

respondió: Con un módulo de clase y un objeto con eventos se debería poder hacer. Es complicado de explicar, pero requiere sólo unas pocas líneas de código. He subido un ejemplo: www.jrgc.es/ejemplos/ejemplo_20201229a.xlsm Tendrás que redimensionar a 100 la...
Voto positivo a la respuesta

Cambiar valores de Togglebuttons automáticamente

respondió: Haz caso a Elsa, ya que es de las que más sabe de Excel. Personalmente no tengo ni idea, pero por si te puede servir. Supongamos que tengo un formulario Donde puedes ver que hay algunos "señalados". Si pulso el botón El código del botón es Private...
Voto positivo a la respuesta

¿Qué controles Activex puedo usar para hacer una encuesta en una ventana que cambie al dar click al botón siguiente?

respondió: Empieza diseñando tu formulario: En el ejemplo has puesto 5 botones de opción y dos botones, bien, estos controles tienen que ser activex, no controles de formulario. Para que los de la derecha funcionen como un grupo y los de la izquierda como otro...
Voto positivo a la respuesta

Código vba para registrar dentro de un rango de celdas.

respondió: Te dejo un código para el pase a la hoja activa. Le faltarían controles de contenido pero si resuelve tu consulta ;) Private Sub CommandButton1_Click() 'pase a la hoja activa 'x Elsamatilde 'control de filas If [C16] <> "" Then MsgBox "Se llegó al...
Voto positivo a la respuesta

Desconfiguración de ventanas en Excel VBA

respondió: Abre regedit y renombra la siguiente clave (puede que la versión sea distinta). En lugar de Common renómbralo a Common_ con el Excel cerrado. Ábrelo y te debería crear de nuevo la clave Common con los valores por defecto....
Voto positivo a la respuesta

Error de sintaxis en una función para una consulta

respondió: Puedes hacerlo de una forma más sencilla. Si tengo la tabla Y construyo una consulta a la que le añado un campo Dif como ves en la imagen Cuando la abro A cada registro le resta el anterior
Voto positivo a la respuesta

Actualizar un combobox desde otro Userfom | Vba Excel

respondió: Habrás notado que el sitio interrumpió su servicio unas semanas...;( Te invito a mirar mi último video (N° 39) donde justamente desarrollé tu caso ;) https://www.youtube.com/watch?v=OM-Az8hQbKU&t=19s Si el tema queda resuelto no olvides valorar la...
Voto positivo a la respuesta

Porque mi código no ejecuta la búsqueda

respondió: Luz, partiendo de la base que no sé que hace o para que sirve el CmbCampo, si tengo la tabla Productos Y tengo un formulario, donde tengo un ¿combinado? Llamado CmbCampo, que como te dije no sé para que sirve, un cuadro de texto TxtBusqueda y un...
Voto positivo a la respuesta

Duda sobre creación de carpetas con VBA

respondió: Revisa si lo siguiente es lo que necesitas: Sub RevisaCarpeta() Dim sNombre As String On Error Resume Next If Dir("C:\Usuarios\dvelasquez\documents", vbDirectory) = "" Then If Dir("D:\Usuarios\dvelasquez\documents", vbDirectory) = "" Then Else...
Voto positivo a la respuesta

Bordes personalizados vba (Label,Frame)

respondió: [Hola No es posible cambiar las esquinas de los Label ni de los TextBox. Usa objetos Image, en ellos la imagen que desees y si quieres texto colocas un Label encima.
Voto positivo a la respuesta

Problema con VBA que extrae aleatorios de un Rango

respondió: Te cambio la macro por una nueva Sub Aleatorios() Dim i As Long, j As Long, n As Long, m As Long, r As Range Dim idx As Long, tmp As Variant, arr As Variant ' i = ActiveCell.Row Set r = Range("A" & i & ":AD" & i) n = WorksheetFunction.CountA(r) m =...
Voto positivo a la respuesta

Access, Consultas - Función Elegir(Choose) vs. Siinm(Iif)

respondió: muchas tablas=mal diseño En todo caso usa claves.
Voto positivo a la respuesta

Es D. Amor el creador de Todoexpertos?

respondió: Dante Amor es un grande Ilustre y el fundador Josep Planells Alòs debe dar su reconocimiento por su gran labor y gratitud en la web todoexpertos
Voto positivo a la respuesta

Digitalizar imagen y guardarla en registro de cliente

respondió: Prueba con Por ahí hay algunos ejemplos: https://sites.google.com/site/jjjt1973/Home/tomar-foto-desde-camara-web-imagen-ole http://www.mvp-access.es/buho/ficheros/camaraweb.zip http://www.mvp-access.es/buho/ficheros/camaraWebgustavo.zip...