- alexandrevba escreveu:
- Boa noite!!!
talvez eu possa te ajudar tem como postar um exemplo modelo de sua necessidade em site gratuito (4Shared)...?
Não entendi muito bem....em que célula?.....
Me dê na planilha que vai postar um exemplo de como é que está e de como é que vai ficar.
Att...
Boa noite Alexandre, meu problema é bem simples e desde já agradeço sua atenção. Vamos ao problema:
Imagine você que a cada condição testada você terá que guardar uma determinada célula (RANGE) para posteriormente utiliza-la em uma soma com outras (Ranges), pois bem, Se isso é verdadeiro da-se nome a esta celula para depois usa-la e vai assim até o resultado final.
Exemplo.
' Copia o Titulo de receitas de Prestaçao de Serviços Caso Tenha Saldo
Sheets("DFs Abertas").Select
Range("LDVA2").Select
Selection.Copy
Sheets("Relatorios").Select
Range("Montagem3").Select
n3 = n3 + 1
y = y + 1
Cells(ActiveCell.Row + n3, ActiveCell.Column).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
' Copia o saldo de Receitas de Prestaçao de Serviços (Atual)
Sheets("DFs Abertas").Select
Range("TotalDva1").Select
Selection.Copy
Sheets("Relatorios").Select
Range("Montagem4").Select
n3 = n3
y = y
Cells(ActiveCell.Row + n3, ActiveCell.Column).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
' Descobrindo e dando nome a celula em que esta o cursor (Receitas Periodo Atual)
Nrlinha1 = ActiveCell.Row
Range("v60").Value = Nrlinha1
Cells(Range("v60").Value, 20).Name = "LocalDVA1"
Cells(60, 23) = "LocalDVA1"
Note que se condição for satisfeita cria-se uma Range(LocalDVA1) e atribui este nome a uma determinada célula para ser usada posteriormente, caso esta condição não seja satisfatoria não se cria Range e atribui o valor 0 (Zero) na referida célula, e assim vai até o momento em que será necessário utilizar estes NOMES de área para compor uma soma. Dai é que utilizo a concatenação das areas criadas e dos valores Zeros. PQ dos valores Zeros: É pq já que não foram criadas as areas eu não teria como soma-las daria erro, então eu as substitui pelo Zero que não interfirira em minha soma. Poderi estar fazendo esta soma em uma variável, só não faço pq preciso manter a formula.
A planilha é muito longa pois envolve além da importação de dados a criação dos demonstrativos contábeis, onde existe uma mascara fixa em que recebe todas as contas mesmos as zeradas e daí monto outros demonstrativos envolvendo somente as contas com saldo. O projeto esta em fase de finalização necessitando porem de uma revisão.
Se voce quiser eu te passo por email. Já já estarei te informando meu email pelo PRIV.
Abraços e obrigado.
Início 