martes, 19 de diciembre de 2017

El indiscriminado uso de las variables tipo Variant

En un artículo anterior (https://abrahamexcel.blogspot.pe/2017/11/consejos-para-el-uso-de-variables-en.html) ya comentábamos sobre los constantes problemas de la mala declaración de variables o de no declararlas y como aquello consumía recursos innecesarios.

Cuando usamos variables y no las hemos declarado VBA les asigna, automáticamente, el tipo Variant. El tipo de variables Variant admite números enteros, decimales, texto y en general cualquier tipo de dato que podamos usar, pero es justamente esa capacidad la que hace que dicho tipo de variable requiera una gran cantidad de memoria. Las variables Variant reservan 22 bytes de la memoria (en algunos casos 16 bytes) y a eso hay que sumarle lo que ocupa el valor que le asignemos a la variable.

Para entenderlo mejor tratemos de ejemplificarlo pero primero recordemos que, de modo general, un carácter cualquiera ocupa 1 byte (hay variaciones por si acaso).  Entonces veamos:

Sub Probando ()
CadenadeTexto = “Abraham” 
End Sub 

Como no se declaró la variable “CadenadeTexto”, nuestro VBA le reservo 22 bytes de la memoria y al tener siete caracteres la palabra “Abraham”, en total la variable está ocupando 29 bytes.  Pero, veamos ahora que pasaría si declarábamos la variable de forma adecuada:

Sub Probando ()
Dim CadenadeTexto As String 
Let CadenadeTexto = “Abraham"
End Sub 

En ese caso, al ser del tipo String, se le reservó 10 bytes, a eso le sumamos los siete que ocupa la palabra y tenemos en total que nuestra variable ocupó 17 bytes, bastante menos que los 29 bytes que ocupó como tipo Variant.

¿Por eso deberíamos dejar de usar variables del tipo Variant? No necesariamente pero no es recomendable usar siempre ese tipo de variable cuando hay varias del tipo adecuado para nuestras necesidades  (String, Double, etc.). Como bien dicen muchos programadores, las características de las actuales computadoras permiten tener varios Gigabytes de memoria que, aparentemente, no harían que se perciba problema con el uso indiscriminado de las variables tipo Variant pero, no olvides que la programación no solo debería ser eficaz, sino que también debe de ser eficiente y además, nuestras macros no será lo único que ocupe la memoria de nuestra computadora.

Para terminar, hay ocasiones en que será necesario usar las variables del tipo Variant como cuando no tengamos la certeza, por algún motivo, de qué tipo de valores usarán nuestros usuarios finales.

Abraham Valencia

sábado, 2 de diciembre de 2017

El uso, y abuso, de Select y Selection en Excel (VBA)

Primero que nada debemos recordar que “Select” es un método del VBA de Excel que se aplica a objetos y que nos permite, justamente, seleccionarlos para, si deseamos, trabajar con y/o sobre ellos. Segundo, hay que recordar que “Selection” es una propiedad que representa la selección realizada, en ese momento, de algún objeto.

Un ejemplo muy común de su uso es el código generado por nuestra vieja amiga la “Grabadora de Macros”:

Un ejemplo de macro grabada en donde colocamos color de relleno a un rango de celdas:

Sub Macro1()
'
' Macro1 Macro
'
'
Range("A1:B6").Select
With Selection.Interior         
.Pattern = xlSolid 
.PatternColorIndex = xlAutomatic  
.Color = 65535         
.TintAndShade = 0 
.PatternTintAndShade = 0     
End With     
Range("A1").Select 
End Sub 

Para, sobre todo, quienes se inician en el mundo del VBA, definitivamente la grabadora es una herramienta muy útil y ayuda mucho a aprender el uso métodos y las propiedades de los objetos pero hay que saber que hay mucho código innecesario que termina, no solo alargando nuestra macro, sino que en muchos casos hace más lentos lo procesos. Por ejemplo, lo que nos ha generado la grabadora en el ejemplo anterior, podríamos dejarlos así:

Sub Mi_Macro()
Range("A1:B6").Interior.Color = 65535 
End Sub 

Como se puede ver, no es necesario el uso de “Select” o de “Selection” para conseguir el mismo resultado, las propiedades de los objetos, en este caso un objeto “Range” (Rango), pueden ser modificadas sin necesidad de seleccionarlo.

Un ejemplo más como para que nos quede totalmente claro. Activamos la grabadora y borramos el contenido de un grupo de celdas:

Sub Macro4()
'
' Macro4 Macro
'
'
Range("A1:H5").Select
Selection.ClearContents 
End Sub 

Para, sobre todo, quienes se inician en el mundo del VBA, definitivamente la grabadora es una herramienta muy útil y ayuda mucho a aprender el uso métodos y las propiedades de los objetos pero hay que saber que hay mucho código innecesario que termina, no solo alargando nuestra macro, sino que en muchos casos hace más lentos lo procesos. Por ejemplo, lo que nos ha generado la grabadora en el ejemplo anterior, podríamos dejarlo así:

Sub BorrandoCeldas()
Range("A1:H5").ClearContents 
End Sub 

Aunque solo son dos líneas, podría quedar en una sola y además no olvidemos que es menos tiempo, y recursos en general, si no seleccionamos los objetos.

A veces nos acostumbramos tanto a seleccionar los objetos que aún sin usar la grabadora continuamos haciéndolo. He visto eso, sobre todo, cuando de copiar y pegar celdas se trata:

Sheets(“Hoja1”).Select 
Range(“A1:A10”).Select
Selection.Copy
Sheets(“Hoja2”).Select
Range(“D1”).Select
ActiveSheet.Paste

Todas esas líneas podríamos dejarlas de la siguiente forma sin recurrir a seleccionar objetos:

Sheets(“Hoja1”).Range(“A1:A10”).Copy Destination:= Sheets(“Hoja2”).Range(“D1”)  

Entonces, evitemos, de ser posible tanto el uso de “Select” como de “Selection”. Hasta la próxima.

Abraham Valencia