Ola.
Existe algum modo de deixar o tamanho da Array flexível para adicionar valores sem ter que definir previamente o seu tamanho?
normalmente eu uso de matemática básica para definir o tamanho de uma array de destino
Tipo:
ColunO = Range(Ti & Li, Fc & Lf).Value2
tl = UBound(ColunO, 1)
tc = UBound(ColunO, 2)
TLd = Int(tl / A_cada_Linhas)
TLd = ((QuantLinhas * TLd) - QuantLinhas) + tl + 1
ReDim ColunD(TLd, tc)
No caso dessa é para adicionar XLinhas em branco a cada YLinhas da Range
nesse caso foi até facil.
Mas existe casos onde se tem mais variações pré determinantes para o tamanho final da Array que acaba complicando o calculo.
Att.
Somente é impossíveis até que alguém faça
A logica está presa na irracionalidade humana, e morta nos que se consideram donos da verdade.
"ALGUM MODERADOR ME EXPULSE DO FÓRUM POR FAVOR"
Postado : 12/08/2014 4:21 pm