COMO DIZER AO VBA QUE O VALOR DE UMA CELULA É UMA VARIAVEL
Enviado: 30 Set 2021 às 10:01
por Abel
Bom dia, gostaria de saber como faço isso:
OBS: VALOR DA CÉLULA É IGUAL A P30
VALOR DA CÉLULA = RANGE("A1").VALUE
sheets("PLAN1").ScrollArea = "A1:VALOR DA CÉLULA"
NÃO DAR CERTO DESSA FORMA, TEM ALGUMA OUTRA FORMA DE FAZER ISSO?
Re: COMO DIZER AO VBA QUE O VALOR DE UMA CELULA É UMA VARIAVEL
Enviado: 14 Out 2021 às 13:17
por Foxtri
Boa tarde
Veja se era isso.
Sub Macro1()
Dim XP As String, Y As String
XP = Evaluate("=LEFT(A1,MIN(FIND({0,1,2,3,4,5,6,7,8,9},A1&""0123456789""))-1)")
Y = Evaluate("=MID(A1,MIN(FIND({0,1,2,3,4,5,6,7,8,9},A1&""0123456789"")),5)")
X = Range(XP & "1").Column
Worksheets("Plan1").ScrollArea = Range(Cells(1, 1), Cells(Y, X)).Address
End Sub
Até
Foxtri
Re: COMO DIZER AO VBA QUE O VALOR DE UMA CELULA É UMA VARIAVEL
Enviado: 14 Out 2021 às 13:52
por osvaldomp
Re: COMO DIZER AO VBA QUE O VALOR DE UMA CELULA É UMA VARIAVEL
Enviado: 20 Out 2021 às 23:08
por Sc00by22
Você pode fazer das seguintes formas:
Sem variável
Sheets("PLAN1").ScrollArea = "A1:" & Range("A1").Value
Ou com
VALOR_DA_CÉLULA = RANGE("A1").VALUE
Sheets("PLAN1").ScrollArea = "A1:" & VALOR_DA_CÉLULA
Lembrando que variáveis não pode espaços, precisa usar o _
Se quiser pode declarar ela antes colocando Dim VALOR_DA_CÉLULA As String na primeira linha, mas mesmo sem declarar funciona