{"id":559,"date":"2018-04-10T06:43:41","date_gmt":"2018-04-10T06:43:41","guid":{"rendered":"http:\/\/es.accessrepairnrecovery.com\/blog\/?p=559"},"modified":"2021-08-05T04:52:03","modified_gmt":"2021-08-05T04:52:03","slug":"microsoft-access-codigo-de-vba","status":"publish","type":"post","link":"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba","title":{"rendered":"Aprenda todo sobre el Microsoft Access c\u00f3digo de  VBA: funciones de VBA, accesos directos y mucho m\u00e1s &#8230;!"},"content":{"rendered":"<div class=\"4816682032c5c5fe270e27c142ea76c4\" data-index=\"1\" style=\"float: none; margin:0px 0 0px 0; text-align:center;\">\n<style>\r\n.leaderboard { width: 320px; height: 100px; }\r\n@media(min-width: 500px) { .leaderboard { width: 468px; height: 60px; } }\r\n@media(min-width: 800px) { .leaderboard { width: 728px; height: 90px; } }\r\n<\/style>\r\n<script async src=\"https:\/\/pagead2.googlesyndication.com\/pagead\/js\/adsbygoogle.js?client=ca-pub-8329139124199643\" crossorigin=\"anonymous\"><\/script>\r\n<ins class=\"adsbygoogle leaderboard\"\r\n     style=\"display:inline-block\"\r\n\t data-full-width-responsive=\"true\"\r\n     data-ad-client=\"ca-pub-8329139124199643\"\r\n     data-ad-slot=\"1972481166\"><\/ins>\r\n<script>\r\n     (adsbygoogle = window.adsbygoogle || []).push({});\r\n<\/script>\n<\/div>\n<blockquote>\n<h4 style=\"text-align: justify;\"><em><strong>resumen:<\/strong><\/em><\/h4>\n<p style=\"text-align: justify;\"><em><strong>Este tutorial lo ayuda en las herramientas de programaci\u00f3n, es decir, el c\u00f3digo VBA en Microsoft Access y puede obtener m\u00e1s informaci\u00f3n acerca de la programaci\u00f3n.<\/strong><\/em><\/p>\n<p style=\"text-align: justify;\"><em><strong>Debes haber utilizado las macros de Access y saber muy bien con qu\u00e9 complejidad es trabajar. \u00bfNo es as\u00ed? Pero, \u00bfsabe c\u00f3mo simplificar esta complejidad simplemente haciendo uso de los c\u00f3digos VBA en Access?<\/strong><\/em><\/p>\n<\/blockquote>\n<p><!--more--><\/p>\n<p style=\"text-align: justify;\">Ahora se le pregunta lo que este c\u00f3digo VBA es y c\u00f3mo se usa? Bueno, para obtener respuestas de estas preguntas solo necesita obtener su informaci\u00f3n completa y simplifique su estilo de trabajo en MS Access.<\/p>\n<p style=\"text-align: justify;\">Introducci\u00f3n al acceso a VBA<\/p>\n<p style=\"text-align: justify;\">VBA es un lenguaje de programaci\u00f3n que puede usar para crear aplicaciones potentes en Access. VBA incluye una gran cantidad de variables que puede usar para acceder a las macros.<\/p>\n<p style=\"text-align: justify;\">No solo esto, sino tambi\u00e9n el uso de controles de terceros y escribir sus propias funciones \/ procedimientos para necesidades espec\u00edficas espec\u00edficas. Tambi\u00e9n puede usar el c\u00f3digo VBA para integrar su acceso a otros programas tambi\u00e9n.<\/p>\n<p style=\"text-align: justify;\">La programaci\u00f3n de Microsoft Access con VBA puede ser m\u00e1s f\u00e1cil si conoce el teclado para los comandos m\u00e1s comunes y los bits de c\u00f3digo m\u00e1s comunes en su aplicaci\u00f3n.<\/p>\n<h2 style=\"text-align: justify;\">C\u00f3mo activar las funciones incorporadas de VBA en el acceso<\/h2>\n<p style=\"text-align: justify;\">\u00bfSabe que puede activar las funciones integradas de VBA en su aplicaci\u00f3n Access 2013\/2016? Quiere saber c\u00f3mo seguir estos pasos por instrucciones.<\/p>\n<p style=\"text-align: justify;\">Para usar las funciones integradas de VBA en su base de datos de acceso, deber\u00e1 dirigirse a la referencia visual b\u00e1sica llamada &#8220;Visual Basic para aplicaciones&#8221;.<\/p>\n<ul style=\"text-align: justify;\">\n<li>Para esto, solo necesita abrir la base de datos. Presione Alt + F11 para abrir Microsoft Visual Basic. Cuando aparezca la ventana de Microsoft Visual Basic, seleccione Referencias en el men\u00fa Herramientas.<\/li>\n<li>Cuando aparezca la ventana Referencias, busque la referencia llamada Visual Basic para Aplicaciones y aseg\u00farese de que est\u00e9 marcada.<\/li>\n<li>Luego, haga clic en el bot\u00f3n Aceptar.<\/li>\n<li>Ahora su base de datos de acceso puede usar las funciones incorporadas de VBA.<\/li>\n<\/ul>\n<h3 style=\"text-align: justify;\">C\u00f3digo de programaci\u00f3n y depuraci\u00f3n de acceso com\u00fan<\/h3>\n<p style=\"text-align: justify;\">Aqu\u00ed est\u00e1 la lista del c\u00f3digo com\u00fan de VBA que lo ayuda a realizar la tarea de VBA completada, as\u00ed que t\u00e9ngalo a mano.<\/p>\n<p style=\"text-align: justify;\"><strong>Para abrir un formulario en la vista de formulario:<\/strong><\/p>\n<p style=\"text-align: justify;\">DoCmd.OpenForm &#8220;formname&#8221;,acNormal<\/p>\n<p style=\"text-align: justify;\"><strong>Para realizar cambios en el formulario de propiedad en un formulario abierto:<\/strong><\/p>\n<p style=\"text-align: justify;\">Forms![formName].propertyName = newValue<\/p>\n<p style=\"text-align: justify;\"><strong>Obtenga valor de un control en un formulario abierto:<\/strong><\/p>\n<p style=\"text-align: justify;\">Forms![formName]![controlName].Value<\/p>\n<p style=\"text-align: justify;\"><strong>Cambiar el valor de un control en un formulario abierto:<\/strong><\/p>\n<p style=\"text-align: justify;\">Forms![formName]![controlName].Value = newValue<\/p>\n<p style=\"text-align: justify;\"><strong>Cambiar una propiedad de control en un formulario abierto:<\/strong><\/p>\n<p style=\"text-align: justify;\">Forms![formName]![controlName].propertyName = newValue<\/p>\n<p style=\"text-align: justify;\"><strong>Cierre un formulario, guardando los cambios:<\/strong><\/p>\n<p style=\"text-align: justify;\">DoCmd.Close acForm, &#8220;formName&#8221;, acSaveYes<\/p>\n<p style=\"text-align: justify;\"><strong>Imprimir un informe:<\/strong><\/p>\n<p style=\"text-align: justify;\">DoCmd.OpenReport &#8220;reportName&#8221;, acViewNormal<\/p>\n<p style=\"text-align: justify;\"><strong>Ejecute una consulta de acci\u00f3n:<\/strong><\/p>\n<p style=\"text-align: justify;\">DoCmd.RunSQL &#8220;SQLstatement&#8221;<\/p>\n<p style=\"text-align: justify;\"><strong>Para mostrar un mensaje simple<\/strong><\/p>\n<p style=\"text-align: justify;\">MsgBox &#8220;yourMessage&#8221;<\/p>\n<p style=\"text-align: justify;\"><strong>Para hacer una pregunta de s\u00ed \/ no en la pantalla.<\/strong><\/p>\n<p style=\"text-align: justify;\">variable = MsgBox(&#8220;yourMessage&#8221;, vbQuestion + vbYesNo)<\/p>\n<blockquote>\n<p style=\"text-align: center;\"><strong>TAMBI\u00c9N LE\u00cdDO:<\/strong><\/p>\n<p style=\"text-align: center;\"><strong><a class=\"row-title\" href=\"http:\/\/es.accessrepairnrecovery.com\/blog\/corregir-un-error-de-access-reservado-7713-7748-7711\" aria-label=\"\u201cC\u00f3mo\u00a0corregir un error de Access reservado 7713, 7748, 7711 En Access 2016 \/ 2013\/2010\/2007\u201d (Edit)\">C\u00f3mo\u00a0corregir un error de Access reservado 7713, 7748, 7711 En Access 2016 \/ 2013\/2010\/2007<\/a><\/strong><\/p>\n<\/blockquote>\n<h3 style=\"text-align: justify;\"><strong>Navegando<\/strong>\u00a0<strong>y<\/strong>\u00a0<strong>seleccionando el c\u00f3digo en<\/strong>\u00a0<strong>Vba<\/strong><\/h3>\n<p style=\"text-align: justify;\">Puede usar estos accesos directos de VBA en la ventana de c\u00f3digo y en la ventana inmediata para simplificar su estilo de trabajo.<\/p>\n<table width=\"419\">\n<tbody>\n<tr>\n<td><strong>acci\u00f3n<\/strong><\/td>\n<td><strong>Tecla de acceso directo<\/strong><\/td>\n<\/tr>\n<tr>\n<td>Mueve el cursor hacia la derecha un caracter<\/td>\n<td>\u2192<\/td>\n<\/tr>\n<tr>\n<td>Seleccionar personaje a la derecha<\/td>\n<td>Shift + \u2192<\/td>\n<\/tr>\n<tr>\n<td>Mover el cursor a la derecha una palabra<\/td>\n<td>Ctrl + \u2192<\/td>\n<\/tr>\n<tr>\n<td>Seleccionar hasta el final de la palabra<\/td>\n<td>Ctrl + Shift + \u2192<\/td>\n<\/tr>\n<tr>\n<td>Mover el cursor a la izquierda un caracter<\/td>\n<td>\u2190<\/td>\n<\/tr>\n<tr>\n<td>Seleccionar personaje a la izquierda del cursor<\/td>\n<td>Shift + \u2190<\/td>\n<\/tr>\n<tr>\n<td>Mover el cursor a la izquierda una palabra<\/td>\n<td>Ctrl + \u2190<\/td>\n<\/tr>\n<tr>\n<td>Mueve el cursor para comenzar la l\u00ednea<\/td>\n<td>casa<\/td>\n<\/tr>\n<tr>\n<td>Seleccionar texto para comenzar la l\u00ednea<\/td>\n<td>Shift + Home<\/td>\n<\/tr>\n<tr>\n<td>Mueve el cursor al final de la l\u00ednea<\/td>\n<td>final<\/td>\n<\/tr>\n<tr>\n<td>Seleccionar texto al final de la l\u00ednea<\/td>\n<td>Shift + Fin<\/td>\n<\/tr>\n<tr>\n<td>Mueva el cursor hacia arriba en una l\u00ednea<\/td>\n<td>\u2191<\/td>\n<\/tr>\n<tr>\n<td>Mueve el cursor por una l\u00ednea<\/td>\n<td>\u2193<\/td>\n<\/tr>\n<tr>\n<td>Mueva el cursor al siguiente procedimiento<\/td>\n<td>Ctrl + \u2193<\/td>\n<\/tr>\n<tr>\n<td>Mueva el cursor al procedimiento anterior<\/td>\n<td>Ctrl + \u2191<\/td>\n<\/tr>\n<tr>\n<td>Desplazarse hacia arriba una pantalla<\/td>\n<td>Re P\u00e1g<\/td>\n<\/tr>\n<tr>\n<td>Desplazarse hacia abajo una pantalla<\/td>\n<td>AvP\u00e1g<\/td>\n<\/tr>\n<tr>\n<td>Ir al principio del m\u00f3dulo<\/td>\n<td>Ctrl + Inicio<\/td>\n<\/tr>\n<tr>\n<td>Seleccionar todo el texto al principio del m\u00f3dulo<\/td>\n<td>Ctrl +\u00a0Shift + Inicio<\/td>\n<\/tr>\n<tr>\n<td>Ir al final del m\u00f3dulo<\/td>\n<td>Ctrl + Fin<\/td>\n<\/tr>\n<tr>\n<td>Seleccionar todo el texto al final del m\u00f3dulo<\/td>\n<td>Ctrl +\u00a0Shift + Fin<\/td>\n<\/tr>\n<tr>\n<td>Cortar selecci\u00f3n<\/td>\n<td>Ctrl + X<\/td>\n<\/tr>\n<tr>\n<td>Copiar selecci\u00f3n<\/td>\n<td>Ctrl + C<\/td>\n<\/tr>\n<tr>\n<td>Pegar selecci\u00f3n<\/td>\n<td>Ctrl + V<\/td>\n<\/tr>\n<tr>\n<td>Cortar la l\u00ednea actual al portapapeles<\/td>\n<td>Ctrl + Y<\/td>\n<\/tr>\n<tr>\n<td>Eliminar hasta el final de la palabra<\/td>\n<td>Ctrl + Supr<\/td>\n<\/tr>\n<tr>\n<td>Eliminar car\u00e1cter o texto seleccionado<\/td>\n<td>Eliminar (Del)<\/td>\n<\/tr>\n<tr>\n<td>Eliminar el car\u00e1cter a la izquierda del cursor<\/td>\n<td>Retroceso<\/td>\n<\/tr>\n<tr>\n<td>Eliminar hasta el final de la palabra<\/td>\n<td>Ctrl + Supr<\/td>\n<\/tr>\n<tr>\n<td>Eliminar al comienzo de la palabra<\/td>\n<td>Ctrl + Retroceso<\/td>\n<\/tr>\n<tr>\n<td>deshacer<\/td>\n<td>Ctrl + Z<\/td>\n<\/tr>\n<tr>\n<td>L\u00ednea de sangr\u00eda<\/td>\n<td>leng\u00fceta<\/td>\n<\/tr>\n<tr>\n<td>L\u00ednea\u00a0externa<\/td>\n<td>Shift + Tab<\/td>\n<\/tr>\n<tr>\n<td>encontrar<\/td>\n<td>Ctrl + F<\/td>\n<\/tr>\n<tr>\n<td>reemplazar<\/td>\n<td>Ctrl + H<\/td>\n<\/tr>\n<tr>\n<td>Encontrar Siguiente<\/td>\n<td>F3<\/td>\n<\/tr>\n<tr>\n<td>Encontrar Anterior<\/td>\n<td>Shift + F3<\/td>\n<\/tr>\n<tr>\n<td>Obtenga ayuda con la palabra actualmente seleccionada<\/td>\n<td>F1<\/td>\n<\/tr>\n<tr>\n<td>Informaci\u00f3n r\u00e1pida<\/td>\n<td>Ctrl + I<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<h3 style=\"text-align: justify;\"><strong>Teclas de acceso directo del editor general VBA<\/strong><\/h3>\n<p style=\"text-align: justify;\">La siguiente tabla le dar\u00e1 el conocimiento de las teclas de acceso directo y sus funciones disponibles en todo el editor de Visual Basic, donde podr\u00e1escribir,\u00a0modificar y ejecutar su c\u00f3digo de VBA.<\/p>\n<table width=\"419\">\n<tbody>\n<tr>\n<td><strong>acci\u00f3n<\/strong><\/td>\n<td><strong>Tecla de acceso directo<\/strong><\/td>\n<\/tr>\n<tr>\n<td>Cambiar entre el acceso y el editor de VBA<\/td>\n<td>Alt + F11<\/td>\n<\/tr>\n<tr>\n<td>ayudar<\/td>\n<td>F1<\/td>\n<\/tr>\n<tr>\n<td>Ver el navegador de objetos<\/td>\n<td>F2<\/td>\n<\/tr>\n<tr>\n<td>Ver propiedades \/ eventos<\/td>\n<td>F4<\/td>\n<\/tr>\n<tr>\n<td>Ver ventana de c\u00f3digo<\/td>\n<td>F7<\/td>\n<\/tr>\n<tr>\n<td>Ver ventana Inmediato<\/td>\n<td>Ctrl + G<\/td>\n<\/tr>\n<tr>\n<td>Ver el men\u00fa contextual<\/td>\n<td>Shift + F10 (o clic derecho)<\/td>\n<\/tr>\n<tr>\n<td>Ejecutar un Sub \/\u00a0UserForm<\/td>\n<td>F5<\/td>\n<\/tr>\n<tr>\n<td>Detener la ejecuci\u00f3n del c\u00f3digo<\/td>\n<td>Ctrl + Pausa<\/td>\n<\/tr>\n<tr>\n<td>Cierre el Editor de VBA y regrese a Access<\/td>\n<td>Alt + Q<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<h3 style=\"text-align: justify;\"><strong>VBA depurar atajo llaves<\/strong><\/h3>\n<p style=\"text-align: justify;\">El c\u00f3digo en el lenguaje de programaci\u00f3n tiene que ser exactamente, no puede haber errores o errores.\u00a0Si hay alg\u00fan error o error, entonces mostrar\u00e1 un problema de compilaci\u00f3n.\u00a0Afortunadamente, puede depurar el c\u00f3digo de VBA r\u00e1pidamente con estos accesos directos de depuraci\u00f3n.<\/p>\n<table width=\"419\">\n<tbody>\n<tr>\n<td><strong>acci\u00f3n<\/strong><\/td>\n<td><strong>Tecla de acceso directo<\/strong><\/td>\n<\/tr>\n<tr>\n<td>Alternar punto de interrupci\u00f3n<\/td>\n<td>F9<\/td>\n<\/tr>\n<tr>\n<td>Entra en<\/td>\n<td>F8<\/td>\n<\/tr>\n<tr>\n<td>Paso sobre<\/td>\n<td>Shift + F8<\/td>\n<\/tr>\n<tr>\n<td>Salir<\/td>\n<td>Ctrl + Shift + F8<\/td>\n<\/tr>\n<tr>\n<td>Ejecutar al cursor<\/td>\n<td>Ctrl + F8<\/td>\n<\/tr>\n<tr>\n<td>Borrar todos los puntos de interrupci\u00f3n<\/td>\n<td>Ctrl + F9<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<h2 style=\"text-align: justify;\">Access importante C\u00f3digo VBA junto con los ejemplos<\/h2>\n<h3 style=\"text-align: justify;\">ChangeLinkPath<\/h3>\n<p style=\"text-align: justify;\">Esta funci\u00f3n se utiliza principalmente para cambiar la ruta anterior de las tablas vinculadas a una nueva ruta. La funci\u00f3n hace esto abandonando las tablas vinculadas y luego vincul\u00e1ndolas a la misma tabla en la base de datos especificada en la nueva ruta.<\/p>\n<blockquote>\n<p style=\"text-align: justify;\"><em>Public Function ChangeLinkPath(strNewPath As String) As String\u00a0<\/em><\/p>\n<p style=\"text-align: justify;\"><em>Dim dbs As DAO.Database\u00a0<\/em><br \/>\n<em>Dim strTblName As String\u00a0<\/em><br \/>\n<em>Dim colTbl As Collection\u00a0<\/em><br \/>\n<em>Dim intTbl As Integer\u00a0<\/em><\/p>\n<p style=\"text-align: justify;\"><em>If strNewPath &lt;&gt; &#8220;&#8221; And Dir(strNewPath) &lt;&gt; &#8220;&#8221; Then<\/em><\/p>\n<p style=\"text-align: justify;\"><em>\u00a0\u00a0\u00a0\u00a0\u00a0 Set colTbl = New Collection\u00a0<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0 Set dbs = CurrentDb\u00a0<\/em><\/p>\n<p style=\"text-align: justify;\"><em>\u00a0\u00a0\u00a0\u00a0\u00a0 For intTbl = dbs.TableDefs.Count &#8211; 1 To 0 Step -1\u00a0<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 If dbs.TableDefs(intTbl).Connect &lt;&gt; &#8220;&#8221; And _\u00a0<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Not dbs.TableDefs(intTbl).Connect Like &#8220;*&#8221; &amp; strNewPath Then\u00a0<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 colTbl.Add dbs.TableDefs(intTbl).Name\u00a0<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 dbs.TableDefs.Delete dbs.TableDefs(intTbl).Name\u00a0<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 End If\u00a0<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0 Next intTbl\u00a0<\/em><\/p>\n<p style=\"text-align: justify;\"><em>\u00a0\u00a0\u00a0\u00a0\u00a0 For intTbl = colTbl.Count To 1 Step -1\u00a0<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 strTblName = colTbl(intTbl)\u00a0<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 DoCmd.TransferDatabase acLink, &#8220;Microsoft Access&#8221;, _\u00a0<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 strNewPath, acTable, strTblName, strTblName\u00a0<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Debug.Print &#8220;connection made to &#8216;&#8221; &amp; strTblName &amp; &#8220;&#8216;&#8221;\u00a0<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0 Next intTbl\u00a0<\/em><\/p>\n<p style=\"text-align: justify;\"><em>\u00a0\u00a0\u00a0\u00a0\u00a0 Set dbs = Nothing\u00a0<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0 Set colTbl = Nothing\u00a0<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0 Debug.Print &#8220;DONE!&#8221;\u00a0<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0 ChangeLinkPath = &#8220;DONE!&#8221;\u00a0<\/em><\/p>\n<p style=\"text-align: justify;\"><em>Else<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0 Debug.Print &#8220;New path not provided. No changes made!&#8221;<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0 ChangeLinkPath = &#8220;New path not provided. No changes made!&#8221;<\/em><\/p>\n<p style=\"text-align: justify;\"><em>End If<\/em><\/p>\n<p style=\"text-align: justify;\"><em>Exit Function\u00a0<\/em><br \/>\n<em>End Function<\/em><\/p>\n<\/blockquote>\n<h3 style=\"text-align: justify;\">ImportExportSpecification<\/h3>\n<p style=\"text-align: justify;\">Esta secci\u00f3n de Access VBA contiene documentaci\u00f3n para todos los objetos, propiedades, m\u00e9todos y eventos contenidos en el modelo de objetos de acceso.<\/p>\n<p style=\"text-align: justify;\">El objeto ImportExportSpecification contiene toda la informaci\u00f3n que el acceso necesita para repetir una operaci\u00f3n de importaci\u00f3n \/ exportaci\u00f3n sin proporcionar ninguna entrada.<\/p>\n<p style=\"text-align: justify;\">Debe usar el m\u00e9todo Agregar de la colecci\u00f3n ImportExportSpecifications para crear un nuevo objeto ImportExportSpecification. Use el m\u00e9todo Execute para ejecutar la operaci\u00f3n de importaci\u00f3n o exportaci\u00f3n guardada.<\/p>\n<blockquote>\n<p style=\"text-align: center;\"><strong>TAMBI\u00c9N LE\u00cdDO:<\/strong><\/p>\n<p style=\"text-align: center;\"><strong><a class=\"row-title\" href=\"http:\/\/es.accessrepairnrecovery.com\/blog\/corregir-ms-access-no-responde-error\" aria-label=\"\u201cC\u00f3mo corregir \u201cMS Access no responde\u201d Error en Access 2010\/2013\/2016?\u201d (Edit)\">C\u00f3mo corregir \u201cMS Access no responde\u201d Error en Access 2010\/2013\/2016?<\/a><\/strong><\/p>\n<\/blockquote>\n<h3 style=\"text-align: justify;\">ConcatenateFieldValues<\/h3>\n<p style=\"text-align: justify;\">Bueno, esta funci\u00f3n se basa en un nombre de funci\u00f3n concatenar. Se usa para crear una cadena concatenada a partir de los valores de un solo campo a partir de los registros completos que se desean incluir en la cadena concatenada.<\/p>\n<p style=\"text-align: justify;\">Los registros que se incluir\u00e1n, m\u00e1s el campo que se utilizar\u00e1 para crear la cadena concatenada, vienen dados por la declaraci\u00f3n SQL que se pasa a la funci\u00f3n.<\/p>\n<p style=\"text-align: justify;\">La instrucci\u00f3n SQL pasada debe devolver solo un campo para que esta funci\u00f3n funcione correctamente. El valor en la cadena concatenada est\u00e1 dado por la cadena que se proporciona a la funci\u00f3n como una cadena delimitadora.<\/p>\n<blockquote>\n<p style=\"text-align: justify;\"><em>Public Function ConcatenateFieldValues(pstrSQL As String, _<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0 Optional pstrDelim As String = &#8220;, &#8220;) As String<\/em><\/p>\n<p style=\"text-align: justify;\"><em>Dim strConcat As String<\/em><\/p>\n<p style=\"text-align: justify;\"><em>&#8216;======For ADO comment next 2 lines and =======<\/em><br \/>\n<em>&#8216;====== uncomment out ADO lines below =======<\/em><br \/>\n<em>Dim db As DAO.Database<\/em><br \/>\n<em>Dim rs As DAO.Recordset<\/em><br \/>\n<em>On Error Resume Next<\/em><br \/>\n<em>strConcat = &#8220;&#8221;<\/em><br \/>\n<em>&#8216;======For ADO comment out next 2 DAO lines and =======<\/em><br \/>\n<em>&#8216;====== uncomment ADO lines below =======<\/em><br \/>\n<em>Set db = CurrentDb<\/em><br \/>\n<em>Set rs = db.OpenRecordset(pstrSQL)<\/em><\/p>\n<p style=\"text-align: justify;\"><em>&#8216;======For ADO uncomment next two lines and =====<\/em><br \/>\n<em>&#8216;====== comment out DAO lines above and below ======<\/em><br \/>\n<em>&#8216; Dim rs As New ADODB.Recordset<\/em><br \/>\n<em>&#8216; rs.Open pstrSQL, CurrentProject.Connection, _<\/em><br \/>\n<em>&#8216;\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 adOpenKeyset, adLockOptimistic<\/em><br \/>\n<em>With rs<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0 If Not .EOF Then<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 .MoveFirst<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Do While Not .EOF<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 strConcat = strConcat &amp; .Fields(0) &amp; pstrDelim<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 .MoveNext<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Loop<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0 End If<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0 .Close<\/em><br \/>\n<em>End With<\/em><br \/>\n<em>Set rs = Nothing<\/em><br \/>\n<em>&#8216;====== Comment next 2 lines for ADO ========<\/em><br \/>\n<em>db.Close<\/em><br \/>\n<em>Set db = Nothing<\/em><br \/>\n<em>If Len(strConcat) &gt; 0 Then strConcat = _<\/em><br \/>\n<em>\u00a0\u00a0\u00a0\u00a0\u00a0 Left(strConcat, Len(strConcat) &#8211; Len(pstrDelim))<\/em><br \/>\n<em>ConcatenateFieldValues = strConcat<\/em><br \/>\n<em>Exit Function<\/em><br \/>\n<em>End Function<\/em><\/p>\n<\/blockquote>\n<h3 style=\"text-align: justify;\">DeleteAllRelationships ()<\/h3>\n<p style=\"text-align: justify;\">El c\u00f3digo de funci\u00f3n DeleteAllRelationships () se usa b\u00e1sicamente para eliminar todas las relaciones en la base de datos actual.<\/p>\n<p style=\"text-align: justify;\">En algunas circunstancias, la base de datos de acceso no puede mostrar las relaciones entre tablas en la ventana de relaciones. Como no pod\u00eda ver la relaci\u00f3n ni tampoco pod\u00eda eliminarla, lo que llevar\u00e1 a su base de datos a un estado incoherente. Entonces, para tales casos, este c\u00f3digo se proporciona como una soluci\u00f3n.<\/p>\n<blockquote>\n<p style=\"text-align: justify;\"><em>Function DeleteAllRelationships() As String<\/em><br \/>\n<em>&#8216; WARNING: Deletes all relationships in the current database.<\/em><br \/>\n<em>Dim db As Database &#8216; Current DB<\/em><br \/>\n<em>Dim rex As Relations &#8216; Relations of currentDB.<\/em><br \/>\n<em>Dim rel As Relation &#8216; Relationship being deleted.<\/em><br \/>\n<em>Dim iKt As Integer &#8216; Count of relations deleted.<\/em><br \/>\n<em>Dim sMsg As String &#8216; MsgBox string.<\/em><\/p>\n<p style=\"text-align: justify;\"><em>sMsg = &#8220;About to delete ALL relationships between tables in the current database.&#8221; &amp; vbCrLf &amp; &#8220;Continue?&#8221;<\/em><br \/>\n<em>If MsgBox(sMsg, vbQuestion + vbYesNo + vbDefaultButton2, &#8220;Are you sure?&#8221;) = vbNo Then<\/em><br \/>\n<em>DeleteAllRelationships = &#8220;Operation cancelled&#8221;<\/em><br \/>\n<em>Exit Function<\/em><br \/>\n<em>End If<\/em><\/p>\n<p style=\"text-align: justify;\"><em>Set db = CurrentDb()<\/em><br \/>\n<em>Set rex = db.Relations<\/em><br \/>\n<em>iKt = rex.Count<\/em><br \/>\n<em>Do While rex.Count &gt; 0<\/em><br \/>\n<em>Debug.Print rex(0).Name<\/em><br \/>\n<em>rex.Delete rex(0).Name<\/em><br \/>\n<em>Loop<\/em><br \/>\n<em>DeleteAllRelationships = iKt &amp; &#8221; relationship(s) deleted&#8221;<\/em><br \/>\n<em>End Function<\/em><\/p>\n<p style=\"text-align: justify;\">Simplemente copie y pegue esta funci\u00f3n en un m\u00f3dulo. Presione Ctrl + G para abrir la ventana Inmediato. Entrar:<\/p>\n<p style=\"text-align: justify;\"><em>? DeleteAllRelationships()<\/em><\/p>\n<\/blockquote>\n<h4 style=\"text-align: justify;\">Conclusi\u00f3n:<\/h4>\n<p style=\"text-align: justify;\">Afortunadamente, todos ustedes deben haber obtenido mucho conocimiento sobre el c\u00f3digo Access VBA. \u00a1EXPLORA TUS IDEAS EN LA PROGRAMACI\u00d3N CON ACCESO &#8230;.!<\/p>\n<p style=\"text-align: justify;\"><div style='margin: 8px 0; clear: both;'><div style='border: 1px solid #b10923; border-radius: 3px; background: #ffffff; color: #000; margin-top: 30px;'><div style='color: #fff; display: inline; background: #b10923; padding: 10px; border: 1px solid #b10923; border-bottom-right-radius: 10px; border-top-left-radius: 10px; border-top-right-radius: 10px; margin-left: -1px;'><i class='fas fa-lightbulb fa-lg'><\/i><strong style='font-size: 18px; vertical-align: middle;'>\u00bfA\u00fan tienes problemas? Arreglarlos con Stellar reparaci\u00f3n para Access: <\/strong><\/div><div style='padding: 1rem; line-height: 1.6;'><p style='margin: 0; font-size: 17px;'>Este software asegura sin costura reparaci\u00f3n y recuperaci\u00f3n de la base de datos ACCDB y MDB. Es Restaura todos los objetos, incluidas tablas, informes, consultas, registros, formularios e \u00edndices, junto con m\u00f3dulos, macros, etc. Solucione los problemas de Microsoft Access ahora en 3 sencillos pasos:<\/p><div><ol style='font-size: 17px;'><li><strong><a href='https:\/\/www.accessrepairnrecovery.com\/blog\/get-access-file-repair-tool' target='_blank'> Descargue Stellar Access base de datos reparaci\u00f3n herramienta<\/a><\/strong> calificado como <i> Excelente <\/i> en Cnet.<\/li><li>Haga clic en la opci\u00f3n <strong> Examinar <\/strong> y <strong> Buscar <\/strong> para localizar la base de datos de Access corrupta.<\/li><li>Haga clic en el bot\u00f3n <strong> Reparar <\/strong> para reparar y obtener una vista previa de los objetos de la base de datos.<\/li><\/ol><\/div><\/div><\/div><\/div>\n\n<div style=\"font-size: 0px; height: 0px; line-height: 0px; margin: 0; padding: 0; clear: both;\"><\/div>","protected":false},"excerpt":{"rendered":"<p>resumen: Este tutorial lo ayuda en las herramientas de programaci\u00f3n, es decir, el c\u00f3digo VBA en Microsoft Access y puede &#8230; <\/p>\n<p class=\"read-more-container\"><a title=\"Aprenda todo sobre el Microsoft Access c\u00f3digo de  VBA: funciones de VBA, accesos directos y mucho m\u00e1s &#8230;!\" class=\"read-more button\" href=\"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba#more-559\" aria-label=\"Read more about Aprenda todo sobre el Microsoft Access c\u00f3digo de  VBA: funciones de VBA, accesos directos y mucho m\u00e1s &#8230;!\">Read more<\/a><\/p>\n","protected":false},"author":2,"featured_media":562,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[1492],"tags":[445,443,444,446,447],"class_list":["post-559","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-tutoriales","tag-access-al-codigo-de-programacion-vba","tag-access-al-codigo-vba","tag-access-al-codigo-vba-con-un-ejemplo","tag-codigo-de-microsoft-access-vba","tag-ms-funciones-de-access","resize-featured-image"],"yoast_head":"<!-- This site is optimized with the Yoast SEO plugin v25.8 - https:\/\/yoast.com\/wordpress\/plugins\/seo\/ -->\n<title>Aprenda todo sobre el Microsoft Access c\u00f3digo de VBA: funciones de VBA, accesos directos y mucho m\u00e1s ...!<\/title>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba\" \/>\n<meta property=\"og:locale\" content=\"en_US\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Aprenda todo sobre el Microsoft Access c\u00f3digo de VBA: funciones de VBA, accesos directos y mucho m\u00e1s ...!\" \/>\n<meta property=\"og:description\" content=\"resumen: Este tutorial lo ayuda en las herramientas de programaci\u00f3n, es decir, el c\u00f3digo VBA en Microsoft Access y puede ... Read more\" \/>\n<meta property=\"og:url\" content=\"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba\" \/>\n<meta property=\"og:site_name\" content=\"Blog de Reparacion y Recuperacion de MS Access\" \/>\n<meta property=\"article:published_time\" content=\"2018-04-10T06:43:41+00:00\" \/>\n<meta property=\"article:modified_time\" content=\"2021-08-05T04:52:03+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-content\/uploads\/2018\/04\/ACCESS-es.png\" \/>\n\t<meta property=\"og:image:width\" content=\"777\" \/>\n\t<meta property=\"og:image:height\" content=\"520\" \/>\n\t<meta property=\"og:image:type\" content=\"image\/png\" \/>\n<meta name=\"author\" content=\"Pearson Willey\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:creator\" content=\"@https:\/\/twitter.com\/pearson_willey\" \/>\n<meta name=\"twitter:label1\" content=\"Written by\" \/>\n\t<meta name=\"twitter:data1\" content=\"Pearson Willey\" \/>\n\t<meta name=\"twitter:label2\" content=\"Est. reading time\" \/>\n\t<meta name=\"twitter:data2\" content=\"9 minutes\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"Article\",\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba#article\",\"isPartOf\":{\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba\"},\"author\":{\"name\":\"Pearson Willey\",\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/#\/schema\/person\/4c2a496ffa12e8946e6a4b24a5da9389\"},\"headline\":\"Aprenda todo sobre el Microsoft Access c\u00f3digo de VBA: funciones de VBA, accesos directos y mucho m\u00e1s &#8230;!\",\"datePublished\":\"2018-04-10T06:43:41+00:00\",\"dateModified\":\"2021-08-05T04:52:03+00:00\",\"mainEntityOfPage\":{\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba\"},\"wordCount\":1891,\"publisher\":{\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/#organization\"},\"image\":{\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba#primaryimage\"},\"thumbnailUrl\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-content\/uploads\/2018\/04\/ACCESS-es.png\",\"keywords\":[\"Access al c\u00f3digo de programaci\u00f3n VBA\",\"Access al c\u00f3digo VBA\",\"Access al c\u00f3digo VBA con un ejemplo\",\"C\u00f3digo de Microsoft Access VBA\",\"ms Funciones de access\"],\"articleSection\":[\"Tutoriales\"],\"inLanguage\":\"en-US\"},{\"@type\":\"WebPage\",\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba\",\"url\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba\",\"name\":\"Aprenda todo sobre el Microsoft Access c\u00f3digo de VBA: funciones de VBA, accesos directos y mucho m\u00e1s ...!\",\"isPartOf\":{\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/#website\"},\"primaryImageOfPage\":{\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba#primaryimage\"},\"image\":{\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba#primaryimage\"},\"thumbnailUrl\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-content\/uploads\/2018\/04\/ACCESS-es.png\",\"datePublished\":\"2018-04-10T06:43:41+00:00\",\"dateModified\":\"2021-08-05T04:52:03+00:00\",\"breadcrumb\":{\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba#breadcrumb\"},\"inLanguage\":\"en-US\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba\"]}]},{\"@type\":\"ImageObject\",\"inLanguage\":\"en-US\",\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba#primaryimage\",\"url\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-content\/uploads\/2018\/04\/ACCESS-es.png\",\"contentUrl\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-content\/uploads\/2018\/04\/ACCESS-es.png\",\"width\":777,\"height\":520,\"caption\":\"Aprenda todo sobre el Microsoft Access c\u00f3digo de VBA: funciones de VBA, accesos directos y mucho m\u00e1s ...!\"},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\/\/es.accessrepairnrecovery.com\/blog\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Aprenda todo sobre el Microsoft Access c\u00f3digo de VBA: funciones de VBA, accesos directos y mucho m\u00e1s &#8230;!\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/#website\",\"url\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/\",\"name\":\"Blog de Reparacion y Recuperacion de MS Access\",\"description\":\"Su Destino \u00fanico para Correcciones, Tutoriales y m\u00e1s de MS Access\",\"publisher\":{\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/#organization\"},\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/?s={search_term_string}\"},\"query-input\":{\"@type\":\"PropertyValueSpecification\",\"valueRequired\":true,\"valueName\":\"search_term_string\"}}],\"inLanguage\":\"en-US\"},{\"@type\":\"Organization\",\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/#organization\",\"name\":\"Blog de Reparacion y Recuperacion de MS Access\",\"url\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/\",\"logo\":{\"@type\":\"ImageObject\",\"inLanguage\":\"en-US\",\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/#\/schema\/logo\/image\/\",\"url\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-content\/uploads\/2021\/07\/accessrepairnrecovery-com-logo.png\",\"contentUrl\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-content\/uploads\/2021\/07\/accessrepairnrecovery-com-logo.png\",\"width\":350,\"height\":70,\"caption\":\"Blog de Reparacion y Recuperacion de MS Access\"},\"image\":{\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/#\/schema\/logo\/image\/\"}},{\"@type\":\"Person\",\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/#\/schema\/person\/4c2a496ffa12e8946e6a4b24a5da9389\",\"name\":\"Pearson Willey\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"en-US\",\"@id\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/#\/schema\/person\/image\/\",\"url\":\"https:\/\/secure.gravatar.com\/avatar\/1e14359741626aa0b5f1415dc1929323c9923a9826470b578bddbc2a39751640?s=96&d=mm&r=g\",\"contentUrl\":\"https:\/\/secure.gravatar.com\/avatar\/1e14359741626aa0b5f1415dc1929323c9923a9826470b578bddbc2a39751640?s=96&d=mm&r=g\",\"caption\":\"Pearson Willey\"},\"description\":\"Pearson Willey es escritor de contenido de sitios web y planificador de contenido de formato largo. Adem\u00e1s de esto, tambi\u00e9n es un \u00e1vido lector. Por lo tanto, sabe muy bien c\u00f3mo escribir un contenido atractivo para los lectores. Escribir es como una ventaja creciente para \u00e9l. Le encanta explorar sus conocimientos on MS Access y compartiendo Tecnolog\u00eda blog.\",\"sameAs\":[\"https:\/\/www.linkedin.com\/in\/pearson-willey-4b8887194\/\",\"https:\/\/x.com\/https:\/\/twitter.com\/pearson_willey\"],\"url\":\"https:\/\/es.accessrepairnrecovery.com\/blog\/author\/pearson\"}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"Aprenda todo sobre el Microsoft Access c\u00f3digo de VBA: funciones de VBA, accesos directos y mucho m\u00e1s ...!","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba","og_locale":"en_US","og_type":"article","og_title":"Aprenda todo sobre el Microsoft Access c\u00f3digo de VBA: funciones de VBA, accesos directos y mucho m\u00e1s ...!","og_description":"resumen: Este tutorial lo ayuda en las herramientas de programaci\u00f3n, es decir, el c\u00f3digo VBA en Microsoft Access y puede ... Read more","og_url":"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba","og_site_name":"Blog de Reparacion y Recuperacion de MS Access","article_published_time":"2018-04-10T06:43:41+00:00","article_modified_time":"2021-08-05T04:52:03+00:00","og_image":[{"width":777,"height":520,"url":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-content\/uploads\/2018\/04\/ACCESS-es.png","type":"image\/png"}],"author":"Pearson Willey","twitter_card":"summary_large_image","twitter_creator":"@https:\/\/twitter.com\/pearson_willey","twitter_misc":{"Written by":"Pearson Willey","Est. reading time":"9 minutes"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba#article","isPartOf":{"@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba"},"author":{"name":"Pearson Willey","@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/#\/schema\/person\/4c2a496ffa12e8946e6a4b24a5da9389"},"headline":"Aprenda todo sobre el Microsoft Access c\u00f3digo de VBA: funciones de VBA, accesos directos y mucho m\u00e1s &#8230;!","datePublished":"2018-04-10T06:43:41+00:00","dateModified":"2021-08-05T04:52:03+00:00","mainEntityOfPage":{"@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba"},"wordCount":1891,"publisher":{"@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/#organization"},"image":{"@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba#primaryimage"},"thumbnailUrl":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-content\/uploads\/2018\/04\/ACCESS-es.png","keywords":["Access al c\u00f3digo de programaci\u00f3n VBA","Access al c\u00f3digo VBA","Access al c\u00f3digo VBA con un ejemplo","C\u00f3digo de Microsoft Access VBA","ms Funciones de access"],"articleSection":["Tutoriales"],"inLanguage":"en-US"},{"@type":"WebPage","@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba","url":"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba","name":"Aprenda todo sobre el Microsoft Access c\u00f3digo de VBA: funciones de VBA, accesos directos y mucho m\u00e1s ...!","isPartOf":{"@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/#website"},"primaryImageOfPage":{"@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba#primaryimage"},"image":{"@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba#primaryimage"},"thumbnailUrl":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-content\/uploads\/2018\/04\/ACCESS-es.png","datePublished":"2018-04-10T06:43:41+00:00","dateModified":"2021-08-05T04:52:03+00:00","breadcrumb":{"@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba#breadcrumb"},"inLanguage":"en-US","potentialAction":[{"@type":"ReadAction","target":["https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba"]}]},{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba#primaryimage","url":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-content\/uploads\/2018\/04\/ACCESS-es.png","contentUrl":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-content\/uploads\/2018\/04\/ACCESS-es.png","width":777,"height":520,"caption":"Aprenda todo sobre el Microsoft Access c\u00f3digo de VBA: funciones de VBA, accesos directos y mucho m\u00e1s ...!"},{"@type":"BreadcrumbList","@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/microsoft-access-codigo-de-vba#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/es.accessrepairnrecovery.com\/blog"},{"@type":"ListItem","position":2,"name":"Aprenda todo sobre el Microsoft Access c\u00f3digo de VBA: funciones de VBA, accesos directos y mucho m\u00e1s &#8230;!"}]},{"@type":"WebSite","@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/#website","url":"https:\/\/es.accessrepairnrecovery.com\/blog\/","name":"Blog de Reparacion y Recuperacion de MS Access","description":"Su Destino \u00fanico para Correcciones, Tutoriales y m\u00e1s de MS Access","publisher":{"@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/#organization"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/es.accessrepairnrecovery.com\/blog\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"en-US"},{"@type":"Organization","@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/#organization","name":"Blog de Reparacion y Recuperacion de MS Access","url":"https:\/\/es.accessrepairnrecovery.com\/blog\/","logo":{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/#\/schema\/logo\/image\/","url":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-content\/uploads\/2021\/07\/accessrepairnrecovery-com-logo.png","contentUrl":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-content\/uploads\/2021\/07\/accessrepairnrecovery-com-logo.png","width":350,"height":70,"caption":"Blog de Reparacion y Recuperacion de MS Access"},"image":{"@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/#\/schema\/logo\/image\/"}},{"@type":"Person","@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/#\/schema\/person\/4c2a496ffa12e8946e6a4b24a5da9389","name":"Pearson Willey","image":{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/es.accessrepairnrecovery.com\/blog\/#\/schema\/person\/image\/","url":"https:\/\/secure.gravatar.com\/avatar\/1e14359741626aa0b5f1415dc1929323c9923a9826470b578bddbc2a39751640?s=96&d=mm&r=g","contentUrl":"https:\/\/secure.gravatar.com\/avatar\/1e14359741626aa0b5f1415dc1929323c9923a9826470b578bddbc2a39751640?s=96&d=mm&r=g","caption":"Pearson Willey"},"description":"Pearson Willey es escritor de contenido de sitios web y planificador de contenido de formato largo. Adem\u00e1s de esto, tambi\u00e9n es un \u00e1vido lector. Por lo tanto, sabe muy bien c\u00f3mo escribir un contenido atractivo para los lectores. Escribir es como una ventaja creciente para \u00e9l. Le encanta explorar sus conocimientos on MS Access y compartiendo Tecnolog\u00eda blog.","sameAs":["https:\/\/www.linkedin.com\/in\/pearson-willey-4b8887194\/","https:\/\/x.com\/https:\/\/twitter.com\/pearson_willey"],"url":"https:\/\/es.accessrepairnrecovery.com\/blog\/author\/pearson"}]}},"_links":{"self":[{"href":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-json\/wp\/v2\/posts\/559","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-json\/wp\/v2\/comments?post=559"}],"version-history":[{"count":2,"href":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-json\/wp\/v2\/posts\/559\/revisions"}],"predecessor-version":[{"id":2426,"href":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-json\/wp\/v2\/posts\/559\/revisions\/2426"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-json\/wp\/v2\/media\/562"}],"wp:attachment":[{"href":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-json\/wp\/v2\/media?parent=559"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-json\/wp\/v2\/categories?post=559"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/es.accessrepairnrecovery.com\/blog\/wp-json\/wp\/v2\/tags?post=559"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}