{"id":3808,"date":"2013-12-05T07:18:10","date_gmt":"2013-12-05T13:18:10","guid":{"rendered":"http:\/\/aplicaexcelcontable.com\/blog\/?p=3808"},"modified":"2024-12-06T21:25:03","modified_gmt":"2024-12-07T03:25:03","slug":"ejemplos-de-macros-2-en-excel","status":"publish","type":"post","link":"https:\/\/aplicaexcelcontable.com\/blog\/ejemplos-de-macros-2-en-excel.html","title":{"rendered":"Ejemplos de Macros 2 &#8211; Curso B\u00e1sico de VBA"},"content":{"rendered":"<h1 style=\"text-align: center;\">Continuamos con Ejemplos de Macros 2<\/h1>\n<p style=\"text-align: justify;\">Comencemos con el articulo <strong>Programar en Excel &#8211; Continuamos con Ejemplos de Macros 2:<\/strong><\/p>\n<p style=\"text-align: justify;\">Seguimos con los Ejemplos de Macros, pero antes, si todav\u00eda no has visto el tema anterior, por favor <span style=\"color: rgb(0, 23, 255);\"><a href=\"https:\/\/aplicaexcelcontable.com\/blog\/programar-en-excel-ejemplos-de-macros.html\" style=\"outline: none;\" target=\"_blank\"><strong>pulsa clic aqu\u00ed<\/strong><\/a><\/span> y mira el tema anterior. Una vez que termines regresa nuevamente aqu\u00ed y continua.<\/p>\n<p style=\"text-align: justify;\">Hoy vamos a ver el ejemplo numero tres y para eso te pido que lo leas con mucha concentraci\u00f3n.<\/p>\n<h2 style=\"text-align: center;\">Ejemplos de Macros 2 &#8211; Veamos el ejemplo 3<\/h2>\n<p style=\"text-align: justify;\">Bien, ahora de la siguiente manera escribamos manualmente otra nueva Macro:<\/p>\n<ul>\n<li><span>Puedes utilizar el mismo Libro1 de la Macro anterior, accede al Editor de Visual Basic con las teclas Alt + F11.<\/span><\/li>\n<li><span>La escribiremos en un objeto Hoja, as\u00ed que has doble clic en Hoja1 (Hoja1). Escribe textualmente el siguiente c\u00f3digo:<\/span><\/li>\n<\/ul>\n<p style=\"text-align: justify;\">&#8216; Esta macro copia un rango a la celda activa<\/p>\n<p style=\"text-align: justify;\">Sub CopiaRango()<\/p>\n<p style=\"text-align: justify;\">Range(\u00abA1:A5\u00bb).Copy Destination:=ActiveCell<\/p>\n<p style=\"text-align: justify;\">End Sub<\/p>\n<ul>\n<li><span>Para probar esta Macro vuelve a Excel con Alt + F11 y escribe algunos n\u00fameros o palabras a gusto en el rango A1:A5.<\/span><\/li>\n<\/ul>\n<p><span style=\"width: 100%;\"><img loading=\"lazy\" decoding=\"async\" alt=\"Ejemplos de Macros 2\" width=\"216\" height=\"172\" title=\"Palabras\" data-id=\"41610\" src=\"https:\/\/aplicaexcelcontable.com\/blog\/wp-content\/uploads\/2019\/02\/Palabras.png\" style=\"\"><\/span><\/p>\n<ul>\n<li><span>Posici\u00f3nate en la celda C1, desde el Men\u00fa \u00abHerramientas\u00bb secci\u00f3n \u00abMacros\u00bb &gt; Macro, elige de la lista la Macro \u00abCopiar rango\u00bb y luego pulsamos clic en \u00abAceptar\u00bb.<\/span><\/li>\n<li><span>El resultado ser\u00e1 que el rango A1:A5 se copiar\u00e1 a partir de la celda C1 que era la celda activa al ejecutar la Macro.<\/span><\/li>\n<\/ul>\n<h3 style=\"text-align: center;\">Ejemplo de macros 2 de la Imagen<\/h3>\n<p><span style=\"width: 100%;\"><img loading=\"lazy\" decoding=\"async\" alt=\"Ejemplos de Macros 2\" width=\"276\" height=\"152\" title=\"Imagen1\" data-id=\"41613\" src=\"https:\/\/aplicaexcelcontable.com\/blog\/wp-content\/uploads\/2019\/02\/Imagen1.png\" style=\"\"><\/span><\/p>\n<ul>\n<li><span>Esta Macro utiliza algunas OMP (Objetos, M\u00e9todos y Propiedades) nuevos:<\/span><\/li>\n<\/ul>\n<p style=\"text-align: justify;\"><strong>Range (\u00abA1:A5\u00bb):&nbsp;<\/strong>El objeto Range ya lo conoc\u00edamos&#8230;<\/p>\n<p style=\"text-align: justify;\"><strong>Copy:&nbsp;<\/strong>Este es un m\u00e9todo (Una acci\u00f3n)<\/p>\n<p style=\"text-align: justify;\"><strong>Destination:=ActiveCell:&nbsp;<\/strong>Este es otro objeto, Destination se suele utilizar luego de un Copy y ActiveCell hace referencia a la celda activa.<\/p>\n<p style=\"text-align: justify;\">Recuerda que esto es tan solo un adelanto, en los siguientes temas est\u00e1n las Macros m\u00e1s importantes que podr\u00e1s necesitar, escritas, comentadas y listas para que puedas copiar, pegar y adaptar en tus propios desarrollos.<\/p>\n<p style=\"text-align: justify;\">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;\">Me gustar\u00eda saber que piensas de este articulo \u00abProgramar en Excel &#8211; Ejemplos de Macros 2\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\" 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>Continuamos con Ejemplos de Macros 2 Comencemos con el articulo Programar en Excel &#8211; Continuamos con Ejemplos de Macros 2: Seguimos con los Ejemplos de Macros, pero antes, si todav\u00eda no has visto el tema anterior, por favor pulsa clic aqu\u00ed y mira el tema anterior. Una vez que termines regresa nuevamente aqu\u00ed y continua. [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":59905,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":"","tve_updated_post":"<div class=\"thrv_wrapper thrv_text_element\" data-tag=\"h1\"><h1 data-css=\"tve-u-16935445dac\" style=\"text-align: center;\" class=\"\">Continuamos con Ejemplos de Macros 2<\/h1><\/div><div class=\"thrv_wrapper thrv_contentbox_shortcode thrv-content-box\">\n<div class=\"tve-content-box-background\"><\/div>\n<div class=\"tve-cb tve_empty_dropzone\" data-css=\"tve-u-161e93ffb5e\"><div class=\"thrv_wrapper thrv_text_element tve_empty_dropzone\"><p data-css=\"tve-u-161e949e923\" style=\"text-align: justify;\">Comencemos con el articulo <strong>Programar en Excel - Continuamos con Ejemplos de Macros 2:<\/strong><\/p><p data-css=\"tve-u-161e949e923\" style=\"text-align: justify;\">Seguimos con los Ejemplos de Macros, pero antes, si todav\u00eda no has visto el tema anterior, por favor <span data-css=\"tve-u-161e94bc63e\" style=\"color: rgb(0, 23, 255);\"><a href=\"https:\/\/aplicaexcelcontable.com\/blog\/programar-en-excel-ejemplos-de-macros.html\" class=\"\" style=\"outline: none;\" target=\"_blank\"><strong>pulsa clic aqu\u00ed<\/strong><\/a><\/span> y mira el tema anterior. Una vez que termines regresa nuevamente aqu\u00ed y continua.<\/p><p data-css=\"tve-u-161e949e923\" style=\"text-align: justify;\">Hoy vamos a ver el ejemplo numero tres y para eso te pido que lo leas con mucha concentraci\u00f3n.<\/p><\/div><\/div>\n<\/div><div class=\"thrv_wrapper thrv_text_element\" data-tag=\"h2\"><h2 data-css=\"tve-u-161e964e82b\" style=\"text-align: center;\" class=\"\">Ejemplos de Macros 2 - Veamos el ejemplo 3<\/h2><\/div><div class=\"thrv_wrapper thrv_contentbox_shortcode thrv-content-box\">\n<div class=\"tve-content-box-background\"><\/div>\n<div class=\"tve-cb tve_empty_dropzone\" data-css=\"tve-u-161e9655920\"><div class=\"thrv_wrapper thrv_text_element tve_empty_dropzone\"><p data-css=\"tve-u-161e9655921\" style=\"text-align: justify;\">Bien, ahora de la siguiente manera escribamos manualmente otra nueva Macro:<\/p><\/div><\/div>\n<\/div><div class=\"thrv_wrapper thrv-styled_list\" data-icon-code=\"icon-check\" data-color=\"rgb(0, 0, 0)\" data-css=\"tve-u-161e966443c\"><ul class=\"tcb-styled-list\"><li class=\"thrv-styled-list-item\"><div class=\"tcb-styled-list-icon\"><div class=\"thrv_wrapper thrv_icon tve_no_drag tcb-no-delete tcb-no-clone tcb-icon-inherit-style\" data-css=\"tve-u-161e9662dcb\"><svg class=\"tcb-icon\" viewBox=\"0 0 32 32\" data-name=\"checkcheck\">\n\n<path d=\"M29.333 10.267c0 0.4-0.133 0.8-0.533 1.2l-14.8 14.8c-0.267 0.267-0.667 0.4-1.067 0.4s-0.933-0.133-1.2-0.533l-2.4-2.267-6.267-6.267c-0.267-0.267-0.4-0.667-0.4-1.2s0.133-0.8 0.533-1.2l2.4-2.4c0.267-0.133 0.667-0.4 1.067-0.4s0.8 0.133 1.2 0.533l5.067 5.067 11.2-11.333c0.267-0.267 0.667-0.533 1.2-0.533 0.4 0 0.8 0.133 1.2 0.533l2.4 2.4c0.267 0.267 0.4 0.667 0.4 1.2z\"><\/path>\n<\/svg><\/div><\/div><span class=\"thrv-advanced-inline-text tve_editable tcb-styled-list-icon-text tcb-no-delete\" data-css=\"tve-u-169355799d1\"><div style=\"text-align: justify;\">Puedes utilizar el mismo Libro1 de la Macro anterior, accede al Editor de Visual Basic con las teclas Alt + F11.<\/div><\/span><\/li><li class=\"thrv-styled-list-item\"><div class=\"tcb-styled-list-icon\"><div class=\"thrv_wrapper thrv_icon tve_no_drag tcb-no-delete tcb-no-clone tcb-icon-inherit-style\" data-css=\"tve-u-161e96702f9\"><svg class=\"tcb-icon\" viewBox=\"0 0 32 32\" data-name=\"checkcheck\">\n\n<path d=\"M29.333 10.267c0 0.4-0.133 0.8-0.533 1.2l-14.8 14.8c-0.267 0.267-0.667 0.4-1.067 0.4s-0.933-0.133-1.2-0.533l-2.4-2.267-6.267-6.267c-0.267-0.267-0.4-0.667-0.4-1.2s0.133-0.8 0.533-1.2l2.4-2.4c0.267-0.133 0.667-0.4 1.067-0.4s0.8 0.133 1.2 0.533l5.067 5.067 11.2-11.333c0.267-0.267 0.667-0.533 1.2-0.533 0.4 0 0.8 0.133 1.2 0.533l2.4 2.4c0.267 0.267 0.4 0.667 0.4 1.2z\"><\/path>\n<\/svg><\/div><\/div><span class=\"thrv-advanced-inline-text tve_editable tcb-styled-list-icon-text tcb-no-delete\" data-css=\"tve-u-169355799d1\"><div style=\"text-align: justify;\">La escribiremos en un objeto Hoja, as\u00ed que has doble clic en Hoja1 (Hoja1). Escribe textualmente el siguiente c\u00f3digo:<\/div><\/span><\/li><\/ul><\/div><div class=\"thrv_wrapper thrv_contentbox_shortcode thrv-content-box\">\n<div class=\"tve-content-box-background\"><\/div>\n<div class=\"tve-cb tve_empty_dropzone\" data-css=\"tve-u-161e9683d6e\"><div class=\"thrv_wrapper thrv_text_element tve_empty_dropzone\"><p data-css=\"tve-u-161e9683d73\" style=\"text-align: justify;\">' Esta macro copia un rango a la celda activa<\/p><p data-css=\"tve-u-161e9683d73\" style=\"text-align: justify;\">Sub CopiaRango()<\/p><p data-css=\"tve-u-161e9683d73\" style=\"text-align: justify;\">Range(\"A1:A5\").Copy Destination:=ActiveCell<\/p><p data-css=\"tve-u-161e9683d73\" style=\"text-align: justify;\">End Sub<\/p><\/div><\/div>\n<\/div><div class=\"thrv_wrapper thrv-styled_list\" data-icon-code=\"icon-check\" data-color=\"rgb(0, 0, 0)\" data-css=\"tve-u-161e968dc25\"><ul class=\"tcb-styled-list\"><li class=\"thrv-styled-list-item\"><div class=\"tcb-styled-list-icon\"><div class=\"thrv_wrapper thrv_icon tve_no_drag tcb-no-delete tcb-no-clone tcb-icon-inherit-style\" data-css=\"tve-u-161e968c5ba\"><svg class=\"tcb-icon\" viewBox=\"0 0 32 32\" data-name=\"checkcheck\">\n\n<path d=\"M29.333 10.267c0 0.4-0.133 0.8-0.533 1.2l-14.8 14.8c-0.267 0.267-0.667 0.4-1.067 0.4s-0.933-0.133-1.2-0.533l-2.4-2.267-6.267-6.267c-0.267-0.267-0.4-0.667-0.4-1.2s0.133-0.8 0.533-1.2l2.4-2.4c0.267-0.133 0.667-0.4 1.067-0.4s0.8 0.133 1.2 0.533l5.067 5.067 11.2-11.333c0.267-0.267 0.667-0.533 1.2-0.533 0.4 0 0.8 0.133 1.2 0.533l2.4 2.4c0.267 0.267 0.4 0.667 0.4 1.2z\"><\/path>\n<\/svg><\/div><\/div><span class=\"thrv-advanced-inline-text tve_editable tcb-styled-list-icon-text tcb-no-delete\" data-css=\"tve-u-16935af2a1d\"><div style=\"text-align: justify;\">Para probar esta Macro vuelve a Excel con Alt + F11 y escribe algunos n\u00fameros o palabras a gusto en el rango A1:A5.<\/div><\/span><\/li><\/ul><\/div><div class=\"thrv_wrapper tve_image_caption\" data-css=\"tve-u-16935fa2a41\"><span class=\"tve_image_frame\" style=\"width: 100%;\"><img loading=\"lazy\" decoding=\"async\" class=\"tve_image wp-image-41610\" alt=\"Ejemplos de Macros 2\" width=\"216\" height=\"172\" title=\"Palabras\" data-id=\"41610\" src=\"https:\/\/aplicaexcelcontable.com\/blog\/wp-content\/uploads\/2019\/02\/Palabras.png\" style=\"\"><\/span><\/div><div class=\"thrv_wrapper thrv-styled_list\" data-icon-code=\"icon-check\" data-color=\"rgb(0, 0, 0)\" data-css=\"tve-u-161e982f06a\"><ul class=\"tcb-styled-list\"><li class=\"thrv-styled-list-item\"><div class=\"tcb-styled-list-icon\"><div class=\"thrv_wrapper thrv_icon tve_no_drag tcb-no-delete tcb-no-clone tcb-icon-inherit-style\" data-css=\"tve-u-161e982d4ed\"><svg class=\"tcb-icon\" viewBox=\"0 0 32 32\" data-name=\"checkcheck\">\n\n<path d=\"M29.333 10.267c0 0.4-0.133 0.8-0.533 1.2l-14.8 14.8c-0.267 0.267-0.667 0.4-1.067 0.4s-0.933-0.133-1.2-0.533l-2.4-2.267-6.267-6.267c-0.267-0.267-0.4-0.667-0.4-1.2s0.133-0.8 0.533-1.2l2.4-2.4c0.267-0.133 0.667-0.4 1.067-0.4s0.8 0.133 1.2 0.533l5.067 5.067 11.2-11.333c0.267-0.267 0.667-0.533 1.2-0.533 0.4 0 0.8 0.133 1.2 0.533l2.4 2.4c0.267 0.267 0.4 0.667 0.4 1.2z\"><\/path>\n<\/svg><\/div><\/div><span class=\"thrv-advanced-inline-text tve_editable tcb-styled-list-icon-text tcb-no-delete\" data-css=\"tve-u-16935b3e73f\"><div style=\"text-align: justify;\">Posici\u00f3nate en la celda C1, desde el Men\u00fa \"Herramientas\" secci\u00f3n \"Macros\" &gt; Macro, elige de la lista la Macro \"Copiar rango\" y luego pulsamos clic en \"Aceptar\".<\/div><\/span><\/li><li class=\"thrv-styled-list-item\"><div class=\"tcb-styled-list-icon\"><div class=\"thrv_wrapper thrv_icon tve_no_drag tcb-no-delete tcb-no-clone tcb-icon-inherit-style\" data-css=\"tve-u-161e9836384\"><svg class=\"tcb-icon\" viewBox=\"0 0 32 32\" data-name=\"checkcheck\">\n\n<path d=\"M29.333 10.267c0 0.4-0.133 0.8-0.533 1.2l-14.8 14.8c-0.267 0.267-0.667 0.4-1.067 0.4s-0.933-0.133-1.2-0.533l-2.4-2.267-6.267-6.267c-0.267-0.267-0.4-0.667-0.4-1.2s0.133-0.8 0.533-1.2l2.4-2.4c0.267-0.133 0.667-0.4 1.067-0.4s0.8 0.133 1.2 0.533l5.067 5.067 11.2-11.333c0.267-0.267 0.667-0.533 1.2-0.533 0.4 0 0.8 0.133 1.2 0.533l2.4 2.4c0.267 0.267 0.4 0.667 0.4 1.2z\"><\/path>\n<\/svg><\/div><\/div><span class=\"thrv-advanced-inline-text tve_editable tcb-styled-list-icon-text tcb-no-delete\" data-css=\"tve-u-16935b3e73f\"><div style=\"text-align: justify;\">El resultado ser\u00e1 que el rango A1:A5 se copiar\u00e1 a partir de la celda C1 que era la celda activa al ejecutar la Macro.<\/div><\/span><\/li><\/ul><\/div><div class=\"thrv_wrapper thrv_text_element\" data-tag=\"h3\"><h3 style=\"text-align: center;\" data-css=\"tve-u-169361bc36d\" class=\"\">Ejemplo de macros 2 de la Imagen<\/h3><\/div><div class=\"thrv_wrapper tve_image_caption\" data-css=\"tve-u-16936277139\"><span class=\"tve_image_frame\" style=\"width: 100%;\"><img loading=\"lazy\" decoding=\"async\" class=\"tve_image wp-image-41613\" alt=\"Ejemplos de Macros 2\" width=\"276\" height=\"152\" title=\"Imagen1\" data-id=\"41613\" src=\"https:\/\/aplicaexcelcontable.com\/blog\/wp-content\/uploads\/2019\/02\/Imagen1.png\" style=\"\"><\/span><\/div><div class=\"thrv_wrapper thrv-styled_list\" data-icon-code=\"icon-check\" data-css=\"tve-u-161e9871b36\"><ul class=\"tcb-styled-list\"><li class=\"thrv-styled-list-item\"><div class=\"tcb-styled-list-icon\"><div class=\"thrv_wrapper thrv_icon tve_no_drag tcb-no-delete tcb-no-clone tcb-icon-inherit-style\" data-css=\"tve-u-161e9870587\"><svg class=\"tcb-icon\" viewBox=\"0 0 32 32\" data-name=\"checkcheck\">\n\n<path d=\"M29.333 10.267c0 0.4-0.133 0.8-0.533 1.2l-14.8 14.8c-0.267 0.267-0.667 0.4-1.067 0.4s-0.933-0.133-1.2-0.533l-2.4-2.267-6.267-6.267c-0.267-0.267-0.4-0.667-0.4-1.2s0.133-0.8 0.533-1.2l2.4-2.4c0.267-0.133 0.667-0.4 1.067-0.4s0.8 0.133 1.2 0.533l5.067 5.067 11.2-11.333c0.267-0.267 0.667-0.533 1.2-0.533 0.4 0 0.8 0.133 1.2 0.533l2.4 2.4c0.267 0.267 0.4 0.667 0.4 1.2z\"><\/path>\n<\/svg><\/div><\/div><span class=\"thrv-advanced-inline-text tve_editable tcb-styled-list-icon-text tcb-no-delete\" data-css=\"tve-u-1693628db58\"><div style=\"text-align: justify;\">Esta Macro utiliza algunas OMP (Objetos, M\u00e9todos y Propiedades) nuevos:<\/div><\/span><\/li><\/ul><\/div><div class=\"thrv_wrapper thrv_contentbox_shortcode thrv-content-box\">\n<div class=\"tve-content-box-background\"><\/div>\n<div class=\"tve-cb tve_empty_dropzone\" data-css=\"tve-u-161e988009b\"><div class=\"thrv_wrapper thrv_text_element tve_empty_dropzone\"><p data-css=\"tve-u-161e988009d\" style=\"text-align: justify;\"><strong>Range (\"A1:A5\"):&nbsp;<\/strong>El objeto Range ya lo conoc\u00edamos...<\/p><p data-css=\"tve-u-161e988009d\" style=\"text-align: justify;\"><strong>Copy:&nbsp;<\/strong>Este es un m\u00e9todo (Una acci\u00f3n)<\/p><p data-css=\"tve-u-161e988009d\" style=\"text-align: justify;\"><strong>Destination:=ActiveCell:&nbsp;<\/strong>Este es otro objeto, Destination se suele utilizar luego de un Copy y ActiveCell hace referencia a la celda activa.<\/p><p data-css=\"tve-u-161e988009d\" style=\"text-align: justify;\">Recuerda que esto es tan solo un adelanto, en los siguientes temas est\u00e1n las Macros m\u00e1s importantes que podr\u00e1s necesitar, escritas, comentadas y listas para que puedas copiar, pegar y adaptar en tus propios desarrollos.<\/p><\/div><\/div>\n<\/div><div class=\"thrv_wrapper thrv-button tve_ea_thrive_animation tve_anim_grow\" data-css=\"tve-u-169367b56a9\" data-button-style=\"tcb-saved-button-template-28\" style=\"\" id=\"tema2\" data-tcb_hover_state_parent=\"\">\n<a href=\"http:\/\/aplicaexcelcontable.com\/blog\/programar-en-excel-el-editor-de-macros.html\" class=\"tcb-button-link tve_evt_manager_listen tve_et_tve-viewport\" data-tcb-events=\"__TCB_EVENT_[{&quot;t&quot;:&quot;tve-viewport&quot;,&quot;config&quot;:{&quot;anim&quot;:&quot;grow&quot;,&quot;loop&quot;:1},&quot;a&quot;:&quot;thrive_animation&quot;}]_TNEVE_BCT__\" target=\"_blank\">\n<span class=\"tcb-button-texts\"><span class=\"tcb-button-text thrv-inline-text\" data-css=\"tve-u-169367b56ad\"><strong>Pulsa clic aqu\u00ed P\/Ver el siguiente Tema<\/strong><\/span><\/span>\n<\/a>\n<\/div><div class=\"thrv_wrapper thrv_contentbox_shortcode thrv-content-box\">\n<div class=\"tve-content-box-background\"><\/div>\n<div class=\"tve-cb tve_empty_dropzone\" data-css=\"tve-u-161e98fea86\"><div class=\"thrv_wrapper thrv_text_element tve_empty_dropzone\"><p data-css=\"tve-u-161e98fea87\" style=\"text-align: justify;\">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><\/div><\/div>\n<\/div><div class=\"thrv_wrapper thrv_social_custom thrv_social\" data-counts=\"\" data-min_shares=\"0\" data-css=\"tve-u-161e99132a3\">\n<div class=\"tve_social_items tve_social_custom tve_style_1 tve_social_itb\">\n<div class=\"tve_s_item tve_s_fb_share\" data-s=\"fb_share\" data-href=\"https:\/\/aplicaexcelcontable.com\/blog\/programar-en-excel-ejemplos-de-macros-2.html\" data-label=\"Compartir\">\n<a href=\"javascript:void(0)\" class=\"tve_s_link\"><span class=\"tve_s_icon thrv-svg-icon\"><svg xmlns=\"http:\/\/www.w3.org\/2000\/svg\" class=\"tcb-facebook\" viewBox=\"0 0 16 28\"><path d=\"M14.984 0.187v4.125h-2.453q-1.344 0-1.813 0.562t-0.469 1.687v2.953h4.578l-0.609 4.625h-3.969v11.859h-4.781v-11.859h-3.984v-4.625h3.984v-3.406q0-2.906 1.625-4.508t4.328-1.602q2.297 0 3.563 0.187z\"><\/path><\/svg><\/span><span class=\"tve_s_text\">Compartir<\/span><span class=\"tve_s_count\">0<\/span><\/a>\n<\/div>\n<\/div>\n<\/div><div class=\"thrv_wrapper thrv_contentbox_shortcode thrv-content-box\">\n<div class=\"tve-content-box-background\"><\/div>\n<div class=\"tve-cb tve_empty_dropzone\" data-css=\"tve-u-161e9915bae\"><div class=\"thrv_wrapper thrv_text_element tve_empty_dropzone\"><p data-css=\"tve-u-161e9915bb0\" style=\"text-align: justify;\">Me gustar\u00eda saber que piensas de este articulo \"Programar en Excel - Ejemplos de Macros 2\".<\/p><p data-css=\"tve-u-161e9915bb0\" style=\"text-align: justify;\">Por lo tanto:<\/p><p data-css=\"tve-u-161e9915bb0\" 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 data-css=\"tve-u-161e992c56d\" style=\"color: rgb(0, 23, 255);\"><a href=\"https:\/\/www.facebook.com\/AplicaExceContable\/\" target=\"_blank\"><strong>pulsando clic aqu\u00ed<\/strong><\/a><\/span>.<\/p><\/div><\/div>\n<\/div><div class=\"thrv_wrapper thrv_contentbox_shortcode thrv-content-box tve-elem-default-pad\" data-css=\"tve-u-1939f26a3ed\" style=\"\">\n\t<div class=\"tve-content-box-background\"><\/div>\n\t<div class=\"tve-cb\" style=\"\" data-css=\"tve-u-1939f26a3eb\"><div class=\"thrv_wrapper thrv_text_element tcb-highlight-added\">\t<p style=\"\">Cualquier duda o pregunta, puedes escribirme directamente en la<span style=\"--tcb-text-highlight-color: rgb(237, 243, 13) !important;\" data-css=\"tve-u-1939f26a3ee\">&nbsp;<\/span><a href=\"#comentario\" class=\"tve-jump-scroll\" style=\"outline: none;\"><span style=\"--tcb-text-highlight-color: rgb(237, 243, 13) !important;\" data-css=\"tve-u-1939f26a3ef\">secci\u00f3n de comentarios<\/span><\/a>, en la <a href=\"https:\/\/aplicaexcelcontable.com\/blog\/contacto\" target=\"_blank\" class=\"\" style=\"outline: none;\"><span style=\"--tcb-text-highlight-color: rgb(231, 100, 224) !important;\" data-css=\"tve-u-1939f26a3f0\" data-text-highlight=\"bubble\">pagina del chat<\/span><\/a>, directamente en <span style=\"--tcb-text-highlight-color: rgb(30, 184, 76) !important;\" data-css=\"tve-u-1939f26a3f1\">whatsapp<\/span> o bien al correo electr\u00f3nico rogerperez@aplicaexcelcontable.com.<span style=\"--tcb-text-highlight-color: transparent !important;\" data-css=\"tve-u-1939f26a3f2\"><\/span><\/p><p style=\"\">Te saluda,<span style=\"--tcb-text-highlight-color: transparent !important;\"><\/span><\/p><p style=\"\"><strong>Roger Perez \u2013 Aplica Excel Contable<\/strong><\/p><\/div><\/div>\n<\/div>","tve_custom_css":"@media (min-width: 300px){[data-css=\"tve-u-161e992c56d\"] { color: rgb(0, 23, 255) !important; }[data-css=\"tve-u-161e99132a3\"] { float: none; margin-left: auto !important; margin-right: auto !important; }:not(#tve) [data-css=\"tve-u-161e9871b36\"] p, :not(#tve) [data-css=\"tve-u-161e9871b36\"] li, :not(#tve) [data-css=\"tve-u-161e9871b36\"] blockquote, :not(#tve) [data-css=\"tve-u-161e9871b36\"] address, :not(#tve) [data-css=\"tve-u-161e9871b36\"] h1, :not(#tve) [data-css=\"tve-u-161e9871b36\"] h2, :not(#tve) [data-css=\"tve-u-161e9871b36\"] h3, :not(#tve) [data-css=\"tve-u-161e9871b36\"] h4, :not(#tve) [data-css=\"tve-u-161e9871b36\"] h5, :not(#tve) [data-css=\"tve-u-161e9871b36\"] h6 { color: rgb(0, 0, 0); }[data-css=\"tve-u-161e9870587\"] { color: rgb(0, 0, 0); }[data-css=\"tve-u-161e9836384\"] { color: rgb(0, 0, 0); }:not(#tve) [data-css=\"tve-u-161e982f06a\"] p, :not(#tve) [data-css=\"tve-u-161e982f06a\"] li, :not(#tve) [data-css=\"tve-u-161e982f06a\"] blockquote, :not(#tve) [data-css=\"tve-u-161e982f06a\"] address, :not(#tve) [data-css=\"tve-u-161e982f06a\"] h1, :not(#tve) [data-css=\"tve-u-161e982f06a\"] h2, :not(#tve) [data-css=\"tve-u-161e982f06a\"] h3, :not(#tve) [data-css=\"tve-u-161e982f06a\"] h4, :not(#tve) [data-css=\"tve-u-161e982f06a\"] h5, :not(#tve) [data-css=\"tve-u-161e982f06a\"] h6 { color: rgb(0, 0, 0); }[data-css=\"tve-u-161e982d4ed\"] { color: rgb(0, 0, 0); }:not(#tve) [data-css=\"tve-u-161e968dc25\"] p, :not(#tve) [data-css=\"tve-u-161e968dc25\"] li, :not(#tve) [data-css=\"tve-u-161e968dc25\"] blockquote, :not(#tve) [data-css=\"tve-u-161e968dc25\"] address, :not(#tve) [data-css=\"tve-u-161e968dc25\"] h1, :not(#tve) [data-css=\"tve-u-161e968dc25\"] h2, :not(#tve) [data-css=\"tve-u-161e968dc25\"] h3, :not(#tve) [data-css=\"tve-u-161e968dc25\"] h4, :not(#tve) [data-css=\"tve-u-161e968dc25\"] h5, :not(#tve) [data-css=\"tve-u-161e968dc25\"] h6 { color: rgb(0, 0, 0); }[data-css=\"tve-u-161e968c5ba\"] { color: rgb(0, 0, 0); }[data-css=\"tve-u-161e96702f9\"] { color: rgb(0, 0, 0); }:not(#tve) [data-css=\"tve-u-161e966443c\"] p, :not(#tve) [data-css=\"tve-u-161e966443c\"] li, :not(#tve) [data-css=\"tve-u-161e966443c\"] blockquote, :not(#tve) [data-css=\"tve-u-161e966443c\"] address, :not(#tve) [data-css=\"tve-u-161e966443c\"] h1, :not(#tve) [data-css=\"tve-u-161e966443c\"] h2, :not(#tve) [data-css=\"tve-u-161e966443c\"] h3, :not(#tve) [data-css=\"tve-u-161e966443c\"] h4, :not(#tve) [data-css=\"tve-u-161e966443c\"] h5, :not(#tve) [data-css=\"tve-u-161e966443c\"] h6 { color: rgb(0, 0, 0); }[data-css=\"tve-u-161e9662dcb\"] { color: rgb(0, 0, 0); }:not(#tve) [data-css=\"tve-u-161e964e82b\"] { font-size: 38px !important; color: rgb(0, 23, 255) !important; }[data-css=\"tve-u-161e94bc63e\"] { color: rgb(0, 23, 255) !important; }:not(#tve) [data-css=\"tve-u-161e949e923\"] { color: rgb(0, 0, 0) !important; }[data-css=\"tve-u-161e93ffb5e\"] p { margin: 0px 0px 11px !important; padding: 0px !important; }[data-css=\"tve-u-161e9655920\"] p { margin: 0px 0px 11px !important; padding: 0px !important; }:not(#tve) [data-css=\"tve-u-161e9655921\"] { color: rgb(10, 0, 0) !important; }[data-css=\"tve-u-161e9683d6e\"] p { margin: 0px 0px 11px !important; padding: 0px !important; }:not(#tve) [data-css=\"tve-u-161e9683d73\"] { color: rgb(10, 0, 0) !important; }[data-css=\"tve-u-161e988009b\"] p { margin: 0px 0px 11px !important; padding: 0px !important; }:not(#tve) [data-css=\"tve-u-161e988009d\"] { color: rgb(10, 0, 0) !important; }[data-css=\"tve-u-161e98fea86\"] p { margin: 0px 0px 11px !important; padding: 0px !important; }:not(#tve) [data-css=\"tve-u-161e98fea87\"] { color: rgb(10, 0, 0) !important; }[data-css=\"tve-u-161e9915bae\"] p { margin: 0px 0px 11px !important; padding: 0px !important; }:not(#tve) [data-css=\"tve-u-161e9915bb0\"] { color: rgb(10, 0, 0) !important; }:not(#tve) [data-css=\"tve-u-16935445dac\"] { font-size: 42px !important; color: rgb(255, 0, 0) !important; }:not(#tve) [data-css=\"tve-u-161e966443c\"] li { color: rgb(10, 0, 0) !important; }:not(#tve) [data-css=\"tve-u-161e968dc25\"] li { color: rgb(10, 0, 0) !important; }[data-css=\"tve-u-16935fa2a41\"] { width: 216px; float: none; margin-left: auto !important; margin-right: auto !important; }:not(#tve) [data-css=\"tve-u-161e982f06a\"] li { color: rgb(10, 0, 0) !important; }:not(#tve) [data-css=\"tve-u-169361bc36d\"] { font-size: 38px !important; color: rgb(0, 23, 255) !important; }[data-css=\"tve-u-16936277139\"] { width: 276px; float: none; margin-left: auto !important; margin-right: auto !important; }:not(#tve) [data-css=\"tve-u-161e9871b36\"] li { color: rgb(10, 0, 0) !important; }[data-css=\"tve-u-169367b56a9\"] { display: block; max-width: 382px; width: 382px; }:not(#tve) [data-css=\"tve-u-169367b56a9\"]:hover .tcb-button-link { color: rgb(255, 255, 255) !important; background-color: rgb(0, 23, 255) !important; background-image: none !important; border: 3px solid rgb(0, 23, 255) !important; }[data-css=\"tve-u-169367b56a9\"] .tcb-button-link { border: 3px solid rgb(0, 23, 255); border-radius: 10px; overflow: hidden; min-height: 54.7619px; font-size: 1.33333em; padding-top: 0px; padding-bottom: 0px; background-image: none !important; background-color: rgb(255, 255, 255) !important; }:not(#tve) [data-css=\"tve-u-169367b56a9\"] .tcb-button-link { color: rgb(0, 23, 255) !important; }:not(#tve) [data-css=\"tve-u-169367b56ad\"] { color: rgb(0, 23, 255) !important; font-size: 19px !important; }:not(#tve) [data-css=\"tve-u-169367b56a9\"]:hover .tcb-button-link span { color: rgb(255, 255, 255) !important; }.tcb-post-list[data-css=\"tve-u-186df1bf84d\"] .post-wrapper.thrv_wrapper { width: calc(100% + 0px); }.tcb-post-list[data-css=\"tve-u-186df1bf84d\"] .post-wrapper.thrv_wrapper:nth-child(n+2) { margin-top: 50px !important; }.tcb-post-list[data-css=\"tve-u-186df1bf84d\"] .post-wrapper.thrv_wrapper:not(:nth-child(n+2)) { margin-top: 0px !important; }.tcb-post-list[data-css=\"tve-u-186df1bf84d\"] .post-wrapper.thrv_wrapper:not(:nth-child(n)) { margin-right: 30px !important; }.tcb-post-list[data-css=\"tve-u-186df1bf84d\"] .post-wrapper.thrv_wrapper:nth-child(n) { margin-right: 0px !important; }.tcb-post-list[data-css=\"tve-u-18703fb75db\"] .post-wrapper.thrv_wrapper { width: calc(33.3333% - 13.3333px); }.tcb-post-list[data-css=\"tve-u-18703fb75db\"] .post-wrapper.thrv_wrapper:nth-child(n+4) { margin-top: 20px !important; }.tcb-post-list[data-css=\"tve-u-18703fb75db\"] .post-wrapper.thrv_wrapper:not(:nth-child(n+4)) { margin-top: 0px !important; }.tcb-post-list[data-css=\"tve-u-18703fb75db\"] .post-wrapper.thrv_wrapper:not(:nth-child(3n)) { margin-right: 20px !important; }.tcb-post-list[data-css=\"tve-u-18703fb75db\"] .post-wrapper.thrv_wrapper:nth-child(3n) { margin-right: 0px !important; }:not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] p, :not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] li, :not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] blockquote, :not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] address, :not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] .tcb-plain-text, :not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] label { font-size: var(--tve-font-size,20px); }[data-css=\"tve-u-1939f26a3eb\"] { --tve-font-size: 20px; --tve-color: rgb(7,0,0); --tve-applied---tve-color: rgb(7,0,0); text-align: justify; }:not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] p, :not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] li, :not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] blockquote, :not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] address, :not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] .tcb-plain-text, :not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] label, :not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] h1, :not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] h2, :not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] h3, :not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] h4, :not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] h5, :not(#tve) .thrv-content-box [data-css=\"tve-u-1939f26a3eb\"] h6 { color: var(--tve-color,rgb(7,0,0)); --tve-applied-color: var$(--tve-color,rgb(7,0,0)); --tcb-applied-color: rgb(7,0,0); }[data-css=\"tve-u-1939f26a3eb\"] p { padding: 0px 0px 11px !important; margin: 0px !important; }[data-css=\"tve-u-1939f26a3ed\"] { margin-top: 20px !important; margin-bottom: 20px !important; padding: 0px !important; }[data-css=\"tve-u-1939f26a3ee\"] { --tcb-text-highlight-color: rgb(237, 243, 13) !important; }[data-css=\"tve-u-1939f26a3ef\"] { --tcb-text-highlight-color: rgb(237, 243, 13) !important; }[data-css=\"tve-u-1939f26a3f0\"] { --tve-highlight-background: url(\"data:image\/svg+xml,%3Csvg%20xmlns%3D%22http%3A%2F%2Fwww.w3.org%2F2000%2Fsvg%22%20viewBox%3D%220%200%20314%20114%22%20preserveAspectRatio%3D'none'%3E%0A%09%09%09%09%09%3Cpath%20d%3D%22M149.412%202.398C98.053%204.579%2074.996%207.562%2053.903%2014.754%2028.892%2023.283%208.503%2040.617%202.929%2058.09c-4.148%2013.004-.464%2026.402%2010.207%2037.118%205.664%205.687%2015.228%2012.328%2021.753%2015.104%202.939%201.25%208.598%202.708%2010.559%202.72%201.16.008%201.111-.129-.909-2.543-2.554-3.05-4.753-7.567-4.761-9.775-.008-2.502%202.482-6.937%204.862-8.661%205.613-4.066%2020.333-6.115%2050.607-7.046%2012.81-.394%2019.622.068%2047.623%203.231%2057%206.439%2066.925%207.222%2091.845%207.248%2016.516.016%2020.951-.139%2026.167-.919%2020.12-3.007%2032.633-8.401%2041.489-17.883%206.859-7.344%2010.154-16.516%2010.254-28.537.032-3.902-.231-7.704-.651-9.42-5.257-21.464-31.961-33.668-80.137-36.622-11.85-.727-62.651-.546-82.425.293%22%2F%3E%0A%09%09%09%09%3C%2Fsvg%3E\"); --tcb-text-highlight-color: #2ABB61 !important; }[data-css=\"tve-u-1939f26a3f1\"] { --tcb-text-highlight-color: rgb(30, 184, 76) !important; }[data-css=\"tve-u-1939f26a3f2\"] { --tcb-text-highlight-color: transparent !important; }}@media (max-width: 1023px){:not(#tve) [data-css=\"tve-u-16935445dac\"] { font-size: 25px !important; }:not(#tve) [data-css=\"tve-u-161e964e82b\"] { font-size: 22px !important; }:not(#tve) [data-css=\"tve-u-169361bc36d\"] { font-size: 22px !important; }}@media (max-width: 767px){:not(#tve) [data-css=\"tve-u-161e964e82b\"] { font-size: 20px !important; }:not(#tve) [data-css=\"tve-u-169367b56a9\"] .tcb-button-link { font-size: 20px; }[data-css=\"tve-u-169367b56a9\"] { display: block; max-width: 292px; width: 292px; }:not(#tve) [data-css=\"tve-u-169367b56ad\"] { font-size: 14px !important; }:not(#tve) [data-css=\"tve-u-16935445dac\"] { font-size: 23px !important; }:not(#tve) [data-css=\"tve-u-169361bc36d\"] { font-size: 20px !important; }}","tve_user_custom_css":"","tve_globals":{"e":"1","font_cls":[]},"tcb2_ready":1,"tcb_editor_enabled":1,"tve_landing_page":"","_tve_header":"","_tve_footer":""},"categories":[4,22],"tags":[293,277,292,27,295,294],"class_list":["post-3808","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-programar-en-excel","category-curso-basico-de-vba","tag-aprender-excel","tag-ejemplos-de-macros","tag-excel-y-contabilidad","tag-macros","tag-plantillas-excel","tag-programar-en-excel","post-wrapper","thrv_wrapper"],"_links":{"self":[{"href":"https:\/\/aplicaexcelcontable.com\/blog\/wp-json\/wp\/v2\/posts\/3808","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=3808"}],"version-history":[{"count":0,"href":"https:\/\/aplicaexcelcontable.com\/blog\/wp-json\/wp\/v2\/posts\/3808\/revisions"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/aplicaexcelcontable.com\/blog\/wp-json\/wp\/v2\/media\/59905"}],"wp:attachment":[{"href":"https:\/\/aplicaexcelcontable.com\/blog\/wp-json\/wp\/v2\/media?parent=3808"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/aplicaexcelcontable.com\/blog\/wp-json\/wp\/v2\/categories?post=3808"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/aplicaexcelcontable.com\/blog\/wp-json\/wp\/v2\/tags?post=3808"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}