Não entendi, e fiqueiconfuso
No topico voce diz
na parte em que o código pega os valores da coluna AB e passa para a coluna R,
Porem o codigo (pelo menos o que postou) Copia da Coluna R para a coluna AB (o inverso do descrito)
Desculpe, Reinaldo, não me expressei bem.
Na primeira parte
Range("R2").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Range("BA2:BA88").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Copia de R para BA
Na segunda parte,
Dim editor As Integer, x As Single, y As Single, a As Single, b As Single
For editor = Abs(Range("AF10")) To Abs(Range("AF14"))
x = Cells(editor, Abs(Range("AE4")))
Cells(editor, Abs(Range("AF4"))) = x
Copia de BA para R (achei estranho vc dizer que faz o oposto, pois eu rodo a macro e ela faz como eu digo aqui. Aliás, é nessa parte que está complicado. Se os campos em R estiverem vazios, ela executa, se estiverem preenchidos, ela não executa. Aqui eu preciso de ajuda.
Qdo diz
os valores da coluna T e passa para a U
entendo que seja onde aparece a variavel editor; porem essa variavel pega a linha 1000 (Valor de AF10) coluna 28 (Valore de AE4) ou seja AB1000, one não há valor algum??
O que é realmente para executar??
Na verdade, esse valor de 1000 em AF10 é um valor que eu coloquei só pra fazer a macro parar quando preciso, essa célula tem uma função que altera o valor conforme ela vai calculando (sei que deve ter uma forma melhor, mas como ainda estou engatinhando em VBA, já foi suado chegar até aqui). Não acho que tenha algum problema nessa parte, ao menos, eu vi que ela para antes disso.
Postado : 14/05/2013 10:42 am