Inquiridor
nova planilha....!!!!!

Pergunta
-
copiei a planilha de "out" e criei a planilha de "nov". gostaria de saber se tem como eu não precisar mais ficar editando minha macro, onde ela copia as células "E7:E28" do mês de "set", e sim de "out" e colasse no mês novo onde criei a planilha nova de "nov" ???
segue exemplo
\ago/\set/\out/\nov/
Sheets("SET").Select
Range("E7:E28").Select
Selection.Copy
Sheets("OUT").Select
Range("E7:E28").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=Falsedesde já agradeço.
sexta-feira, 14 de dezembro de 2007 13:06
Todas as Respostas
-
Existem mil maneiras...
Code BlockSub Copiar()
'1ª forma
Dim rng As Range
Dim rng2 As RangeSet rng = ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count - 1).Range(ThisWorkbook.Sheets(Sheets.Count - 1).Cells(1, 1), ThisWorkbook.Sheets(Sheets.Count - 1).Cells(30, 5))
Set rng2 = ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count).Range(ThisWorkbook.Sheets(Sheets.Count).Cells(1, 1), ThisWorkbook.Sheets(Sheets.Count).Cells(30, 5))
rng.Copy rng22 ª forma
ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count - 1).Range(ThisWorkbook.Sheets(Sheets.Count - 1).Cells(1, 1), ThisWorkbook.Sheets(Sheets.Count - 1).Cells(30, 5)).Copy ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count).Range(ThisWorkbook.Sheets(Sheets.Count).Cells(1, 1), ThisWorkbook.Sheets(Sheets.Count).Cells(30, 5))
End SubAbs,
sexta-feira, 14 de dezembro de 2007 22:07 -
Bom dia Zerick_sp vlw pela força kra, mas ñ deu certo nenhuma das duas opções.....
Um abraço.
segunda-feira, 17 de dezembro de 2007 12:02 -
Eu tinha entendido errado..apenas uma pequena mudança
Sub transferir()
Dim FOLHA As Integer
ActiveSheet.Range("E7:E28").Select
Selection.Copy
FOLHA = ActiveSheet.Index
Sheets(FOLHA + 1).Select
Range("E7:E28").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
End Sub
segunda-feira, 17 de dezembro de 2007 12:33 -
Deu certo!!
segunda-feira, 17 de dezembro de 2007 16:18 -
bom dia...
não deu certo, vc ker q eu mande a planilha pra vc dar uma olhada ????
me passe o seu e-mail !!!!!!!!
um abraço.
quarta-feira, 19 de dezembro de 2007 10:47 -
Bom dia...pode mandar
evangelistalion@gmail.com
quarta-feira, 19 de dezembro de 2007 12:42