Maestro que versión de access es el actual? Me quede en access 2010

Maestro encontré su canal en la red, este proyecto sirve para hacerlo en red? O solo para una máquina? Muchas gracias por su aporte

Piédestal aydarme con este codigos no me funciona Tengo fechas textos y numéros. Gracias Public Function Importar(Ruta As String, Inicio As Long, Fin As Long) As Boolean Dim appExcel As Object, myWorkbook As Object, myWorkSheet As Object Dim Contador As Long, SQL As String, FechaFormato As String On Error GoTo ManipularError Set appExcel = CreateObject("Excel.application") Set myWorkbook = appExcel.Workbooks.Open(Ruta, True) Set myWorkSheet = myWorkbook.Sheets(1) appExcel.Visible = False With myWorkSheet For Contador = Inicio To Fin ' Validar formato de fecha FechaFormato = IIf(IsNull(.Cells(Contador, 2).Value), "Null", "#" & Format(.Cells(Contador, 2).Value, "yyyy-mm-dd") & "#") SQL = "INSERT INTO T_Shell " _ & "(Transporteur, Date_de_creation, Bill_of_Lading, Site_Shell, Document, Type_Doc, Date_Shell, Produit, Lieu_de_chargement, Quantité, Site_Coco, Date_Coco, Qté_Coco, Site_Dodo, Date_Dodo, Qté_Dodo, Site_retour, Date_retour, Qté_retour, Écart, Jours, Status, Commentaire, Date_de_Livraison, Date_du_chargement, Montant, Quantité_L, Facturé_$, Écart_$) " _ & "VALUES (" _ & "'" & Nz(.Cells(Contador, 1).Value, "") & "', " _ & FechaFormato & ", " _ & Nz(.Cells(Contador, 3).Value, "Null") & ", " _ & Nz(.Cells(Contador, 4).Value, "Null") & ", " _ & Nz(.Cells(Contador, 5).Value, "Null") & ", " _ & "'" & Replace(Nz(.Cells(Contador, 6).Value, ""), "'", "''") & "', " _ & IIf(IsNull(.Cells(Contador, 7).Value), "Null", "#" & Format(.Cells(Contador, 7).Value, "yyyy-mm-dd") & "#") & ", " _ & "'" & Replace(Nz(.Cells(Contador, 8).Value, ""), "'", "''") & "', " _ & "'" & Replace(Nz(.Cells(Contador, 9).Value, ""), "'", "''") & "', " _ & Nz(.Cells(Contador, 10).Value, "Null") & ", " _ & Nz(.Cells(Contador, 11).Value, "Null") & ", " _ & IIf(IsNull(.Cells(Contador, 12).Value), "Null", "#" & Format(.Cells(Contador, 12).Value, "yyyy-mm-dd") & "#") & ", " _ & Nz(.Cells(Contador, 13).Value, "Null") & ", " _ & Nz(.Cells(Contador, 14).Value, "Null") & ", " _ & IIf(IsNull(.Cells(Contador, 15).Value), "Null", "#" & Format(.Cells(Contador, 15).Value, "yyyy-mm-dd") & "#") & ", " _ & Nz(.Cells(Contador, 16).Value, "Null") & ", " _ & Nz(.Cells(Contador, 17).Value, "Null") & ", " _ & IIf(IsNull(.Cells(Contador, 18).Value), "Null", "#" & Format(.Cells(Contador, 18).Value, "yyyy-mm-dd") & "#") & ", " _ & Nz(.Cells(Contador, 19).Value, "Null") & ", " _ & Nz(.Cells(Contador, 20).Value, "Null") & ", " _ & "'" & Replace(Nz(.Cells(Contador, 21).Value, ""), "'", "''") & "', " _ & "'" & Replace(Nz(.Cells(Contador, 22).Value, ""), "'", "''") & "', " _ & IIf(IsNull(.Cells(Contador, 23).Value), "Null", "#" & Format(.Cells(Contador, 23).Value, "yyyy-mm-dd") & "#") & ", " _ & IIf(IsNull(.Cells(Contador, 24).Value), "Null", "#" & Format(.Cells(Contador, 24).Value, "yyyy-mm-dd") & "#") & ", " _ & Nz(.Cells(Contador, 25).Value, "Null") & ", " _ & Nz(.Cells(Contador, 26).Value, "Null") & ", " _ & Nz(.Cells(Contador, 27).Value, "Null") & ")" ' Ejecutar la consulta SQL CurrentDb.Execute SQL, dbFailOnError Next Contador End With myWorkbook.Close Set myWorkSheet = Nothing Set myWorkbook = Nothing Set appExcel = Nothing Importar = True Exit Function ManipularError: If Not myWorkSheet Is Nothing Then Set myWorkSheet = Nothing If Not myWorkbook Is Nothing Then myWorkbook.Close: Set myWorkbook = Nothing If Not appExcel Is Nothing Then appExcel.Quit: Set appExcel = Nothing MsgBox Err.Description, vbCritical, "Avíso" End Function

Excelente totorial. Me pregunto como seria si agregamos un campo de fecha. Cual seria el formato? Saludos de Cuba

Excelente aporte muchas gracias! igual cuando trato de ejecutar el boton btnguardar me arroja el siguiente error "Pocos parametros. Se esperaba 1." me podrias decir que puede ser?

