Amigos, uma duvida é possivel incerir uma lista em uma celula para multipla escolha de valores e se possivel também alterar estes valores se for preciso.
Seria tipo uma lista de validação, mas preciso colocar esta lista em todas as celulas de uma coluna F da plan2 conforme copio dados da plan1 e são colados na plan2 A2:E? preenchendo a COLUNA F com a lista conforme codigo abaixo:
Sheets("plan1").Select
Range("$A$2:$e$3000").Select
Selection.Copy
Sheets("plan2").Select
L = Sheets("plan2").Cells(Rows.Count, 1).End(xlUp).Row + 1
Range("A" & L).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Desde ja agradeço as sugestões....
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Postado : 15/03/2013 9:57 am