Se encontraron 39 coincidencias

por Jilo
Sab Sep 12, 2020 7:30 am
Foro: Código VBA
Tema: Resultados diferentes con Is Null
Respuestas: 5
Vistas: 289

Re: Resultados diferentes con Is Null

No comprendo bien lo que quieres hacer pero porqué no pruebas así:
If isnull(vCampo) or Trim(len(vCampo))=0 then
...
Seguro que sí el TextBox está vacio no pasa ;)
por Jilo
Jue Jun 25, 2020 7:07 pm
Foro: Código VBA
Tema: Cuadro de lista Acces
Respuestas: 1
Vistas: 203

Re: Cuadro de lista Acces

No está nada claro lo que preguntas. SUponiendo ...... Suponiendo que el formulario tiene una fuente de registros y su indice se llama ID. Y que el cuadro de lista, en su columna Index, es un ID del formulario POniedo este código en el evento dobleclick del cuadro de lista te situará el formulario e...
por Jilo
Lun Jun 22, 2020 9:00 am
Foro: Código VBA
Tema: Importar datos de txt sin delimitador específico
Respuestas: 8
Vistas: 582

Re: Importar datos de txt sin delimitador específico

Hola, Lo primero yo hubiese colgado una TXT con al menos 10 ó 20 filas diferentes (de PANADERIA) para que se puediera ajustar más, a la hora de desarrollarlo de una manera u otra. Como sólo buscas la fecha y el importe podemos seguir de la misma manera que lo que te colgué en mi primer msg. Sub Extr...
por Jilo
Dom Jun 21, 2020 9:00 am
Foro: Código VBA
Tema: Importar datos de txt sin delimitador específico
Respuestas: 8
Vistas: 582

Re: Importar datos de txt sin delimitador específico

Hola, La verdad no entiendo los cambios que has hecho. Intentas encotrar los datos en una linea, que creo no mantiene una uniformidad de espacios entre datos como delimitador, con la funcion Mid y no creo que sea lo más conveniente a primer golpe de vista. SIn el archivo de texto imposible intentar ...
por Jilo
Dom Jun 07, 2020 9:04 am
Foro: Código VBA
Tema: Importar datos de txt sin delimitador específico
Respuestas: 8
Vistas: 582

Re: Importar datos de txt sin delimitador específico

Hola Leonidas, La manera de automatizar Access con el archivo lo dejo a tu criterio o al criterio de algun otro forero. Yo te voy a dejar una función que te extrae las lineas de la PAnaderia del archivo de Texto. Hecho a ojimetro ya que no tengo el archivo TXT. Espero te sirva Sub ExtraeLineasPanade...
por Jilo
Jue May 14, 2020 6:48 am
Foro: Código VBA
Tema: Maximizar después de Minimizar
Respuestas: 2
Vistas: 272

Re: Maximizar después de Minimizar

Hola Demon777, Yo tengo guardado un código que dice si ya existe una instancia abierta de la BBDD de Access que voy a ejecutar, que creo que te serviría perfectamente. Adécualo a tus necesidades. '********************************************************* ' El siguiente código se encarga de averiguar...
por Jilo
Vie Abr 10, 2020 12:13 pm
Foro: Código VBA
Tema: Simplificar una monótona secuencia de and y or
Respuestas: 8
Vistas: 562

Re: Simplificar una monótona secuencia de and y or

Hola Leadrudi, es cuestión de echarle un poco de imaginación. :D Dim ctl As Control For Each ctl In Me.Controls If ctl.ControlType = acCommandButton Then _ Debug.Print "* Boton : " & ctl.Name & Chr(13) & _ " - Color Fondo: " & ctl.BackColor & Chr(13) & _ &...
por Jilo
Vie Abr 10, 2020 11:58 am
Foro: Código VBA
Tema: Error en fechas
Respuestas: 25
Vistas: 1652

Re: Error en fechas

Hola Jubilado1940, Fayad te lo ha puesto y no le has debido entender. Si la fecha 35/12/2020 ó 07/15/2020 ó cualquiera que pongas que no sea una fecha, como por ejemplo 30/02/2020, la función isdate te dara False, por lo tanto no tienes que ir comprobando año, mes y dia, etc.... Ya lo tienes if not ...
por Jilo
Vie Abr 10, 2020 8:48 am
Foro: Código VBA
Tema: Simplificar una monótona secuencia de and y or
Respuestas: 8
Vistas: 562

Re: Simplificar una monótona secuencia de and y or

Hola,
Otra opcion sería recorrer todos los CommandButton del formualrio.

Dim ctl As Control
For Each ctl In Me.Controls
If ctl.ControlType = acCommandButton Then Debug.Print ctl.Name
Next



Saludos
por Jilo
Vie Mar 27, 2020 8:48 am
Foro: Código VBA
Tema: [MOVIDO] Extraer ruta de cuadro de texto
Respuestas: 6
Vistas: 477

Re: [MOVIDO] Extraer ruta de cuadro de texto

Hola Según te he entendido. Este ejemplo separa el nombre de archivo y las carpetas hasta un nivel 3 de una ruta. Adecualo a lo que necesites Sub Separar() mPath = "P:\...RECURSOS Y VIDEOTUTORIALES\MARKETING\Zhang Jingna-MAGAZINE SUBMISSIONS_A COMPLETE GUIDE (Patreon)\S2-Submissions012.jpg"...

Ir a búsqueda avanzada