¿Cómo evitar una inyección sql?

Buenas tardes, que programa estás utilizando para crear estas tablas?

LOGRE REGISTRARLO PERO NO VEO EL CONTROL PARA AGREGAR EL CALENDARIO EN UN FORMULARIO EN ACCESS 2016

partiendo de una fecha, como puedo conseguir que me devuelva el número de la semana dentro del año? me puedes ayudar por favor

buenas, no logro ver el archivo , y he tocado cada letrero azul y no sal, puede decirme como esta nombrado el archivo por favor.

Puedo, generar un macro autoejecutable, para mostrar un vencimiento en la fecha actual?

Una fantástica aplicación de programación en VBA para Acess

y para buscar un libro como se hace

Hola buen día. Genial el vídeo y me sirvio un montón, pero ahora necesito algo aún mas complejo, que el informe se abra sin un botón, si no en una fecha programada, y filtrado según esa fecha. Por ejemplo que se me abra, para avisarme de un vencimiento

Hola, ¿alguien me podría enviar el formulario? lo que paso es que perdí mi USB donde se encontraba el documento y es muy tedioso hacerlo de nuevo. Por favor alguien que me pueda colaborar.

Hola Buenas Tardes, el curso es muy bueno, hasta voy bien, pero no he podido bajar el modulo de funciones de que otra forma puedo obtener ese modulo , atte, gracias

muy buen aporte, pero tengo fallas con tus archivos, ya he descargado 2 y ninguno logra ejecutar los formularios y menos las busquedas

HOLA! que buena explicacion su caso se da para algo muy similar que estoy desarrollando; mi consulta es cual seria la modificacion del codigo si las tablas de libros, y libros leidos tuvieran columnas mayor a 1. gracias

Un saludo, excelentes videos, muy concisos y claros, gracias por compartir estos trabajos.

Y dónde está el código del formulario? Yo trato de abrir la base y nada de esto funciona y ya no se que hacer, e probado muchos métodos diferentes y nada sirve

Muy bueno, fácil y práctico #Recomendado

Excelente video, me ha funcionado para equipos de 64bits, agregando la linea para 64 bits, que no habia encontrado como realizarlo hasta que encontré este video. Gracias por tu aporte.

Yo quisiera replicar el programa, pero totalmente todo, me gustaría que el profe subiera una video completo 😢

Hola, consulta antes de escribir algo en el campo de busqueda, es posible ver el listado de todos los registro que tengo?

Ya no puedo abrir el archivo de casualidad alguien que me lo pudiera compartir

Increíble como dominas el tema y lo compartes, muchísimas gracias por tu labor.

Wao! Tremendo aporte, suscrito y pulgar...

Que buen hombre, tarde 2 años en encontrar este canap😢

Me sale el una alerta de pocos parámetros se esperaba 1 sigo sin resolver me ayudas 🥹

Hola la expresión de Estado no me funciona no se que estoy haciendo mal minuto 43:48

hola, me sale no se puede enviar el mensaje al servidor SMTP 0x80040217

Holaaa buenas noches me podrías ayudar revisando mi base de datos he tenido algunos inconvenientes si puedes claro

excelente curso, falto agregarle una lectora de código de barras para ingresos y egresos pues esto es lo mas común en la lógica del negocio del inventario

A mi no me refleja cantidad, cuando agrego existencias

al tratar de implementar este formulario de extracción obtengo un error: Error de Compilacion : No se ha definido el tipo definido por el usuario. Me resalta en amarillo Public Function buscaCarpeta() As String ¿como puedo solucionarlo? gracias

Hola, cómo puedo actualizar los nombres de campos en los formularios si los modifico en la tabla. El formulario ya esta creado.

Excelente video

Hola apenas hace unas semanas que empecé a seguirte y me ha sido de gran ayuda. Ahora respecto a este video, quisiera preguntarte si hay forma de poder proporcionar la base de datos como archivo para saber bien de donde provienen algunos campos, de antemano muchas gracias!

Genial, hacía mucho que quería hacer esta acción y no encontraba la forma. Ahora fui por más y me volví a frenar, tengo un subformulario no vinculado con el que lo contiene, dicho subformulario realiza la acción perfectamente, pero solo, no cuando está andando en el primero. Puedo solucionar ese inconveniente?

Podrias hacer una practica como de inventariado grande para aprender como usar diferentes coas

Muy fino, genial. ¿Se puede hacer lo mismo pero que admita campos vacíos al guardar? No doy con ello. No siempre se disponen de todos los datos al rellenar una ficha. Un saludo

Hola, buenas noches, yo tengo que realizar un botón para exportar información de varias consultas a Excel, pero requiero que baje cada consulta en un hoja diferente del libro, me podrías orientar por favor cómo hacer esto?

Hola Antonio, Felicidades es uno de los mejores videos que he visto. Por favor me podrias compartir el módulo, ya que no puedo descargarlo.

se me presenta un error 2501 OpenForm se cancelo, me podrias ayudar por favor

Se puede hacer búsqueda de varias tablas existentes ?

muy bueno

Excelente antonio, como seria para un codigo de barras y guardarlo en un campo de la tabal

buenas donde puedo obtener el Mdi_funciones.bas?

Buenas tardes, seria tan amable de indicarme como bajar los txt de las consultas, no veo el link para ello,gracias por brindar sus conocimientos, saludos