{"id":5266,"date":"2014-01-11T21:14:55","date_gmt":"2014-01-12T03:14:55","guid":{"rendered":"http:\/\/aplicaexcelcontable.com\/blog\/?p=5266"},"modified":"2024-12-07T18:22:35","modified_gmt":"2024-12-08T00:22:35","slug":"creando-un-userform-3-paso-a-paso","status":"publish","type":"post","link":"https:\/\/aplicaexcelcontable.com\/blog\/creando-un-userform-3-paso-a-paso.html","title":{"rendered":"Creando un UserForm 3 paso a paso"},"content":{"rendered":"<h1 style=\"text-align: center;\">Creando un UserForm 3 paso a paso&nbsp;<\/h1>\n<p style=\"text-align: justify;\">Comencemos con el articulo <strong>Curso Basico de VBA &#8211; Creando un Userform 3 &nbsp;paso a paso:<\/strong><\/p>\n<h2 style=\"text-align: center;\">Creando un UserForm 3 -C\u00f3digos para programar el bot\u00f3n \u00abAgregar\u00bb<\/h2>\n<p style=\"text-align: justify;\">Vamos a comenzar con el tema de hoy, pero antes te invito a que repases el tema anterior <span style=\"color: rgb(0, 23, 255);\"><a href=\"https:\/\/aplicaexcelcontable.com\/blog\/programar-en-excel-creando-un-userform-paso-a-paso-2.html\" style=\"outline: none;\" target=\"_blank\"><strong>pulsando clic aqu\u00ed<\/strong><\/a><\/span>.<\/p>\n<p style=\"text-align: justify;\">Y si ya lo le\u00edste y aplicaste todos los pasos del tema anterior, entonces continua con este tema.<\/p>\n<p style=\"text-align: justify;\">Hoy vamos a escribir los c\u00f3digos correspondiente al bot\u00f3n \u00abAgregar\u00bb del Formulario (UserForm).<\/p>\n<h3 style=\"text-align: center;\">Creando un UserForm 3 &#8211; Agregamos el c\u00f3digo al bot\u00f3n \u00abAgregar\u00bb<\/h3>\n<ul>\n<li><span><strong>Seleccionamos el bot\u00f3n \u00abAgregar\u00bb:&nbsp;<\/strong>Desde el men\u00fa superior elegimos la opci\u00f3n \u00abVer\u00bb &gt; \u00abC\u00f3digo\u00bb. Esto abrir\u00e1 una ventana donde podremos escribir \u00abC\u00f3digo Macro\u00bb para dicho objeto.<\/span><\/li>\n<\/ul>\n<p><span><img loading=\"lazy\" decoding=\"async\" alt=\"Creando un UserForm 3\" width=\"620\" height=\"436\" title=\"Ejemplo de la Imagen\" data-id=\"35500\" src=\"\/\/aplicaexcelcontable.com\/blog\/wp-content\/uploads\/2018\/03\/Cogidos-para-el-Boton-Agregar.png\" data-width=\"620\" data-height=\"436\" data-init-width=\"620\" data-init-height=\"436\" style=\"aspect-ratio: auto 620 \/ 436;\"><\/span><\/p>\n<h4 style=\"text-align: center;\">Donde titila el cursor escribimos lo siguiente:<\/h4>\n<blockquote>\n<p>&#8216;definimos las variables<\/p>\n<p>Dim iFila As Long<\/p>\n<p>Dim ws As Worksheet<\/p>\n<p>Set ws = Worksheets(1) &#8216; Encuentra la siguiente fila vac\u00eda<\/p>\n<p>iFila = ws.Cells(Rows.Count, 1)\u00a0.End(xlUp).Offset(1, 0).Row<\/p>\n<p>&#8216; Verifica que se ingrese un nombre<\/p>\n<p>If Trim(Me.UFNombre.Value) = \u00ab\u00bb Then<\/p>\n<p>Me.UFNombre.SetFocus<\/p>\n<p>MsgBox \u00abDebe ingresar un nombre\u00bb<\/p>\n<p>Exit Sub<\/p>\n<p>End If<\/p>\n<p>&#8216; Copia los datos a la tabla Excel<\/p>\n<p>ws.Cells(iFila, 1).Value = Me.UFNombre.Value<\/p>\n<p>ws.Cells(iFila, 2).Value = Me.UFEdad.Value ws.Cells(iFila, 3).Value = Me.UFFecha.Value<\/p>\n<p>&#8216; Limpia el formulario<\/p>\n<p>Me.UFNombre.Value = \u00ab\u00bb<\/p>\n<p>Me.UFEdad.Value = \u00ab\u00bb<\/p>\n<p>Me.UFFecha.Value = \u00ab\u00bb<\/p>\n<p>Me.UFNombre.SetFocus<\/p>\n<p>End Sub<\/p>\n<\/blockquote>\n<p style=\"text-align: justify;\">En el men\u00fa superior elegimos \u00abVer\u00bb &gt; \u00abObjeto\u00bb para regresar al Userform.<\/p>\n<p style=\"text-align: justify;\">No te preocupes si no comprendes el c\u00f3digo. Hay muchos Objetos, Propiedades y M\u00e9todos nuevos. Todos ellos se explican mejor en los siguientes temas.<\/p>\n<p style=\"text-align: justify;\">Y en el pr\u00f3ximo tema, vamos a agregar el c\u00f3digo correspondiente para el bot\u00f3n \u00abCerrar\u00bb, tal a como lo hicimos hoy con el c\u00f3digo \u00abAgregar\u00bb.<\/p>\n<p style=\"text-align: justify;\">Adem\u00e1s, si te ha gustado el tema de hoy, te invito a que lo compartas con tus amigos de Facebook pulsando clic en el bot\u00f3n compartir:<\/p>\n<p style=\"text-align: justify;\">Para finalizar, me gustar\u00eda saber que piensas de este articulo \u00abProgramar en Excel &#8211; Creando un UserForm paso a paso 3\u00bb.<\/p>\n<p style=\"text-align: justify;\">Por lo tanto:<\/p>\n<p style=\"text-align: justify;\">D\u00e9jame tu comentario con dudas, cr\u00edticas constructivas y sugerencia en la secci\u00f3n de comentarios o bien en el Chat. Al mismo tiempo te invito a que visites nuestra pagina de Facebook, <span style=\"color: rgb(0, 23, 255);\"><a href=\"https:\/\/www.facebook.com\/AplicaExceContable\/\" target=\"_blank\" style=\"outline: none;\" rel=\"noopener\"><strong>pulsando clic aqu\u00ed<\/strong><\/a><\/span>.<\/p>\n<p style=\"\">Cualquier duda o pregunta, puedes escribirme directamente en la<span style=\"--tcb-text-highlight-color: rgb(237, 243, 13) !important;\">&nbsp;<\/span><a href=\"#comentario\" style=\"outline: none;\"><span style=\"--tcb-text-highlight-color: rgb(237, 243, 13) !important;\">secci\u00f3n de comentarios<\/span><\/a>, en la <a href=\"https:\/\/aplicaexcelcontable.com\/blog\/contacto\" target=\"_blank\" style=\"outline: none;\"><span style=\"--tcb-text-highlight-color: rgb(231, 100, 224) !important;\" data-text-highlight=\"bubble\">pagina del chat<\/span><\/a>, directamente en <span style=\"--tcb-text-highlight-color: rgb(30, 184, 76) !important;\">whatsapp<\/span> o bien al correo electr\u00f3nico rogerperez@aplicaexcelcontable.com.<span style=\"--tcb-text-highlight-color: transparent !important;\"><\/span><\/p>\n<p style=\"\">Te saluda,<span style=\"--tcb-text-highlight-color: transparent !important;\"><\/span><\/p>\n<p style=\"\"><strong>Roger Perez \u2013 Aplica Excel Contable<\/strong><\/p>\n","protected":false},"excerpt":{"rendered":"<p>Creando un UserForm 3 paso a paso&nbsp; Comencemos con el articulo Curso Basico de VBA &#8211; Creando un Userform 3 &nbsp;paso a paso: Creando un UserForm 3 -C\u00f3digos para programar el bot\u00f3n \u00abAgregar\u00bb Vamos a comenzar con el tema de hoy, pero antes te invito a que repases el tema anterior pulsando clic aqu\u00ed. Y [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":35507,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[4,22],"tags":[293,292,25,23,295,294,26,24],"class_list":["post-5266","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-programar-en-excel","category-curso-basico-de-vba","tag-aprender-excel","tag-excel-y-contabilidad","tag-formularios","tag-formularios-excel","tag-plantillas-excel","tag-programar-en-excel","tag-userform","tag-userform-en-vba","post-wrapper","thrv_wrapper"],"_links":{"self":[{"href":"https:\/\/aplicaexcelcontable.com\/blog\/wp-json\/wp\/v2\/posts\/5266","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/aplicaexcelcontable.com\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/aplicaexcelcontable.com\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/aplicaexcelcontable.com\/blog\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/aplicaexcelcontable.com\/blog\/wp-json\/wp\/v2\/comments?post=5266"}],"version-history":[{"count":0,"href":"https:\/\/aplicaexcelcontable.com\/blog\/wp-json\/wp\/v2\/posts\/5266\/revisions"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/aplicaexcelcontable.com\/blog\/wp-json\/wp\/v2\/media\/35507"}],"wp:attachment":[{"href":"https:\/\/aplicaexcelcontable.com\/blog\/wp-json\/wp\/v2\/media?parent=5266"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/aplicaexcelcontable.com\/blog\/wp-json\/wp\/v2\/categories?post=5266"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/aplicaexcelcontable.com\/blog\/wp-json\/wp\/v2\/tags?post=5266"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}