none
Dúvida simples para quem não é leigo como eu. RRS feed

  • Pergunta

  • Fiz este código com a ajuda do macro do excel 2007

    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Users\Éric S. Pereira\Desktop\BO nº.pdf", Quality:=xlQualityMinimum, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _

    Só que ele sempre salva o arquivo com o mesmo nome, gostaria que poder automatizar esses salvamentos para nomes sucessivos como: 1; 2; 3; 4. ou mesmo nomes diversos de forma que não apague o antigo arquivo. Caso seja possível gostaria de poder copiar o conteúdo de uma célula da planilha e usa-la para numerar esses documentos. Ex. a célula A1 de uma planilha "nomes" tem o número 123. Gostaria e copiar este número e inserir no nome do arquivo a ser salvo. Grato a quem puder auxiliar-me.

    sexta-feira, 2 de setembro de 2011 15:28

Respostas

  •  

    Substitua seu trecho de codigo por este:

    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Users\Éric S. Pereira\Desktop\BO nº " & range("a1").value & ".pdf", Quality:=xlQualityMinimum, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _

     

    Onde o nome do arquivo esta concatenando o valor da celula A1.

     

     

    sexta-feira, 2 de setembro de 2011 16:43