
Responder1
Se você tiver uma versão recente do Excel, emE2introduzir ofórmula de matriz:
=TEXTJOIN(",",TRUE,ROW(INDIRECT(C2 & ":" & D2)))
e copie:
Fórmulas de matrizdeve ser inserido com Ctrl+ Shift+ Enterem vez de apenas com a Entertecla.
Caso contrário, insira a seguinte função definida pelo usuário em um módulo padrão:
Public Function CSList(n1 As Long, n2 As Long) As String
Dim i As Long
For i = n1 To n2
CSList = CSList & "," & i
Next i
CSList = Mid(CSList, 2)
End Function
Então emE2digitar:
=CSList(C2,D2)
e copie:
Funções definidas pelo usuário (UDFs) são muito fáceis de instalar e usar:
- ALT-F11 abre a janela VBE
- ALT-I ALT-M abre um novo módulo
- cole o material e feche a janela do VBE
Se você salvar a pasta de trabalho, a UDF será salva com ela. Se você estiver usando uma versão do Excel posterior a 2003, deverá salvar o arquivo como.xlsmem vez de.xlsx
Para remover a UDF:
- abra a janela VBE como acima
- limpar o código
- feche a janela do VBE
Para usar a UDF do Excel:
=CSList(A1,B1)
Para saber mais sobre macros em geral, consulte:
http://www.mvps.org/dmcritchie/excel/getstarted.htm
e
http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx
e para obter detalhes sobre UDFs, consulte:
http://www.cpearson.com/excel/WritingFunctionsInVBA.aspx
As macros devem estar habilitadas para que isso funcione!
Responder2
Embora a solução acima tenha funcionado para mim usando o MS Excel, mais tarde consegui resolver isso no Planilhas Google. Estou adicionando esta resposta aqui para quem não tem acesso ao Ms Excel.
Passos:
- Vá ao menu 'Ferramentas' e clique em 'Editor de scripts...'
No arquivo de código aberto, cole o código fornecido abaixo e salve.
function range2series(input) { try { var r = input.split("-"); var exist = r[1]; //get the start and stop value var start = r[0]; var last = r[1]; var current = start; var output = ""; while (current <= last) { output += current; output += ","; current++; } //remove the last comma. output = output.substring(0, output.length - 1); return output; } catch(err) { //if single value and not range send back the input. return input; } }
Agora você pode usar a função com planilhas do Google. Basta clicar em uma coluna e digitar =range2series(CELL)
, por exemplo range2series(D4)
.
Para mais detalhes,referir.